SubtractDate関数No.02941
秀まるお さん 11/05/19 10:32
 
 会議室に書いておかないと忘れてしまうかもしれないので一応書いておきます。

 tkinfo.dllにSubtractDateって関数を追加します。

    loaddll "tkinfo.dll";
    $today = dllfuncstr("CurrentDate");
    $date = dllfuncstr("GetMailTransmitDate");
    #day = dllfunc("SubtractDate", $today, $date);
    message "このメールは" + str(#day) + "日前に受信したメールです。";

    #hour = dllfunc("SubtractDate", $today, $date, "hour");
    #minute = dllfunc("SubtractDate", $today, $date, "minute") % 60;
    #second = dllfunc("SubtractDate", $today, $date, "second") % 60;
    message "このメールは" + str(#hour) + "時間" + str(#minute) + "分"
              + str(#second) + "秒前に受信したメールです。";

[ ]