IsNew ( PathName1 , PathName2 〔, Option〕 )
値 | 意味 |
---|---|
Version | バージョン情報だけで比較します。 |
FileTime | ファイル日付だけで比較します。 |
' file1とfile2のファイルバージョン情報を比較して,
' file1がfile2より新しい場合,file2のファイルに戻す。
Dim file1 ,file2
file1 = _SCF_+"TEST.SPT"
file2 = "C:¥BKUP¥TEST.SPT"
If IsNew ( file1 ,file2 ) = False Then
Copy ( file2 ,file1 )
End