Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


10207 / 13644 ツリー ←次へ | 前へ→

【23061】DAOによるDB接続方法 キョロちゃん 05/3/11(金) 17:43 質問[未読]
【23063】Re:DAOによるDB接続方法 IROC 05/3/11(金) 18:26 回答[未読]
【23065】Re:DAOによるDB接続方法 Kein 05/3/11(金) 22:55 回答[未読]
【23116】Re:DAOによるDB接続方法 キョロちゃん 05/3/14(月) 11:42 お礼[未読]

【23061】DAOによるDB接続方法
質問  キョロちゃん  - 05/3/11(金) 17:43 -

引用なし
パスワード
   ExcelVBAでACCESS内に新規のテーブルを作るSQL文を投げたいのですが、
ACCESSのDAO接続の方法がわかりません。
ご存知の方がいたら教えてください。

【バージョン】
Excel2000
ACCESS2000

【23063】Re:DAOによるDB接続方法
回答  IROC  - 05/3/11(金) 18:26 -

引用なし
パスワード
   検索すれば見つかりますよ。

http://www.asahi-net.or.jp/~EI7M-WKT/hattn343.htm

【23065】Re:DAOによるDB接続方法
回答  Kein  - 05/3/11(金) 22:55 -

引用なし
パスワード
   SQLでなく、DAOのメソッドを使っても出来ます。以下はヘルプから引用した
CreateTableDefメソッドの例文です。

次の例では、BIBLIO.MDB データベースに TableDef オブジェクトを新しく作成します。

Dim tdfTitleDetail As TableDef, fldComments As Field
Dim dbsBiblio As Database
Set dbsBiblio = DBEngine.Workspaces(0).OpenDatabase("BIBLIO.MDB")
' TableDef オブジェクトを新しく作成します。
Set tdfTitleDetail = dbsBiblio.CreateTableDef("書籍の詳細")
' tdfTitleDetail にフィールドを追加します。
Set fldComments = tdfTitleDetail.CreateField("コメント",dbMemo)
tdfTitleDetail.Fields.Append fldComments
' TableDefs コレクションに追加し、TableDef オブジェクトの定義を保存します。

dbsBiblio.TableDefs.Append tdfTitleDetail

【23116】Re:DAOによるDB接続方法
お礼  キョロちゃん  - 05/3/14(月) 11:42 -

引用なし
パスワード
   >IROCさん、Keinさん

IROCさんに教えて頂いたサイトもKeinさんと同じく
DAOのメソッドによるテーブル作成のようですが、
そもそもCreate文をなげないと実現できないと思っていましたので、
勉強になりました。

ご教示ありがとうございました。

10207 / 13644 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free