投稿日 | : 2007/04/19(Thu) 16:08 |
投稿者 | : ひろ |
Eメール | : |
URL | : |
タイトル | : 約○○件中 ○〜○件を表示2 |
お世話になっております。前スレが長くなってしまったので新しく立てます。すみません。。
現在ADOと接続をした後、以下のようにしています。
a = "1"
'表示する内容をグリッドに表示
Adodc1.CommandType = adCmdText
'Adodc1.RecordSource = " select * from "
Adodc1.RecordSource = " select * from ( " & _
" select row_number() over (order by NUM desc) NO, CODE " & _
" , NAME, NUM , YEAR, TERM, REG_DAY, UPDATE_DAY from test order by NUM " & _
" ) where NO >= " & a & " and NO <= " & a + 19
'レコードセットを更新する
Adodc1.Refresh
'ADOのレコードソースをデータグリッドコントロールに連結する
Set DataGrid1.DataSource = Adodc1.Recordset
フォームロード時に1〜20件を表示しています。
変数「a」に同じフォームにあるコマンドボタンを押すことによってプラス20ずつして表示
出来たらと思うのですが、コマンドボタンのコードがうまく書けない状態です。
どのようにしたら、うまく「a」に変数が入るのでしょうか?