已审核词条 未审核词条

子程序名	返回值类型	公开	备 注
获取北京时间EX	文本型		“2020年8月1日23时37分2秒”【已经测试过QQ：1321268454】
参数名	类 型	参考	可空	数组	备 注
补0位	逻辑型				真=“2020年08月01日23时37分02秒”，假=“2020年8月1日23时37分2秒”
调整系统时间	逻辑型				【需要管理员运行】【如执行时间过长1秒，重复获取1次或者+1秒[59秒不能是60]】

变量名	类 型	静态	数组	备 注
WinHttp	对象
script	对象
javascript	文本型
返回时间	文本型

CoInitialize (0)
如果真 (WinHttp.创建 (“Microsoft.XMLHTTP”, ))
WinHttp.方法 (“Open”, “HEAD”, “https://www.baidu.com/”, 假) ' GET/HEAD
WinHttp.方法 (“Send”, )
判断 (WinHttp.读数值属性 (“Status”, ) ＝ 200) ' 状态代码
返回时间 ＝ WinHttp.文本方法 (“GetResponseHeader”, “Date”) ' 服务器系统时间
判断 (返回时间 ＝ “”)
调试输出 (“获取北京时间EX() 服务器没有返回时间”)
script.创建 (“MSScriptControl.ScriptControl”, )
script.写属性 (“Language”, “JavaScript”) ' javascript
判断 (补0位)
javascript ＝ “function checkTime(i){if(i<10){i='0'+i}return i}function Datejs(){var d=new Date('” ＋ 返回时间 ＋ “');return d.getFullYear()+'年'+checkTime(d.getMonth()+1)+'月'+checkTime(d.getDate())+'日'+checkTime(d.getHours())+'时'+checkTime(d.getMinutes())+'分'+checkTime(d.getSeconds())+'秒';}Datejs();”
javascript ＝ “function Datejs(){var d=new Date('” ＋ 返回时间 ＋ “');return d.getFullYear()+'年'+(d.getMonth()+1)+'月'+d.getDate()+'日'+d.getHours()+'时'+d.getMinutes()+'分'+d.getSeconds()+'秒';}Datejs();”
返回时间 ＝ script.文本方法 (“Eval”, javascript)
script.清除 ()
判断 (返回时间 ＝ “”)
调试输出 (“获取北京时间EX() js获取异常”)
判断 (调整系统时间 且 置现行时间 (到时间 (返回时间)) ＝ 假)
调试输出 (“获取北京时间EX() 调整系统时间失败！”)




调试输出 (“获取北京时间EX() 网页状态代码”, WinHttp.读数值属性 (“Status”, ))
WinHttp.清除 ()
CoUninitialize ()
返回 (返回时间)

词条作者信息 使用例程 参与校正错误的易友