ホーム>ネットワークプログラミングチュートリアル>ASP チュートリアル

ASPにページネーションディスプレイを実装する7つの方法

著者：Eve Cole 更新時間：2025-03-21 12:32:01

この記事では、主にASPにページネーションディスプレイを実装することができます。

MicrosoftのASPプログラミングシステムでは、ADOオブジェクトの確立により、Webページからのデータベースへのアクセスが簡単なタスクになります。特にADO Recordsetオブジェクトにより、コントロールデータの出力をより便利にし、無料で表示できます。 Visual Interdev6.0（以下、VI6.0と呼ばれる）では、スクリプトオブジェクトモデル（以下SOMと呼ばれる）、設計時間制御（以下DTCと呼ばれる）、データ環境などのオブジェクトモデルの導入によりオブジェクトモデル（以下ではDeomと呼ばれます）は、データベースにアクセスするためにWebページをより便利にします。

データベース接続に関するトピックのため、以下はコードと簡単なコメントのみを提供し、レコードセットオブジェクト（またはコントロール）を使用してデータレコードのページネーションディスプレイを実装する方法に焦点を当てています。私の理解によれば、ページネーションディスプレイの鍵は、ADOのRecordSetオブジェクトまたはDTC（設計時間制御）のプロパティと方法をマスターすることです。

ページに表示されるこれらの7つの武器は、4つのカテゴリにまとめられています。一時的に純粋なASPメソッドと一時的に呼ばれます。

これは、国内のASP Webサイトで最も一般的に使用される方法でもあります。これらの2つの方法の実装は、最も簡単に理解しやすく、最小オブジェクトの概念が使用され、開発環境の最小要件（ちょうどメモ帳）です。これらの2つの方法の本質は、ADOオブジェクトをプログラムに導入するだけのCGIのプログラミングアイデアであると言えます。

4番目と5番目のDHTMLメソッドは、一時的にSOMと名付けられました。

これらの2つの方法では、Microsoftのスクリプトオブジェクトモデル（スクリプトオブジェクトモデル）の使用とVI6.0のDHTMLのテーブルオブジェクトのデータベースバインディングの新しい機能が必要です（多くの書籍と記事では、DHTMLのCSS機能がスタイルデザインのアプリケーションのみを紹介します。データ結合特性の導入を無視し、クライアント側のページのターンオーバーを実現します。ただし、Microsoft Internet Explorer 4.0以降など、ユーザーのブラウザがDHTMLをサポートする必要があります。

6番目の方法は、一時的にSOMサーバー側のメソッドと呼ばれます。

Microsoft、Recordset、PageObject、Gridなどが提案するスクリプトオブジェクトモデルでいくつかのDTCコントロールを使用するVI6.0環境での開発が必要です。これは、Webページをオブジェクトとして扱うエキサイティングで新しいプログラミング方法です（このオブジェクトモデルは従来のDOMとは異なります---ドキュメントオブジェクトモデル：DOMはクライアントのみを制御できますが、SOMはサーバー側とクライアント側を制御できます）、これは、Webページのオブジェクト指向プログラミングを真に実装しています。しかし、残念ながら、私の個人的な能力は限られている可能性があります。たとえば、このテクノロジーはまだあまり成熟していないと思います。

7番目の方法は、一時的にDEOMメソッドと名付けられています。

また、VI6.0に確立されたデータ環境オブジェクトモデルを使用して、レコードセットオブジェクトを作成します。これは、SOMモデルと比較して比較的まれな新しい方法であり、後で詳細に説明されます。

後で言及したすべてのソースコードは、直接コピーできます。

さまざまなページングメソッドの詳細を詳細に導入する前に、データベースを作成します。Office97でアクセスを使用してEmploy EMPを作成し、EMP ID、姓、名の3つのフィールドのみを設定します。なぜそれが簡単なのですか？

パラメーターを直接置き換える最初の方法

この方法は、レコードセットオブジェクトを手動で作成し、そのページサイズ（ページごとに表示されるレコードの数を指定）、PageCount（合計ページ番号）、および絶対対象（現在のページ番号）プロパティを使用して、ページの出力を制御します。ページページは、パラメーターを直接ページ番号付けする方法を使用して、ページのターンオーバーを制御します。 Webページの名前はEmp1.aspです。ソースコードは次のとおりです。

  1. ＜％// Employee.mdbデータベースへの接続を確立します。
  2. setConn = server.createObject（adodb.Connection）
  3. conn.opendriver = {microsoft AccessDriver（*。MDB）}; dbq = Employee.mdb
  4. // EMPテーブルのレコードセットオブジェクトのインスタンスを作成します。
  5. setrs = server.createObject（adodb.Recordset）
  6. rs.openemp、conn、3
  7. Pagesize = 10 // Pagesize属性各ページに表示されるレコードの数を指定します。
  8. page = clng（request（page）） '文字列タイプが長いタイプに変換されました
  9. ifpage ＜1thenpage = 1
  10. ifpage> rs.PageCountThenPage = rs.PageCount
  11. ifpage ＜＞ 1 then
  12. Response.Write
  13. Response.Write
  14. endif
  15. ifpage ＜＞rs.pagecountthen
  16. Response.Write
  17. Response.Write
  18. endif
  19. Response.Writeページ番号：＆/＆rs.PageCount＆＜/font＞
  20. //各ページの表示
  21. //ヘッダーを表示します
  22. Response.Write ＜センター＞＜ Tableborder = 1＞
  23. Response.Write
  24. respons.write
  25. Response.Write
  26. //各レコードの表示をサイクリングします
  27. rs.absolutepage = page //ページ番号をAbsolutePage属性に割り当てて、現在のページの最初のレコード番号を知る
  28. foripage = 1tors.pagesize //
  29. Response.Write
  30. Response.Write
  31. Response.Write
  32. rs.movenext
  33. IFRS.EOFTTHENEXITFOR
  34. 次
  35. Response.Write

2番目のタイプ：フォーム転送パラメーターメソッド

この方法は、レコードセットオブジェクトを作成するときの最初の方法と同じですが、ページターニングコントロールの場合、ケースステートメントを使用してページターニングを達成します。 Webページの名前は次のとおりです。Emp2.asp。この方法には、プログラミングロジックに不利な点があります。前のページまたは次のページボタンを押してから、ブラウザの更新ボタンを押した後、ページを自動的にターンします。ソースコードは次のとおりです。

  1. ifpagenum = thenpagenum = 1 //最初のページから表示します
  2. //データベース接続を作成し、オブジェクトインスタンスを記録しますRs。
  3. 最初の方法と同じ、ここでスキップしました。
  4. rs.Pagesize = 10'ページに表示されるレコードの数を10までセット
  5. //ページターンアクションを確認します
  6. selectcaserequest（nav）
  7. 場合
  8. セッション（Pagenum）= 1
  9. casefirst'firstrecord
  10. セッション（Pagenum）= 1
  11. Caseprev'PreviousRecord
  12. ifsession（pagenum）> 1then
  13. セッション（Pagenum）= session（pagenum）-1
  14. endif
  15. casenext'nextrecord
  16. ifsession（pagenum）＜rs.pagecountthen
  17. セッション（Pagenum）= session（pagenum）+1
  18. endif
  19. caselast'lastrecord
  20. セッション（Pagenum）= rs.PageCount
  21. EndSelect
  22. rs.absolutepage = clng（session（pagenum））//現在のページの最初のレコード番号を決定します
  23. //現在のページを表示します
  24. 最初の方法と同じように、ここでスキップします。
  25. // navページターンボタン設定
  26. ＜formmethod = getaction = emp2.​​asp＞
  27. ＜inupttype = submitname = navvalue = home>
  28. ＜inupttype = submitValue =前のページname = nav＞
  29. ＜inupttype = submitvalue =次のページname = nav＞
  30. ＜inupttype = submitvalue = lastページ名= nav ＞＜/form＞

3番目のタイプ：グリッドコントロールを使用してページングを設計します

すべての方法の中で、この方法は最も簡単です。 DTCのレコードセットコントロールとグリッドコントロールをASP Webページにドラッグするだけです。さらに、サーバープラットフォームでのページのターンオーバーを制御するのか、クライアントプラットフォームでページのターンオーバーを制御するかを選択することもできます。不利な点は、それによって与えられた形式で表示する必要があり、テーブルの表示形式を自分で制御できないことです。

この方法は次のとおりです。

VI6.0でプロジェクトEMP.VIPを構築します。次に、プロジェクトにASP Webページを追加します：EMP3.asp。

ステップ1：VI6.0メニューバーのデータ接続の追加を選択し、開発ツールのナビゲーションプロンプトに従うと、従業員への接続を簡単に確立できます。MDBデータベース。レコードセットコントロールをDTCツールバーからWebページにドラッグし、そのプロパティを設定します。写真に示すように具体的：

コントロールをWebページにドラッグすると、VI6.0はScriptingオブジェクトモデルを使用してYESを押すかどうかを自動的に促します。

ステップ3：DTCツールバーからグリッドコントロールをWebページにドラッグし、次のようなプロパティを右クリックして、次のようなプロパティを設定します。表示されているレコードの数と表示形式など。非常にシンプルで便利です。ナビゲーションプロンプトに従ってください。

4番目のタイプ：DHTMLメソッド1。

データレコードはHTMLテーブルに表示されます。 DHTMLのテーブルのデータ結合特性を使用して、レコードのページネーション表示を制御します。欠点は、ページターン方法が特定の方法に制限されることです。前のページと次のページのみですが、ホームページと最後のページではありません。クライアント側で制御されるため、これと5番目の方法は最速ですが、残念ながらDHTMLをサポートするブラウザでのみ使用できます。

DHTMLで、

DataSRCプロパティを使用すると、テーブルをデータソースにバインドでき、他のプロパティDataPagesizeは、一度にページに表示されるレコードの数を指定します。

次の例を見てみましょう。

ステップ1：RecordSetコントロールを新しく作成したWebページEMP4.htmにドラッグし、このメソッドを3番目のプロパティと同じです。

ステップ2：次のコードを入力します。

  1. tableId = table1datasrc =＃recordset1_rdsdatapagesize = 5＞ // recordsetコントロール名がrecordset1が設定されると仮定します。ページごとに5つのレコードが表示されます。
  2. thead＞
  3. ＜thalign = leftwidth = 150
  4. ＜thalign = leftwidth = 200＞ lastname ＜/th＞
  5. ＜thalign = leftwidth = 200 ＞firstName ＜/th＞
  6. ＜/thead＞
  7. ＜tr＞
  8. ＜TD ＞＜ divdatafld = empid ＞＜/div＞＜/td＞ //出力テーブルコンテンツ
  9. ＜td ＞＜ divdatafld = lastname
  10. ＜td ＞＜ divdatafld = firstname ＞＜/div ＞＜/td＞
  11. ＜/tr＞
  12. ＜/表＞

ステップ3：次に、DTCSボタンボタンコントロールのペアを追加して、ページターンナビゲーションを実行します。対応するスクリプトは次のとおりです。

  1. ＜scriptlanguage = vbscript＞
  2. functionbtnprevious_onclick（）
  3. 表1.PreviousPage（）
  4. エンド機能
  5. functionbtnnext_onclick（）
  6. Table1.nextPage（）
  7. エンド機能
  8. ＜/スクリプト＞

5番目のタイプ：DHTMLメソッド2

この方法は、4番目の方法の完全性です。マニュアルスクリプト方法により、ホームページと最後のページターンナビゲーションボタンを作成し、各レコードの場所を決定できます（レコード番号）。長さのため、以下に具体的な例を1つ紹介し、簡単な説明をします。 DHTMLおよびRecordset Controlsの他のプロパティと方法については、自分で関連する本を参照してください。ここでは、レコードセット制御は、最初と2番目の方法で導入されたADOレコードセットオブジェクトとは多少異なることに注意してください。レコードセットコントロールは、PagesizeやPageCountなどのプロパティを直接与えず、以下に紹介した方法を使用して計算する必要があります。

ステップ1：RecordSetコントロールを新しく作成したWebページEMP5.htmにドラッグし、そのメソッドは3番目のものと同じです。

ステップ2：3つのグローバル変数を定義し、RecordSet1のOnDataSetCompleteスクリプトを記述します。

  1. dimgcurrentpageNumber //現在のページ番号
  2. dimgmaxpageNumber //ページの最大数
  3. dimgrecordsperpage //ページごとに表示されるレコードの数
  4. Grecordsperpage = 5 //ページごとに表示されるレコードの数を5つのレコードに設定します。
  5. functionrecordset1_ondatasetcomplete（）
  6. TotalRecordCount = RecordSet1.GetCount（）//レコードの総数
  7. gmaxpageNumber = int（totalRecordCount/grecordsperpage）//ページの最大数を取得します
  8. if（totalRecordCountModGrecordSperpage）＞0then
  9. gmaxpagenumber = gmaxpagenumber+1
  10. endif
  11. エンド機能

ステップ3：ページターンナビゲーションボタンを作成します。

  1. functionbtnfirst_onclick（） 'ホームページにフリップします
  2. GcurrentPageNumber = 1
  3. displaydata（）
  4. エンド機能
  5. functionbtnprevious_onclick（） ''前のページにフリップします
  6. ifgcurrentpageNumber> 1then
  7. gcurrentPageNumber = gcurrentPagenumber-1
  8. displaydata（）
  9. endif
  10. エンド機能
  11. functionbtnnext_onclick（） ''次のページにフリップします
  12. ifgcurrentPageNumber
  13. gcurrentPageNumber = gcurrentPagenumber+1
  14. displaydata（）
  15. endif
  16. エンド機能
  17. functionbtnlast_onclick（） ''最後のページにフリップします
  18. gcurrentpageNumber = gmaxpagenumber
  19. displaydata（）
  20. エンド機能

ステップ4：各ページを表示する関数を書き込みます。多くのDHTMLプロパティと方法が使用されています。関連する本を自分で参照してください。

  1. subdisplaydata（）
  2. startrecord =（（gcurrentpagenumber-1）*grecordsperpage）+1 //各ページの先頭に表示されるレコードの数を計算します（位置、どのアイテム）
  3. rowctr = 1
  4. lblpageNumber.innerhtml = gcurrentpagenumber＆/＆gmaxpagenumber
  5. forrecordptr = startrecordto（startrecord+grecordsperpage-1）//ページに各レコードを表示するためのサイクリング
  6. ifrecordptr＞ recordset1.getCount（）then //空のテーブルを表示します
  7. 表1.Rows（rowctr）.cells（0）.innerhtml = ＜p ＞＜/p＞
  8. 表1.Rows（rowctr）.cells（1）.innerhtml = ＜p ＞＜/p＞
  9. 表1.Rows（rowctr）.cells（2）.innerhtml = ＜p ＞＜/p＞
  10. 表1.Rows（rowctr）.cells（3）.innerhtml = ＜p ＞＜/p＞
  11. else //各ページを指定します
  12. RecordSet1.MoveAbsolute（RecordPtr）//レコードポインターを移動します。
  13. empid = recordset1.fields.getvalue（empid）
  14. emplname = recordset1.fields.getValue（firstName）
  15. empfname = recordset1.fields.getValue（lastName）
  16. 表1.Rows（rowctr）.cells（0）.innertext = RecordPtr'Counter
  17. 表1.Rows（rowctr）.cells（1）.innertext = empid
  18. 表1.Rows（rowctr）.cells（2）.innertext = emplname
  19. 表1.Rows（rowctr）.cells（3）.innertext = empfname
  20. endif
  21. rowctr = rowctr+1
  22. 次
  23. Endingub

さらに、ウィンドウオブジェクトのオンロードイベントに次のスクリプトを記述する必要があります。

  1. forrowctr = 1togrecordsperpage
  2. 表1.Insertrow（rowctr） '新しい列を挿入します
  3. forcellctr = 0to3
  4. 表1.rows（rowctr）.insertcell（）
  5. 次
  6. 次

6番目の方法：サーバー側の制御ページのターンオーバー。

サーバー上のデータをページングしてからクライアントに出力すると、ブラウザがDHTMLをサポートしていないことに問題はありません。ただし、サーバー側の方法を使用すると、ページをターンするたびにレコードセット制御を再生する必要があるため、DHTMLメソッドを使用するよりも速度が確実に遅くなります。しかし、サーバーが十分に速い場合、顧客の遅さは気付かないでしょう。

次の例では、新しいDTCコントロールを紹介します：PageObject。このコントロールにより、指定されたWebページがオブジェクトになり、Webページのサーバースクリプトでユーザーが編成するサブルーチンと関数は、Webページオブジェクトのメソッドと見なすことができます。状態情報を管理するための高度な方法を提供します。Webオブジェクトには、ユーザーがこれらのプロパティの寿命を定義できるプロパティ（変数）があります。上記の機能のため、ページ旋回スクリプトをコンパイルするのが非常に便利です。

ただし、このメソッドの欠点は次のとおりです。前のページまたは次のページボタンを押して、ブラウザの更新ボタンを押すと、Webページはページを自動的にターンします。さらに、ブラウザのフォールバックボタンを押してから、ページターンボタンを押すと、ランダムに回転することができます。これはすべて、Webオブジェクトプロパティ（グローバル変数）によって引き起こされます。

ステップ1：RecordSetコントロールを、新しく作成したWebページEMP6.aspにドラッグし、そのメソッドは3番目のものと同じです。

ステップ2：PageObjectコントロールをWebページにドラッグして、件名を付けます。次に、このコントロールを右クリックしてプロパティページを開き、MaxPageNumber、RecordSperPage、およびCurrentPageNumberの3つのプロパティ（グローバル変数）を設定します。 VI6.0は、特定の使用法を読み取り、書き込む方法を使用できます。関連する情報を参照してください。

ステップ3：RecordSet1のOnDataSetCompleteイベントを書きます。

  1. functionrecordset1_ondatasetcomplete（）
  2. RecordSperPage = 5
  3. emplist.setRecordSperPage（RecordSperPage）// Webページオブジェクトを設定するページごとの録音番号を5に設定
  4. TotalRecordCount = RecordSet1.getCount（）//レコードセットの総数を取得します
  5. mpn = int（TotalRecordCount/RecordSperPage）// MPNをページの総数として計算します
  6. if（totalRecordCountModRecordSperpage）＞0then
  7. mpn = mpn+1
  8. endif
  9. emplist.setmaxpageNumber（mpn）
  10. エンド機能

ステップ4：4つのボタンコントロールをWebページにドラッグし、ページターンコントロールスクリプトを書き込みます。主に、WebページオブジェクトのCurrentPageNumberプロパティの値を変更することにより、ページターンを実現します。

  1. functionbtnfirst_onclick（） 'ホームページにフリップします
  2. emplist.setCurrentPageNumber（1）
  3. エンド機能
  4. functionbtnprevious_onclick（） ''前のページにフリップします
  5. cpn = emplist.getCurrentPagenumber（）
  6. ifcpn ＞1then
  7. emplist.setCurrentPageNumber（CPN-1）
  8. endif
  9. エンド機能
  10. functionbtnnext_onclick（） ''次のページにフリップします
  11. cpn = emplist.getCurrentPagenumber（）
  12. ifcpn ＜mplist.getMaxPagEnumber（）Then
  13. emplist.setCurrentPageNumber（CPN+1）
  14. endif
  15. エンド機能
  16. functionbtnlast_onclick（） ''最後のページにフリップします
  17. emplist.setCurrentPageNumber（emplist.getMaxPageNumber（））
  18. エンド機能

初めてページに入力するときに最初のページが表示されるようにするには、WebページオブジェクトのOnenterイベントを書く必要があります。

  1. functionemplist_enenter（）
  2. ifemplist.firstenteredthen
  3. emplist.setCurrentPageNumber（1）
  4. endif
  5. エンド機能
  6. ステップ5：各ページを表示するスクリプトを書きます。
  7. ＜HR ＞＜ Tableborder = 0 ＞＜Tr＞ //ヘッダーを表示します
  8. ＜thalign = leftwidth = 35＞＜/th＞
  9. ＜thalign = leftwidth = 150
  10. ＜thalign = leftwidth = 200＞ lastname ＜/th＞
  11. ＜thalign = leftwidth = 200 ＞firstName ＜/th ＞＜/tr＞
  12. ＜％
  13. pageNumber = emplist.getCurrentPagenumber（）//ページターンに必要なさまざまなパラメーターを計算します。
  14. recordsperpage = emplist.getRecordsperpage（）
  15. startrecord =（（pageNumber-1）*RecordSperPage）+1
  16. LastRecord = RecordSet1.GetCount（）
  17. forrecordptr = startrecordto（startrecord+recordsperpage-1）％＞
  18. ＜％ifrecordset1.eof = truethen％＞
  19. ＜tr＞
  20. ＜TD ＞＜/TD＞
  21. ＜TD ＞＜/TD＞
  22. ＜TD ＞＜/TD＞
  23. ＜TD ＞＜/TD＞
  24. ＜/tr＞
  25. ＜％else％＞
  26. ＜％RecordSet1.Moveabsolute（RecordPtr）％＞
  27. ＜tr＞
  28. ＜％ifrecordptr
  29. ＜TD ＞＜％= RecordPtr％＞＜/TD＞
  30. ＜％else％＞
  31. ＜TD ＞＜/TD＞
  32. ＜％endif％＞
  33. ＜TD ＞＜％= RecordSet1.Fields.GetValue（Empid）％＞＜/TD＞
  34. ＜TD ＞＜％= RecordSet1.Fields.getValue（lastName）％＞＜/td＞
  35. ＜TD ＞＜％= RecordSet1.Fields.GetValue（FirstName）％＞＜/TD＞
  36. ＜/tr＞
  37. ＜％endif％＞
  38. ＜％next％＞
  39. ＜/テーブルhr＞

7番目のタイプ：データ環境オブジェクトモデルメソッド

データ環境オブジェクトモデルは、ADOオブジェクトモデルとそのオブジェクト - 接続、コマンド、レコードセット、フィールド、パラメーターオブジェクトをより簡単な形に抽象化します。データ環境オブジェクトモデルは、メソッドとしてコマンドを明らかにします。ユーザーはこれらのメソッドを呼び出して、これらのコマンドを実行し、結果のレコードセットを返すことができます。 Deom Object Modelの詳細については、関連する本を参照してください。 Emp7.aspの次の例を見てみましょう。

ステップ1：VI6.0のプロジェクトエクスプローラーウィンドウのプロジェクトのマウスを右クリックし、[ポップアップ]メニューから[データ接続の追加]を選択します。 VIから指定されたナビゲーションプロンプトに従ってデータベースへの接続を確立した後、ユーザーはASPアプリケーションからデータベースにアクセスするためにデータコマンドを追加します。同時に、Project ExplorerウィンドウのGlobal.ASAファイルの下にデータ環境オブジェクトが表示されます。

ステップ2：データ環境オブジェクトを右クリックし、[ポップアップ]メニューから[データコマンドの追加]オプションを選択して、データコマンドコマンドを追加します1。 VI6.0のナビゲーションプロンプトによると、command1 Propertiesポップアップウィンドウの遺伝的ページでSQLステートメントを選択し、EMPから[SELECT *]を入力できます。 OKを押して戻ります。

ステップ3：このデータコマンドを作成した後、データ環境オブジェクトのメソッドを作成し、スクリプトからこのメソッドを呼び出すことができ、メソッドはユーザーにレコードセットを返します。

thispage.createde（）// SOMモードでは、このページは現在のWebページオブジェクトを表し、createde（）メソッドはDEオブジェクトを作成します。

de.Command1 // DEオブジェクトのコマンドを実行します。これは後でパラメーターとして使用できます。これは、条件付きクエリを実行するときに非常に便利です。

rs = de.rscommand1 // de.rscommand1を設定すると、RSオブジェクトはADOレコードセットオブジェクトに完全に等しいようになります。

ステップ4：RSはADOオブジェクトであるため、次の実装ページターンコードは上記のメソッドを完全に指し、ここでスキップされます。

FrontPage2000のデータベースナビゲーションに実装されているような他のメソッドは、このトピックに関連していないため、省略されています。

要約すると、上記で導入された各方法には、長さのために浸透することはできません。この記事は、ページターニングの具体的な例を介してASP Webプログラミングのさまざまな方法を紹介したいと考えています。ページプログラミング。DHTML、DTCコントロール、SOMオブジェクトモデル、DEOMオブジェクトモデルを使用する方法。

関連記事