<% response.expires=0 set rs=server.createobject("adodb.recordset") sql="select * from sang" rs.open sql,conn,1 dim MaxPerPage MaxPerPage=12 dim text,checkpage text="0123456789" Rs.PageSize=MaxPerPage for i=1 to len(request("page")) checkpage=instr(1,text,mid(request("page"),i,1)) if checkpage=0 then exit for end if next If checkpage<>0 then If NOT IsEmpty(request("page")) Then CurrentPage=Cint(request("page")) If CurrentPage < 1 Then CurrentPage = 1 If CurrentPage > Rs.PageCount Then CurrentPage = Rs.PageCount Else CurrentPage= 1 End If If not Rs.eof Then Rs.AbsolutePage = CurrentPage end if Else CurrentPage=1 End if if not rs.eof then i=0 do while not rs.eof %> <% i=i+1 if i >= MaxPerpage then exit do rs.movenext loop end if %>

•    深圳特区国税办税指南

•    深圳特区地税办税指南

•    有限公司工商注册指南

 


<% if page<>1 then %> <% end if %> <% if not page+1>rs.pagecount then %> <% end if %>
首    页
上一页
下一页
末   页
  跳到第
10条新闻 页次:1/1
<% rs.close conn.close %>

电话:(0755)83734916、83734926、83734929 | 传真:(0755)82966576
地址:深圳市福田区滨河大道5022号联合广场A座20楼2011室 邮编:518033
Copyright(c) 2004-2006 CXKJS.COM All Rights Reserved