将指针移动到随机的记录上.asp

来自「较为详细的介绍了asp自定义的各种函数,方便asp的各种开发.」· ASP 代码 · 共 12 行

<%
randomize
set advrs = server.createobject("adodb.recordset")
advrs.open"select * from adv",conn,1,1
if not advrs.eof then
ranid = int(rnd * advrs.recordcount)
advrs.Move ranid
response.write advrs("adv")
end if
%>