|
您的位置 → 湖南旅游酒店网
→ 首页 |
|
|
<%
dim conn
set conn=server.CreateObject("adodb.connection")
conn.open"driver={microsoft access driver (*.mdb)};dbq="&server.mappath("userserver/date/boworkcom33455comcnserver.mdb")
%>
|
<%
sql="select * from server order by id desc"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,3,1
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=14
rs.AbsolutePage=pagecount
do while not rs.eof%>
<%
rs.movenext
i=i+1
if i>=rs.pagesize then exit do
loop
%>
关于酒店还有更多内容 >>>
|
|
|
Copyright
© 2003 All rights reserved
www.33455.com.cn
湖南酒店网 版权所有 
）
" & "" & "
