home‎ > ‎news‎ > ‎

20200414

2020/04/13 16:55 に joymate tomida が投稿
ファイル:mail_template3.fp7
スクリプト:__ヘッダーの日付変換

メールヘッダーの日付が不正な場合、無限ループになるのを修正。
Exit Loop If [$n>$MAX] を追加。

変数を設定 [ $dateValue; 値:Substitute ( Mail_template3::Date ; " "; ¶ ) ]
If [ IsEmpty ( $dateValue ) ]
現在のスクリプト終了 [ ]
End If
変数を設定 [ $max; 値:ValueCount ( $dateValue ) ]
#
変数を設定 [ $n; 値:1 ]
Loop
Exit Loop If [$n>$MAX]
変数を設定 [ $M; 値:GetValue( $dateValue ; $n ) ]
変数を設定 [ $M; 値:Case ( $M= "Jan"; 1 ; $M= "feb"; 2 ; $M= "Mar"; 3 ; $M= "Apr"; 4 ; $M= "May"; 5 ; $M= "Jun"; 6 ; $M= "Jul"; 7 ; $M= "Aug"; 8 ; $M= "Sep"; 9 ; $M= "oct" ; 10 ; $M= "Nov" ; 11 ; $M= "Dec" ; 12 ; "" ) /* 月 英語 略称 1月 January Jan. 2月 February Feb. 3月 March Mar. 4月 April Apr. 5月 May May 6月 June Jun. 7月 July Jul. 8月 August Aug. 9月 September Sep. 10月 October Oct. 11月 November Nov. 12月 December Dec. */ ]
Exit Loop If [ $M ]
変数を設定 [ $n; 値:$n+1 ]
End Loop
#
変数を設定 [ $D; 値:GetValue( $dateValue ; $n -1) ]
変数を設定 [ $Y; 値:GetValue( $dateValue ; $n+1 ) ]
変数を設定 [ $date; 値:Date ( $M ; $D ; $Y ) ]
#
// 変数を設定 [ $time; 値:iill_rxRegexMatch( "(2[0-3]|[01]?[0-9]):[0-5][0-9]:[0-5][0-9]" ; $dateValue ) ]
変数を設定 [ $time; 値:GetValue( $dateValue ; $n+2 ) ]
フィールド設定 [ Mail_template3::Date_タイムスタンプ; Timestamp ( $date ; $time) ]
Comments