使用VBS循环程序实现电脑时间同步

在电脑上面新建一个文本文档，然后将文本文档命名为“GetSetTime.cmd”。（文本文档后缀名“.txt”已经被改成“.cmd”）

在“GetSetTime.cmd”文件上面点击右键，选择“编辑”。

输入以下代码并进行保存。@ net use \\192.16.46.203 'Abc123456' /user:'administrator'@ net time \\192.16.46.203 /set /y

再新建一个文本文档，然后将文本文档命名为“SetTime.vbs”。（文本文档后缀名“.txt”已经被改成“.vbs”）

在“SetTime.vbs”文件上面点击右键，选择“编辑”。

输入以下代码并进行保存。on error resume nextdim a,b,mo,ho,mi,seset WSHshellA = wscript.createobject('wscript.shell')a=0do until a=11       '等到a=11时退出循环，但不会给a=11a=0wscript.sleep 3000  '延时3秒钟ho=hour(now)        '获取系统上面当前的时间 小时mi=minute(now)se=second(now)mo=ho mod 4         '取余，每隔4小时执行一次if b<>20 and mo=3 and mi=0 and se<10 then  '从3点开始，每隔4小时执行一次b=20WSHshellA.run 'cmd.exe /c D:\GetAndSetTime\GetSetTime.cmd',0end ifif b=20 and se>10 thenb=10end ifloop

检查无误后，双击“SetTime.vbs”文件进行运行，从3点开始，每隔4小时就会触发“GetSetTime.cmd”执行一次时间同步。