%
set rs_top=server.createobject("adodb.recordset")
sql_top="select top 10 * from ad_info where ad_type=10"
rs_top.open sql_top,conn,1,1
if not rs_top.eof then
top_all=rs_top.recordcount
Randomize timer
top_n=CInt((top_all-1)*Rnd+0)
rs_top.move(top_n)
ad_filetype=trim(rs_top("ad_filetype"))
ad_url=trim(rs_top("ad_url"))
ad_filename=trim(rs_top("ad_filename"))
if ad_filetype=0 then
top_IMGPath="../../admin1/ad_admin/ad_pic/"&ad_filename
ad_filename_str=""
elseif ad_filetype=1 then
top_IMGPath="../admin1/ad_admin/ad_pic/"&ad_filename
ad_filename_str=""
end if
else
ad_filename_str="广告预订 020-86272296"
end if
set rs_top=nothing
'conn.close
'set conn=nothing
%>