日付の取得 の変更点

• 追加された行はこの色です。
• 削除された行はこの色です。
• 日付の取得 へ行く。
• 日付の取得 の差分を削除

**日付の取得 [#e23ddfab]
-現在の日付を取得~
以下で取得した場合、1桁目が0の場合は表示されない。(1月1日の場合、YYYYMDとなる)

 strDate = Now()

-指定したフォーマットで取得
-指定したフォーマットで取得~
常にYYYYMMDDにて日付を取得する場合は以下とする

 strDate = year(now()) & Right(00 & month(now()), 2) & Right(00 & day(now()), 2)

-時間も含めて取得する

 strDate = year(now()) & Right(00 & month(now()), 2) & Right(00 & day(now()), 2) & Right(00 & Hour(now()), 2) & Right(00 & Minute(now()), 2)

-過去の時間を取得する(1分前の値を取得)
-過去の時間を取得する(1分前の値を取得)~
取得した今日の日時より-n日/時/分することで過去の値を取得する。

 yDate = year(now())
 moDate = Right(00 & Month(now()), 2)
 daDate = Right(00 & Day(now()), 2)
 hoDate = Right(00 & Hour(now()), 2)
 miDate = Right(00 & Minute(now()), 2)
  
 if miDate = 00 then
   hoDate = Right(00 & Hour(now()), 2) -1
   miDate = "59"
 else
   miDate = Right(00 & Minute(now()), 2) -1
 end if
 
 strDate = yDate & moDate & daDate & hoDate & miDate