Ｐａｇｅ 191 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼テーブルカラム「更新日」とファイルの更新日の比較の方法は？？ デイウォーカー 03/2/7(金) 11:23 ┗Re:テーブルカラム「更新日」とファイルの更新日の比較の方法は？？ イケガミ 03/2/7(金) 12:33 ┗Re:テーブルカラム「更新日」とファイルの更新日の比較の方法は？？ デイウォーカー 03/2/10(月) 10:56 ─────────────────────────────────────── ■題名 ： テーブルカラム「更新日」とファイルの更新日の比較の方法は？？ ■名前 ： デイウォーカー ■日付 ： 03/2/7(金) 11:23 -------------------------------------------------------------------------
| 更新日テーブルに「更新日」というカラムがあり、 この「更新日」にはファイルＡの更新日が格納される。 ファイルＡは他から送られてきて、 送られてきたファイルＡの更新日と 更新日テーブルの「更新日」を比較して ファイルＡの更新日の方が新しいければファイルＡを取込む。 このような流れで処理したいのですが。。。 |
| >ファイルＡの更新日の方が新しいければファイルＡを取込む。 ファイルＡの更新日を取得する方法です。 Sub test() Dim fs, f, S Dim strFileName As String strFileName = "ファイル名" Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.getfile(strFileName) S = UCase(strFileName) & vbCrLf S = S & "作成日時: " & f.DateCreated & vbCrLf S = S & "最終アクセス日時: " & f.datelastaccessed & vbCrLf S = S & "最終更新日時: " & f.DateLastModified Debug.Print S End Sub |
| ▼イケガミ さん： どうもありがとうございました。 |