CompTime （二つの時刻を比較する）

機能: 指定された二つの時刻を比較して，結果を真（True），または偽（False）で返します。

形式

CompTime ( Time1 , Comp , Time2 )

指定項目

Time1: 比較する一方の時刻を hh:mm:ss の形式で指定します。; hhに不正な値を指定した場合はエラーになりますが，mmとssに不正な値を指定した場合はエラーになりません。実在する時刻に置き換えます。; 例えば，19:00:65（実在しない時刻）を指定した場合，19:01:05（実在する時刻）と置き換えます。

Comp

比較方法を指定します。

この値は，次のどれかになります。

値	意味
Equal	等しい（ = ）
NotEqual	等しくない（ <> ）
Before	Time1より，Time2の方が前の時刻である（ > ）
After	Time1より，Time2の方が後の時刻である（ < ）

Time2: 比較するもう一方の日付を hh:mm:ss の形式で指定します。; mmとssに不正な値を指定した場合は，実在する時刻に置き換えます。

説明: 二つの時刻をCompで指定された方法で比較し，結果をコマンドの実行結果として返します。比較結果がCompで指定された値と一致する場合は真（True）を，それ以外の場合は偽（False）を返します。; エラーが発生した場合は，長さ0の文字列（""）を返します。

例

' 作成時間が今日の午前中のファイルを削除する。
Dim  fileName ,creDate ,creTime
 
For  fileName = _TEMP_+"*.*"  Do
  GetFileTime ( _TEMP_+fileName ,creDate ,creTime ,Create )
  If  CompDate ( creDate ,Equal ,Date() )  Then
    If  CompTime ( creTime ,After ,"12:00:00" ) = True  Then
      DeleteFile ( _TEMP_+fileName )
    End If
  End If
End For

対象バージョン: JP1/Script 05-20以降

8.4.14 CompTime （二つの時刻を比較する）

8.4.14　CompTime （二つの時刻を比較する）