我要评论例如下面的代码在当前时间返回：1368299689
option explicit
dim dtmdate
if wscript.arguments.named.count > 0 then syntax
with wscript.arguments.unnamed
' check command line arguments
if .count = 0 then dtmdate = now
if .count > 0 then dtmdate = .item(0)
if .count > 1 then dtmdate = dtmdate & " " & .item(1)
if .count > 2 then dtmdate = dtmdate & " " & .item(2)
if .count > 3 then syntax
on error resume next
dtmdate = cdate( dtmdate )
if err then
on error goto 0
syntax
end if
on error goto 0
if not isdate( dtmdate ) then syntax
end with
' calculate and display the result
wscript.echo datediff( "s", "1970-01-01 00:00:00", dtmdate )
sub syntax
wscript.echo vbcrlf _
& "date2utc.vbs, version 1.00" _
& vbcrlf _
& "convert any date/time to unix time (utc)" _
& vbcrlf & vbcrlf _
& "usage: cscript.exe //nologo date2utc.vbs date [ time ]" _
& vbcrlf & vbcrlf _
& "where: ""date"" is the date to convert (default: current date/time)" _
& vbcrlf _
& " ""time"" is the optional time to convert" _
& vbcrlf & vbcrlf _
& "notes: though often called utc, unix time does not take into account leap" _
& vbcrlf _
& " seconds, while ""official"" utc does." _
& vbcrlf _
& " if the specified date is ambiguous, the current user's date" _
& vbcrlf _
& " and time format is assumed." _
& vbcrlf & vbcrlf _
& "written by rob van der woude" _
& vbcrlf _
& "http://www.robvanderwoude.com"
wscript.quit 1
end sub
以上所述就是本文的全部内容了，希望大家能够喜欢。
发表评论