• ベストアンサー

SQLの書き方。。。

アクセスで作成したAAAというテーブルとBBBというテーブルがあります。 AAAにはVBのフォームからテキストで入力したデータが入っています。 このデータをVBのコマンドボタンでBBBのテーブルに全て移したいのですが、どのようなSQLを書けばいいのか分かりません。 もし、お分かりになる人がいたら、回答お願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • maruru01
  • ベストアンサー率51% (1179/2272)
回答No.2

こんにちは。maruru01です。 とりあえず、ADOによる方法を。 まず、参照設定で 「Microsoft ActiveX Data Objects x.x Library」(x.xはバージョン) にチェックがなかったら、チェックします。 コードは以下のとおり。 Dim cn As ADODB.Connection Dim cmd As ADODB.Command Dim SQL As String 'アクセスファイルに接続 Set cn = New ADODB.Connection cn.ConnectionString = _     "Provider = Microsoft.Jet.OLEDB.4.0;" & _     "Data Source = (アクセスファイル名フルパス)" cn.Open 'SQLステートメント SQL = "INSERT INTO BBB SELECT * FROM AAA" 'Commandオブジェクトの設定 Set cmd = New ADODB.Command cmd.ActiveConnection = cn cmd.CommandText = SQL cmd.Execute cn.Close: Set cn = Nothing 各キーワードなどはヘルプやMSDNライブラリを参照して下さい。 あと、VBでのデータベース操作に関するページを紹介しておきますので、ご覧下さい。 では。

参考URL:
http://homepage2.nifty.com/inform/vbdb/
yuana
質問者

お礼

いつもありがとうございます。 INSERT INTO BBB SELECT * FROM AAA でなんとかできるようになりました。

その他の回答 (1)

  • kumagoro-
  • ベストアンサー率57% (36/63)
回答No.1

AAAとBBBが同じレイアウトであれば INSERT INTO BBB SELECT * FROM AAA で出来るのではないでしょうか?

yuana
質問者

お礼

遅くなりましたが、解決することができました。 ありがとうございます。