Set
oWSH
=
CreateObject
(
"
WScript.Shell
"
)
oWSH.Run " RunDLL32 shell32.dll,Control_RunDLL %SystemRoot%\system32\TIMEDATE.cpl,,/Z China Standard Time " , 0 , True
oWSH.Run " RunDLL32 shell32.dll,Control_RunDLL %SystemRoot%\system32\TIMEDATE.cpl,,/Z China Standard Time " , 0 , True