CSVのファイルの内容をMDBにしゅつりょくするには？ (ID:109088)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 ありがとうございます。 実は、CSVファイルから各項目の値を変数に読み取ることがあまりよくわかっていないですね。 CSVの各項目の値を読み取るためのコードが浮かばなくて苦労しています。 CSVにMDBのテーブルのレコードを出力するコードを作成してみました。 Option Explicit Dim Cn As New ADODB.Connection Private Sub CmdGO_Click() Dim StrSQ As String ' Eドライブの\練習問題\example12\db1.mdbのMDBファイルをオープン Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=E:\練習問題\example12\db1.mdb" ' CドライブのDocuments and Settings\All Users\NewProduct\Output.XLSのSheet1に成績トランのテーブルの内容を出力する。 StrSQ = "SELECT 学籍番号,得点 INTO " & _ "[Excel 8.0;Database=C:\Documents and Settings\All Users\NewProduct\Output.XLS].[Sheet1] " & _ "FROM 成績トラン" ' エクスポートを行う Cn.Execute StrSQ MsgBox "エクセルファイルを作成する。" Cn.Close Set Cn = Nothing End Sub この中では、CSVファイルから各項目の値を変数に読み込む必要がなかったので、できたのですが逆にCSVからMDBのテーブルのレコードに値を出力するには どうしたらよいか疑問に思っています。 大変お手数をかけて申し訳ないのですが、もし自分の質問に付き合ってくださるのならCSVファイルからどうやって各項目の値を取得するのか 教えていただけると非常にありがたいです。