アクセス2000で、以下のようなコードを記述して、case_noのデータをファイル名としたhtmlファイルを、d:\data\のフォルダに出力するようにしています。
Open "d:\data\" & Me!case_no & ".htm" For Output As #1
 出力先のフォルダを各レコード毎ではなく、全体として任意に設定できるようにしたいと思い、フォルダ名を入力可能な管理テーブルを別途作成しました。
 この別に作成した管理テーブルのデータを、コード内で参照したいのですが、うまくいきません。どのようにすればよいのでしょうか?

このQ&Aに関連する最新のQ&A

A 回答 (1件)

えっと、フォルダ名が格納されたテーブルがあって、そのテーブルからデータを取り出したい、ってことでいいのでしょうか?



「管理テーブル」テーブルに「フォルダ名」フィールドがあって、その1レコード目のデータを取り出すには、以下のようにします。

Dim con As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strSQL As String
Dim strFolderName As String

Set con = Application.CurrentProject.Connection
strSQL = "SELECT * FROM [管理テーブル];"
Set rs = New ADODB.Recordset
rs.Open strSQL, con, adOpenKeyset

strFolderName = rs![フォルダ名]
MsgBox strFolderName
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報