ファイルの最終アクセス時刻を取得する
Public Function fileatime(filename)
Dim f
filename = fileMapPath(filename)
set f = fso.GetFile(filename)
fileatime = f.DateLastAccessed
End Function
引数
filename = string ファイルへのパス。
戻り値
ファイルの最終アクセス時刻を返し、エラーの場合は FALSE を返します。
処理
指定したファイルの最終アクセス時刻を取得します。
File_System class内での処理