前回二つのテーブルを操作する準備をしましたので、今回実際に二つのテーブルを操作する
コードを入力します。
簡単に、「サンプル」テーブルのデータを「サンプルコピー」テーブルに写すという処理です。
コードはこちら。
実際追加する部分は黄色い枠の部分です。
二つのテーブルを操作するときに、rsとrs2をどちらのテーブルを操作しているのか慎重に
考えながらコードを打ち込みます。
rs.MoveFirst →rsは「サンプル」テーブルで、「サンプル」テーブルの一番上のデータを参照
Do Until rs.EOF 「サンプル」テーブルの最後のデータまでLoopの間の処理を繰り返す。
rs2.AddNew 「サンプルコピー」テーブルに新規データを追加
rs2!データ = rs!データ
「サンプルコピー」の「データ」フィールドに「サンプル」の「データ」フィールドを代入
rs2.Update 「サンプルコピー」テーブルのデータを更新
rs.MoveNext 「サンプル」テーブルの次のデータに進む
Loop
実行前
実行後
