Frequent page source code

xiaoxiao2021-03-06  66

<%? Page = clng ("page")) ??? set = server.createObject ("adoDb.recordset") ??? sql = "SELECT ID, GuestNAME, OICQ, Email, Web, IP , Update, RepLDate, Replay, Content, Pic, Validate, UserShow from Guestbook ORDER BY UPDATE DESC "??? rs.open sql, conn, 1, 1 ??? if xi e ???? response.redirect ( "GUESTBOOK.ASP? Action = WRITE") ???? response.end () ??? End if ??? rs.pageSize = 10 ??? PageCount = rs.pagecount ??? ife <= 0 THEN Page = 1 ??? if power PageCount ??? if Request.queryString ("Page" = "" "= 1 ??? rs.absolutepage = Page ??? countpicnum = 1 ??? While (NOT (Rs.eof or (CountPicnum> rs.pagesize)))))%> ...................

??? <% countpicnum = countpicnum 1 ??? rs.movenext ??? loop%>

?

Average

<% = rs.recordcount%> strip

<% = PageCount%> Page per page

<% = rs.pageSize%> strip

Homepage

Previous page

Next page

Last page

???????????????????

?????????????????????? <% for i = 1 to Page = I THEN ??????%> ??? ?????? <% = i%> <% else%> ??????? <% = I%> ??????????????? % END IF ????? next ?????%> ????????????????????

??????????????????? page

?

Function MM_JUMPMENU (TARG, SELOBJ, RESTORE) {//v3.0eval (Targ ".Location='" selobj.Options[Selobj.selectedIndex].value "'" ";if (restore) selobj.selectedIndex = 0;}

转载请注明原文地址:https://www.9cbs.com/read-119622.html

New Post(0)