IsNew(ファイル日付の新旧を比較する)
機能
二つのファイルのファイル日付の新旧を比較し,結果を真(True)か偽(False)で返します。
形式
IsNew ( PathName1 , PathName2 〔, Option〕 )
指定項目
PathName1
比較する一方のファイルのフルパスを文字列,または値を格納した変数名で指定します。
PathName2
比較するもう一方のファイルのフルパスを文字列,または値を格納した変数名で指定します。
Option
このオプションには次の値を指定します。省略した場合は,FileTimeを仮定します。
値 | 意味 |
---|---|
FileTime | ファイル日付だけで比較します。 |
説明
二つのファイルの日付の新旧を比較し,PathName1で指定したファイルがPathName2で指定したファイルよりも新しい場合は真(True)を,古い,または等しい場合は偽(False)を,コマンドの実行結果として返します。
エラーが発生した場合は,長さ0の文字列("")を返します。
例
'_SCF_+/TEST.SPTファイルと/WORK/TEST.SPTファイルの更新日付をチェックして,
'_SCF_+/TEST.SPTファイルが新しい場合は,/WORK/TEST.SPTファイルをコピーする。
Dim file1 ,file2
file1 = _SCF_+"TEST.SPT"
file2 = "/WORK/TEST.SPT"
If IsNew(file1 ,file2) = False Then
' 古いファイルに戻す
Copy(file2 ,file1)
End