こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

VBScriptでCSVファイルのデータ取得

VBScriptで、ADOを使ってCSVファイルのデータを読み込みたいのですが、
うまういきません。

CSVファイル(Data.csv)の内容は下記です。

item1,item2
AA1,BB1
AA2,BB2
AA3,BB3

プログラムの内容は、下記です。

'ADOオブジェクトを作成
Set objADO = CreateObject("ADODB.Connection")

'ADOを使いCSVファイルを扱う準備(オープン)を行う
objADO.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
"DBQ=C:\Documents and Settings\houjyou-n\デスクトップ;" & _
"ReadOnly=1"

'SQLを実行し、当該タスクのデータを抽出します
Set objRS = objADO.Execute("select * from Data.csv where item1 = 'AA3'")

If Not objRS.Eof Then
If objRS("item2") = "BB3" Then
Flg = True
End If
End If

'レコードセットをクローズobjRS.Close
objRS.Close

'ADOオブジェクトをクローズ
objADO.Close

実行すると、「オブジェクト'Data.csv'が見つかりませんでした。オブジェクトが存在していること、名前やパス名が正しいことを確認してください。」というエラーが出ます。

パスもファイル名も間違っていないのですが、何がいけないのでしょうか。

手がかりになることがあれば、何でも教えていただければ幸いです。

投稿日時 - 2012-06-21 08:10:21

QNo.7545912

すぐに回答ほしいです

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

オイラ、VBS使ったことないし、ADOでCSV暑かったこともないから、はずしているかもしれないけど、
DBQ=C:\Documents and Settings\houjyou-n\デスクトップ
の最後に\が足りないとか。

投稿日時 - 2012-06-21 08:39:53

お礼

アドバイス、ありがとうございました。

私の単純なミスが原因でした。
Data.csv を作ったはずが、Data.csv.txtとなっていました。
拡張子を表示しない設定になっていたため、なかなか分かりませんでした。

大変お騒がせしました。

投稿日時 - 2012-06-21 11:51:22

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問