アドレス帳のナビゲーション ボタン

アドレス帳アプリケーションは、Web ページの下部にナビゲーション ボタンを表示します。 ナビゲーション ボタンを使用すると、データの最初または最後の行、または現在の選択範囲に隣接する行を選択して、HTML グリッド表示内のデータ間を移動できます。

大事な

Windows 8 および Windows Server 2012 以降では、RDS サーバー コンポーネントは Windows オペレーティング システムに含まれません (詳細については、Windows 8 と Windows Server 2012 の互換性クックブック を参照してください)。 RDS クライアント コンポーネントは、将来のバージョンの Windows で削除される予定です。 新しい開発作業ではこの機能を使用しないでください。現在この機能を使用しているアプリケーションを変更することを計画してください。 RDS を使用するアプリケーションは、WCF Data Serviceに移行する必要があります。

ナビゲーション サブ プロシージャ

アドレス帳アプリケーションには、First、Next、Previous、および Last ボタンをクリックしてデータを移動できるようにする複数の手順が含まれています。

たとえば、[First] ボタンをクリックすると、VBScript First_OnClick Sub プロシージャがアクティブになります。 このプロシージャは、MoveFirst メソッドを実行します。これにより、データの最初の行が現在の選択範囲になります。 [最後の ] ボタンをクリックすると、Last_OnClick Sub プロシージャがアクティブになり、MoveLast メソッドが呼び出され、データの最後の行が現在の選択範囲になります。 残りのナビゲーション ボタンも同様に動作します。

' Move to the first record in the bound Recordset.  
Sub First_OnClick  
   DC1.Recordset.MoveFirst  
End Sub  
  
' Move to the next record from the current position   
' in the bound Recordset.  
Sub Next_OnClick  
   If Not DC1.Recordset.EOF Then    ' Cannot move beyond bottom record.  
      DC1.Recordset.MoveNext  
      Exit Sub  
   End If     
End Sub  
  
' Move to the previous record from the current position in the bound   
' Recordset.  
Sub Prev_OnClick  
   If Not DC1.Recordset.BOF Then    ' Cannot move beyond top record.  
      DC1.Recordset.MovePrevious  
      Exit Sub  
   End If  
End Sub  
  
' Move to the last record in the bound Recordset.  
Sub Last_OnClick  
   DC1.Recordset.MoveLast  
End Sub  

関連項目

DataControl オブジェクト (RDS)
MoveFirst、MoveLast、MoveNext、および MovePrevious メソッド (RDS)