WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

Time - Timer and Date Functions
plus

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

NIST Time Retrieval

Keywords: 	 NIST Time Retrieval

;constant is used to adjust time to local time zone
;a larger constant moves time back.  A smaller constant moves time forward
;constant is in one second increments
;constant=61530354    ;Pacific Daylight time
constant=61505154    ;GMT / UTC time
;Generally just add or subtract multiples of 3600 til you get the time you want

AddExtender("wwwsk44i.dll")

rc=''
socket = sOpen ()
if socket != @FALSE
   status=sConnect (socket, "time.nist.gov", "37")
   if status == @TRUE
      msg=sRecvnum(socket,4)
      sClose(socket)
      msg=(msg & 2147483647) - constant   ;what a hack job...
      msg=TimeAdd("1970:01:01:00:00:00","0000:00:00:00:00:%msg%")
      Message("Server Time is",msg)
      exit
   endif
   exit
endif
exit 


Article ID:   W15724
File Created: 2007:01:29:10:01:00
Last Updated: 2007:01:29:10:01:00