JP1/Script(Windows(R)用)
CompDate ( Date1 , Comp , Date2 )
値 | 意味 |
---|---|
Equal | 等しい( = ) |
NotEqual | 等しくない( < > ) |
Before | Date1より,Date2の方が前の日付である( > ) |
After | Date1より,Date2の方が後の日付である( < ) |
' 30日以上前に作成された一時フォルダ下のファイルを削除する。 Dim fileName ,delDate ,creDate delDate = CalcDate ( Date() ,Minus ,0 ,0 ,29 ) For fileName = _TEMP_+"*.*" Do GetFileTime ( _TEMP_+fileName ,creDate , ,Create ) If CompDate ( creDate ,After ,deldate ) = True Then DeleteFile ( _TEMP_+fileName ) End If End For
Copyright (C) 2012, Hitachi, Ltd.
Copyright (C) 2012, Hitachi Solutions, Ltd.