次の段落は、基本的なページングコードです。
<%sql = "選択……………………………sqlステートメントセットrs = server.createobject(" adodb.recordset ")rs.open sql、conn、1 nos eofではない場合、pages = 30 'ページごとに表示されるページ1ページごとに表示されるページ1ページごとに表示されるページ1ページごとに表示されるレコード=ページごとに表示されるレコードの数を定義します。合計ページに分割= request.QueryString( "Page") 'ブラウザを通過したページ数' If Statementが基本的なトラブルシューティングプロセスに属している場合、ISEMPTY(ページ)またはCINT(ページ)<1 Then Page = 1 Elseif(Page)ここに……………<%ページ=ページ-1 rs.movenext loop else response.write( "データベースにコンテンツはありません!")rs.close set rs = Nothing%>
システムはすでにデータを塗っています。今回説明されているページネーション関数の定義を見てみましょう。
<%sub pageurl(purl)dim eurl txts = request.servervariables( "url")txts = left(txts、instrrev(txts、 "/"、len(txts))-1)eurl = "http://"; &request.servervariables( "server_name")&txts for i = 1 to allpages txt = "" txt = " cint(page)then txt = txt& "</font>" txt = txt& "</a>∥∥/strong>" respons.write(txt)次の終わりsub%>
上記のページネーション関数コードをASPファイルに保存します。使用するには、call( "/comply name call?")の場合はいつでも電話をかけるために使用する必要があるページに紹介します。たとえば、私のニュースページでそれを呼びたい場合、それは<%call( "/news.asp?")%>です
私たちが今見たものは限られています。つまり、SQLクエリコンテンツと出力コンテンツを除き、最初のコードでは、レコードセットを変更できないと宣言する他の変数が実行できません。実際、このプログラムは無関係です。最も重要なことは、このページネーション関数がASPリーフで呼ばれることです。