ファイルを読み込んで変数へ

VB初心者です。
ファイルの文字列を読み込んで、変数に格納し、SQL文のテーブル名に指定したいのですが、どうすればよいのでしょうか？
テキストから文字列を取得するところまではできたのですが、変数にもって、SQL文に組み込むことができません。実行すると「テーブル名が無効です。」とエラーになります。
どうか、皆様ご教授ください。

No.3 ベストアンサー 回答者： ttyp03 回答日時： 2005/09/06 22:58

＃１です。

ＳＱＬはＶＢではありませんので、直に書くことはできません。
String型の変数等に格納し、それをデータベースのＳＱＬ実行関数に渡します。

Dim sql as string
sql = "select A from " & srhLine
SQL実行関数( sql )

もちろん変数を介さずに直に書くことも出来ます。

SQL実行関数( "select A from " & srhLine )

この回答へのお礼

ありがとうございます。
大変助かりました。

お礼日時：2005/09/07 07:14

No.2 回答者： imogasi 回答日時： 2005/09/06 22:44

ＳＱＬ文は普通テキストです。

コマンドラインからいれるもの
アクセス（ＶＢＡ）のようにＳＱＬ文実行コマンドがあったり、
ファイルオープン時にそのＳＱＬ文を実行して開いたり
開発環境でＳＱＬ文字列を入力して実行をクリックしたり
で実行できるものを経験しました。
しかしＦＳＯの中で、ＳＱＬ文を裸で他のステートメントの中に混じらせて書けば、実行してくれることはないはずです。
ＦＳＯがＳＱＬを実行する仕様に進歩したら、
（テーブル名文字列）＝ファイルの文字列を読み込んで、変数に格納し、SQL文のテーブル名に指定
strSQL="SELECT A FROM" & （テーブル名文字列）
ＥＸＥＣＵＴＥＳＱＬ　strSQL
のようなイメージになると思いますよ。

この回答へのお礼

ありがとうございます。
初心者に分かりやすく教えていただき、
感謝しております。

お礼日時：2005/09/07 07:15

No.1 回答者： ttyp03 回答日時： 2005/09/06 19:53

まずはプログラムを提示しましょう。

この回答への補足

プログラムはこのとおりです。
Set fso = CreateObject("Scripting.FileSystemObject")
Set src = fso.GetFolder("C:\script\tips") ' 対象フォルダの指定

Set TextFile = fso.OpenTextFile(FileName) ' テキストファイルのオープン
Do Until TextFile.AtEndOfStream
tmpLine = TextFile.ReadLine ' 1行読み込み
srhLine = tmpLine
Loop

select A from srhLine ※エラー

補足日時：2005/09/06 20:42