vbsで日付時間の取得
vbsで、年日付を8桁、時間を6桁で取得するときに便利。
Dim ymdhms
Dim yyyy
Dim mmdd
Dim hhmmss
----- べんりあつめ。-----
yyyy = Year(Now())
mmdd = Right("0" & Month(Now()) , 2) & Right("0" & Day(Now()) , 2)
hhmmss = Right("0" & Hour(Now()) , 2) & Right("0" & Minute(Now()) , 2) & Right("0" & Second(Now()) , 2)
ymdhms = yyyy & mmdd & "_" & hhmmss
MsgBox ymdhms