VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2002/09/11(Wed) 13:18
投稿者とろ
Eメール
URL
タイトルRe: MDBファイルとCSVファイル

DAO を使って、 csv ファイルから mdb にインポート/エクスポートする方法

D:\SubDir\Sample.csv のデータを
D:\SubDir\Sample.mdb に TableMDB というテーブル名で
インポート/エクスポートする場合は、
  Dim db As DAO.Database
  Set db = DBEngine.Workspaces(0).OpenDatabase("D:\SubDir\Sample.mdb")
  db.Execute "select * into TableMDB from [Text;database=D:\SubDir].[Sample.csv]"
のような感じ。

※ csv から mdb にインポート/エクスポートする場合は、
   Schema.ini というファイルを前もって作成しておかないと、
   mdb 側でのテーブル構造が変わってしまう場合があります。
   (データが途中で切れてしまったりとか...)

Schema.ini は、例えばこんな感じ。
[Sample.csv]
ColNameHeader = True
CharacterSet = OEM
Format = CSVDelimited
Col1=日付 Char Width 255
Col2=データ1 Char Width 1
Col3=データ2 Char Width 255


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -