admin 管理员组

文章数量: 1184232

<script>

function webTime1(){//获取网络的标准北京时间文本
var Time_Text="";
var Time_Web="";
var Time_Num=new RegExp("([0-9]{1,4})","ig");
var Time_Reg=[new RegExp("nyear=([0-9]{4})","ig"),new RegExp("nmonth=([0-9]{1,2})","ig"),new RegExp("nday=([0-9]{1,2})","ig"),new RegExp("nhrs=([0-9]{1,2})","ig"),new RegExp("nmin=([0-9]{1,2})","ig"),new RegExp("nsec=([0-9]{1,2})","ig")];
var XML=new ActiveXObject("MSXML2.XMLHTTP")

XML.open("get","",false)
XML.Send()
Time_Web=XML.responseText

for (i=0;i<3;i++) {
Time_Text=Time_Text+Time_Web.match(Time_Reg[i]).toString().match(Time_Num)
if (i<2) {
Time_Text=Time_Text+"-"
}

}

return Time_Text
}
function webTime2(){//获取网络的标准北京时间文本
var Time_Text="";
var Time_Web="";
var Time_Num=new RegExp("([0-9]{1,4})","ig");
var Time_Reg=[new RegExp("nyear=([0-9]{4})","ig"),new RegExp("nmonth=([0-9]{1,2})","ig"),new RegExp("nday=([0-9]{1,2})","ig"),new RegExp("nhrs=([0-9]{1,2})","ig"),new RegExp("nmin=([0-9]{1,2})","ig"),new RegExp("nsec=([0-9]{1,2})","ig")];
var XML=new ActiveXObject("MSXML2.XMLHTTP")

XML.open("get","",false)
XML.Send()
Time_Web=XML.responseText

for (i=3;i<Time_Reg.length;i++) {
Time_Text=Time_Text+Time_Web.match(Time_Reg[i]).toString().match(Time_Num)
if (i>2 && i<5) {
Time_Text=Time_Text+":"
}

}

return Time_Text
}
var date=webTime1();
var time=webTime2();
function settime(){
var WsShell = new ActiveXObject("WSCript.shell");
WsShell.run('cmd /c date '+date+'');
WsShell.run('cmd /c "time '+time+'');
window.close();
}
</script>
<body onload=settime()>在计划任务里设置每次登陆自动运行本程序就解决了。前提是ie要能上网。

本文标签: 京时间文 的标准北 编程