找回密码
 注册
搜索
热搜: 回贴
  • 前程无忧官网首页 有什么好的平台可以
  • 最新的销售平台 互联网营销的平台有哪
  • 制作网页的基本流程 网页制作和网页设
  • 【帝国CMS】输出带序号的列表(数字排
  • 网站建设公司 三一,中联,极东泵车的
  • 织梦 建站 织梦网站模版后台怎么更改
  • 云服务官网 哪些网站有免费的简历模板
  • 如何建网站要什么条件 建网站要用什么
  • 吉林市移动公司电话 吉林省退休人员网
  • 设计类毕业论文 网站设计与实现毕业论
查看: 130|回复: 7

ASP随机函数问题,请教一下前辈们

[复制链接]
发表于 2010-1-9 06:44:53 | 显示全部楼层 |阅读模式 IP:江苏扬州
sub SetRed_ads
sql="select top "&fineMathematics&" Gq_sfdata.id,Gq_sfdata.name,Gq_sfdata.IP,Gq_sfdata.service,Gq_sfdata.Sdate,Gq_sfdata.hour,Gq_sfdata.minute,Gq_sfdata.addr,Gq_sfdata.QQ,Gq_sfdata.xingzhi,Gq_sfdata.homepage,Gq_sfdata.gameid,Gq_GameType.game,Gq_sfdata.fine,Gq_sfdata.finetime,Gq_sfdata.time"
sql=sql&" from Gq_sfdata,Gq_GameType where Gq_sfdata.gameid=Gq_GameType.id"
sql=sql&" and Gq_sfdata.ulock=1 and Gq_sfdata.fine=1 and Gq_sfdata.gameid="&indexsf&" order by Gq_sfdata.hour,Gq_sfdata.minute"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
rs.close
else
while not rs.eof
if checkday(rs("finetime"),rs("time")) then
Response.Write "<TR bgColor="&bg_1&" onmouseover=javascript:this.bgColor='"&bg_1_1&"' onmouseout=javascript:this.bgColor='"&bg_1&"'>"
Response.Write "<TD width="&w1&"><a href="&rs("homepage")&" target=show>"&rs("name")&"</a></TD>"
Response.Write "<TD width="&w2&">"&rs("IP")&"</a></TD>"
Response.Write "<TD width="&w3&">"
%>
<%if rs("Sdate")<>"" then response.write year(rs("sdate"))&"年/"&month(rs("sdate"))&"月/"&day(rs("Sdate"))&"日/"%><%if rs("hour")>=0 and rs("hour")<7 then
response.write "凌晨"&rs("hour")&"点"
else
if rs("hour")>17 and rs("hour")<24 then
response.write "晚上"&rs("hour")-12&"点"
else
if rs("hour")<12 then
response.write "上午"&rs("hour")&"点"
else
if rs("hour")>12 and rs("hour")<=17 then
response.write "下午"&rs("hour")-12&"点"
else
if rs("hour")=12 then
response.write "中午"&rs("hour")&"点"
end if
end if
end if
end if
end if%><% if rs("minute")<30 then
response.write"开放"
else
if rs("minute")>=30 then
response.write "/30分开放"
end if
end if%>
<%
Response.Write "</TD>"
Response.Write "<TD width="&w4&">"&rs("Addr")&""&split(ssign,",")(rs("Service"))&"</TD>"
Response.Write "<TD width="&w5&">"&rs("QQ")&"</TD>"
Response.Write "<TD>"&rs("xingzhi")&"←<img border='0' src='images/atop.gif' width='25' height='11'></TD>"
Response.Write "<TD width="&w6&"><a href="&sflook&"id="&rs("id")&" target=_blank>点击查看<img src='images/ICON_New.gif' hspace=0 vspace=0 border=0></a></TD>"
Response.Write "<TD width="&w7&"><font color=#FF0000>说明</font></TD>"
Response.Write "</TR>"
end if
rs.movenext
wend
rs.close
end if
end sub





以上代码是一个列出AC数据库并按时间排列的,但我想让他变成随机性的,请问怎么解决呢。
我刚从HTML过来的,很多语句都不懂,望前辈们指教
发表于 2010-1-9 06:44:56 | 显示全部楼层 IP:江苏扬州
哈哈  自己研究出来了
  谢谢大家了,这个论坛真好。以后我会常来的:)
谢谢楼上那位前辈的启发。
回复

使用道具 举报

发表于 2010-1-9 06:45:00 | 显示全部楼层 IP:江苏扬州
sql=sql&" and Gq_sfdata.ulock=1 and Gq_sfdata.fine=1 and Gq_sfdata.gameid="&indexsf&" order by Gq_sfdata.hour,Gq_sfdata.minute"
改成
sql=sql&" and Gq_sfdata.ulock=1 and Gq_sfdata.fine=1 and Gq_sfdata.gameid="&indexsf&" order by Gq_sfdata.hour,Gq_sfdata.minute,rnd(你想随机的字段)"
回复

使用道具 举报

发表于 2010-1-9 06:45:04 | 显示全部楼层 IP:江苏扬州
终于有人回我啦,好人啊!
我先去试试
回复

使用道具 举报

发表于 2010-2-10 15:05:07 | 显示全部楼层 IP:河南
路过....
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )

GMT+8, 2024-9-30 07:28 , Processed in 0.186715 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表