• ベストアンサー

VB2005を使ってACCESSのテーブルを別のデータベースにエクスポートさせるには?

例えば、VB2005を使ってACCESSのA.mdbにあるテーブルをB.mdbにエクスポートさせるには、どのようなプログラムを書けば良いのでしょうか? ちなみに、ACCESSのテーブルをデータセットに取得して、別のテーブルに書き込むと言うようなものを書いて見ましたが、処理が非常に遅いので使えませんでした。

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

  • ベストアンサー
回答No.1

動作確認していないので参考までに・・・ Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; C:\A.mdb") Dim cmd As OleDbCommand = cn.CreateCommand Dim strSQL As String strSQL = "select * into [;database=C:\B.mdb].[B.mdbに追加するテーブル名] FROM [エクスポートさせるテーブル名]" cmd.CommandText = (strSQL) cn.Open() cmd.ExecuteNonQuery() cn.Close() 頑張ってください。

holy2002jp
質問者

お礼

CELSIOR_2005 様 早速ご教示頂いてありがとうございました。少しだけ手直しさせて頂きましたが、無事動作しました。 本当にありがとうございました。

関連するQ&A

  • テーブルデータのエクスポートについて

    質問です。 VBAで、Access2003をSQL,DAOで操作しようとしています。 a.mdbのテーブルデータを、b.mdbのテーブルにエクスポートしたいのですが、やり方がわからず困っています。 ちなみに私はVBA未経験で、1週間前からVBAを使っています。 すみませんが、データを含めてエクスポートする方法を教えてください。

  • VBAでAccessのテーブルのエクスポート・インポートをするには。

    すみませんが、教えてください。 Excel+VBAで、AccessをSQL,ADO,ADOXで操作しようとしています。 a.mdbのテーブルを、b.mdbに、エクスポート(インポート)したいのですが、やり方がわからず困っています。 すみませんが、テーブル構造のみをエクスポートする方法、データを含めてエクスポートする方法を教えてください。

  • テーブルのエクスポート

    Accsess2000でカレントmdbのテーブルを別mdbにエクスポート しようとしてます。 TransferDatabaseメソッドを使うと、エクスポート先にリンク されている状態にはなりますが、実テーブルが作られる訳では ないようですね。 実テーブルをエクスポートするにはどうするのがいいのでしょ うか?

  • VBの質問です

    VB6を使って開発をしています。 AとB2つのMDBがあってAの全テーブルのデータをBの全テーブルにデータをコピーしたいのですがプログラムでどうやるのかがわかりません。 どなたかわかるかた私に教えてください。お願いします。

  • vbでのインポートエクスポート

    初めて質問します。 vb6を使ってボタンを押したならばマイドキュメントに保存されているexcel2000(例えばbk1.xls)のsheet1を同じくマイドキュメントに存在するaccess2000(例えば、db1.mdb)のテーブルにインサートしたいのです。 とくにexcelのデータ範囲を指定しないでもsheet1に作ったリストをaccessにエクスポートすることは可能でしょうか? どなたかご教授下さい。 pcはwindowsxpを使っています。 よろしくお願いします。

  • Access2.0、テーブルのエクスポート

    Access2.0のテーブルをWSHを使用してエクスポートしようとすると エラーとなってしまいます。 エラーメッセージは、以下のとおりです。 以前のバージョンのMicrosoft Accessデータベースにオブジェクトをインポートすることはできません。 以下に、コードを抜粋します。 Dim strName Dim objAccess Dim objDB Dim tbf Set objAccess = CreateObject("Access.Application") objAccess.Visible = False objAccess.OpenCurrentDatabase("c:\****.mdb") Set objDB = objAccess.CurrentDb objAccess.Docmd.TransferText 0,,"テーブル名","C:\****.txt" → ここで、エラーとなります。 どなたか、テーブルをエクスポートする方法を知ってる方、いらっしゃいませんか?

  • VB6.0でACCESSのコマンドを実行するには?

    教えてください。よろしくお願いします。 VB6.0のプログラムからACCESSに文字データを渡し、それをキーにしてACCESSのテーブルから該当するデータをACCESSのテキストボックスに表示させたいのですが、検索・表示のプログラムはACCESSで記述ずみですので、VBからは引数を渡して、ACCESS側のVBAのプログラムを実行させたいのです。 その際、ACCESSの引数を渡すMDBが起動していなかったら、起動させて、上記の処理をさせたいのですが。 分かりづらい文章で申し訳ありませんが、どなたかアドバイスをお願い致します。

  • VB6からAccess2000のテーブル使用

    今、VB6からAccess2000のテーブルを参照、変更する処理を作っています。 で、データが20MB(最適化済)くらいになり、コネクションを確立するのに時間がかかります。 何か処理が早くなる方法は無いでしょうか? Public cnn_MASTER As New ADODB.Connection 'コネクション Public rec_MASTER As New ADODB.Recordset 'レコードセット SUB mdb_syori()  MY_PATH = app.path  MDB_MASTER = "\AA.mdb"  TBL_MASTER = "Table1"     'ここの処理が遅い  cnn_MASTER.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _       "Data Source=" & MY_PATH & "\DATA" & MDB_MASTER & ";"  sqlCODE = "SELECT * from " & TBL_MASTER  rec_MASTER.Open sqlCODE, cnn_MASTER, adOpenKeyset, adLockOptimistic      ・      ・      ・

  • Accessでテーブルのデータのみをエクスポートするには?

    Access2000で、カレントDBのあるテーブルから別DBのあるテーブルへ、データをエクスポートしたいと思っています。 "TransferDatabase"アクションでやってみたところ、テーブルがまるごと書き換わってしまいダメでした。 "TransferText"アクションで出力してから読み込んでもいいのですが、 出力した後のエクスポート先のテーブルは別のDBなので方法(※)はあるのかもしれませんが、難しそうです。 もっと簡単に別DBの別テーブルにデータだけエクスポートする方法はないのでしょうか? もしないのでしたら※の方法(あるDBから別のDBを操作する方法)を教えて下さい。 ヒントだけでも結構ですので、どなたかお教え頂ければ幸いです。よろしくお願いします。m(_ _)m

  • Accessのテーブルへのデータインポートについて

    Accessのテーブルへのデータインポートについて Access2002で、A.mdbのTESTテーブルからB.mdbのTESTテーブル(構造は同じ)へテーブルデータをインポートしたいのです。 TESTテーブルの主キーはSEQ(オートナンバー)しかありません。 そのときに、コピー元とコピー先の主キーに重複があった場合、オートナンバーなので自動で再付番しデータが追加して欲しかったのですが、 Accessの機能のエクスポート、インポートでは、コピー先に主キーに重複があったデータは上書きされてしまいます。 テーブルを開き、データをコピー&ペーストしますと、ペーストしたときにオートナンバーで自動で再付番されます。 この方法でもいいのですが、データが数百万件あるので、現実的ではありません。 Accessのインポート・エクスポートで、オートナンバーで主キーを再付番してから、B.mdbのTESTテーブルにデータ追加する方法はないでしょうか? よろしくお願いいたします。

専門家に質問してみよう