次の段落は、基本的なページングコードです。
＜％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リーフで呼ばれることです。