<%
set baglan = Server.CreateObject("Adodb.Connection")
baglan.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source ="& Server.MapPath("site.mdb")

set rast = Server.CreateObject("Adodb.Recordset")
SQL = "Select site from siteler "
rast.Open SQL, baglan, 1,3

randomize timer
rg=int(rnd*rast.recordcount)
rast.move(rg)
rastgele=rast("site")
%>

<iframe src="<%=rastgele%>"></iframe
<%rast.close%>

böyle bi şey yapabilirsin...
ben rastgele site çekiyordum iframe içinde