还剩1页未读,继续阅读
文本内容:
ASP实现access随机显示不重复记录解决方案数据库教程电脑资料%-------------------------数据库连接-----------------------Set bjConn=Server.CreateObjectADODB.Connection objConn.ConnectionString=Provider=Microsoft.Jet.OLEDB.
4.0;_Data Source=Server.MapPathdata.mdb objConn.Open-------------------------数据库连接------------------------------------------------检索数据-----------------------strSQL=SELECT id,DataColumn FROMDataTable Sql语句,检索数据库Set bjRS=Server.CreateObjectADODB.Recordset创建记录集objRS.Open strSQL,objConn,1,1执行检索Count=objRS.RecordCount得到记录总数Item=4显示记录数-------------------------检索数据------------------------------------------------------------------------------------------------------redim aItem,2,tCount定义2数组,数组a用来储存记录,数组t用来删选记录---------------------------------------初始数组数值,目的为了插入数据以后和此值做比较for eachj int j=0next------------------------------------------------------------------------------随机抽取记录号Randomize timer初始化随机数生成器for j=1to Itemk=int...。