<% classid=ReplaceUnsafe(request.QueryString("classid")) if not IsNumeric(smallclassid) then response.write"" response.End end if set dhrs=server.createobject("adodb.recordset") dhsql="select * from class where id="&classid dhrs.open dhsql,conn,1,1 if dhrs.eof then response.write"" response.End end if classname=dhrs("classname") classid=dhrs("id") dhrs.close set dhrs=nothing %> 综合婷婷丁香,一级成人生活片免费看,伊人色综合久久成人 " /> " />

国产精品一级香蕉一区-国产精品一级二级三级-国产精品一国产精品免费-国产精品一二三-国产精品一二区-国产精品夜夜春夜夜爽

產品分類
文章分類
<%=classname%>
  <% Set rs=Server.CreateObject("ADODB.RecordSet") sql="select id,Title,hits,addtime,ClassName,showname from article where classid="& classid &" order by id desc" rs.Open sql,conn,1,1 if rs.eof and rs.bof then %> <% else rs.PageSize=20 page=request.QueryString("page") if page="" then page=request.Form("page") page=clng(page) if page=0 then page=1 pages=rs.pagecount if page > pages then page=pages rs.AbsolutePage=page for j=1 to rs.PageSize Title = rs("Title") turl="article.asp?id="&rs("id")&"&name="&rs("showname") hits= rs("hits") addtime=rs("addtime") %> <% rs.movenext if rs.eof then exit for next %> <% end if set rs=nothing%>
 暫無內容
 <%=title%>
<%=addtime%>

<%if Page<2 then response.write "首頁 上一頁 " else response.write "首頁 " response.write "上一頁 " end if if rs.pagecount-page<1 then response.write "下一頁 尾頁" else response.write "" response.write "下一頁 尾頁" end if response.write " 頁次:"&Page&"/"&rs.pagecount&"頁 " response.write " 共"&rs.recordcount&"條記錄 "&rs.pagesize&"條記錄/頁" response.write " 轉到:" response.write " " %>
 

 

 

主站蜘蛛池模板: 欧美黑粗| 日韩久草视频| 99热综合在线| 免费看啪啪的网站| 一区二区三区四区视频| 精品久久久久久久| 午夜羞羞| 国产三级精品91三级在专区| 日韩欧美精品一区二区| www.亚洲视频.com| 欧美日韩国产网站| 131美女一区二区三区视频| 久久久这里只有精品加勒比| 亚洲好骚综合| 国产综合91天堂亚洲国产| 手机看片成人| 国产成人精品本亚洲| 日本www视频| 99久久影院| 欧美成人看片黄a免费看| 在线免费色| 久久er精品| 亚洲精品永久免费| 韩国精品在线观看| 特级毛片在线| 国产精品视频免费看| 日韩男女视频| 成人影片在线免费观看| 欧美在线a| 97视频免费看| 男女做性免费视频软件| 在线观看亚洲一区二区| 久久久99视频| 亚洲欧洲一区二区三区| 激情综合网五月婷婷| 偷拍第一页| 国产日韩欧美一区二区三区综合| 日韩在线观看免费| 高清视频日韩剧在线观看| 欧洲福利视频| 99热国品|