VBAで取得した値を更新クエリーの値にしたい

MS-Access2000を使っています。

下記の方法で、ファイルの最終保存日を取得しているのですが、その日時をクエリーを使ってデータベースに登録しようと考えています。
しかし、VBAで取得した値をどうやって、クエリーに反映させてよいか解りません。
すみませんが、方法を教えてください。よろしくお願い致します。

１：フォームに「Filename」というテキストボックスを作り、フルパスでファイル名を入力します。
２：VBAを起動して、内部で FileDateTime関数で日時を取得します。
　　　jikan = FileDateTime(Filename)
３：更新クエリーを使って、この「jikan」の値を「T_main」テーブルの「時間」という項目に登録したいのです。

3番の方法が解りません。よろしくお願い致します。

No.1 ベストアンサー 回答者： nora1962 回答日時： 2011/12/15 16:54

cCurrentDb.Execute( "Update T_ｍａｉｎ set 時間 = " & jikan & " where ファイル名 = " & Filename )

で出来ませんか。

この回答へのお礼

回答ありがとうございました。
一行でクエリーを設定することが出来るのですね。これは知りませんでしたし、とても便利です。
コピペして使ってみたのですが、エラーが出てきましてこのあたりでエラーとなると慣れていないせいか、確認に苦労しました。
結局、set 時間 = " & jikan & " のところで、set 時間 = #" & jikan & "# と「＃」でくくってやれば解決しました。
どうもありがとうございました。

お礼日時：2011/12/15 18:06

No.2 回答者： ShowMeHow 回答日時： 2011/12/15 17:09

別なテキストボックスなどに値を入れて、

更新クエリでその値を指定するという
（アクセスながらの）手もある。

この回答へのお礼

回答ありがとうございました。
この方法は使ってみたのですが、VBAが動いている途中はなぜかフォームの値を拾ってこないようです。
同じフォームにテキストボックスを作っているからでしょうか？

お礼日時：2011/12/15 18:03