% dbpath = server.mappath("admin/huiji/huiji.mdb") connstr = "driver={microsoft access driver (*.mdb)};dbq="& dbpath set conn = server.createobject("adodb.connection") conn.open connstr set rsxx=Server.CreateObject("ADODB.recordset") sqlxx="select * from message order by cDatetime desc " rsxx.open sqlxx,conn,3,2 rsxx.pagesize=26 topage=CLng(request("topage")) if topage=0 then topage=1 else if topage>=rsxx.pagecount then topage=rsxx.pagecount end if end if rsxx.absolutepage=topage %>
地址:郑州市丰产路与政七街思达数码大厦C座4楼407室
邮编:450008 法律援助热线:0371-60900114 手机:13303859218 博客地址:http://blog.sina.com.cn/changboyang |