' Convert VT_DATE to FILETIME
' Windows NT 4.0 SP4 and later : No
Set dateTime = CreateObject("WbemScripting.SWbemDateTime")
dateTime.SetVarDate Now
WScript.Echo "Current date and time:"
WScript.Echo " VT_DATE format: " & dateTime.GetVarDate
WScript.Echo " FILETIME format: " & dateTime.GetFileTime