摘要: Set rs = Server.CreateObject("Adodb.RecordSet") rs.open sql,conn,1,1 DIM Appeared Call DisRndRecord(10,rs.recordCount)'调用函数该位置显示记录 '################SUBS################ '#DisRndRecord(DisNum,rsBound) '#参数DisNum:显示数量 '#参数rsBound:随机数产生范围 Sub DisRndRecord(DisNum,rsBound) D 阅读全文
posted @ 2012-09-21 13:15 Hellen.Li 阅读(244) 评论(0) 推荐(0) 编辑