让系统时钟与百度同步—爱百度就与百度心连心

 时间:2024-10-23 06:30:09

亲爱的朋友,您的电脑时钟是标准的北京时间吗?还是石家庄时间或是天津时间呢?玩秒购总是慢半拍一般不是因为您动作慢,而往往是您的电脑时钟不够精准。现在请跟我来一起动手,用Excel做一个时钟校对工具,让您的电脑时钟与百度同步。很简单的,动手就好!

让系统时钟与百度同步—爱百度就与百度心连心

工具/原料

Excel

VBA

方法/步骤

1、为什么要用百度时钟为什献垴淄睬么玩秒购总是慢半拍呢?不是设置了“自动与Internet时间服务器同步”吗?请听我再啰嗦几句。国外的时间服务器本身没有问题,骠雪餐豺准得不得了,问题是,那是人家得东西,服务器架设在欧美,离我们远了去了,绕过99道弯到达我们电脑早绕晕了还能准吗?再看我们的百度,服务器布满全国,您ping一下“www.baidu.com”,时延几ms,就像是隔壁的网关服务器一样。时延没有问题,时钟的准确度更不必怀疑,巨大的数据量往来调度没有一个精准的时钟是玩不转的,对百度老大还不放心吗?

让系统时钟与百度同步—爱百度就与百度心连心

2、动手做吧!新建一个Excel文件改名为“百度时钟校对.xls”将其打开-->Alt+F11打开VBA窗口-->双击工程窗口的“ThisWorkbook”对象-->选择Workbook_Opne事件。

让系统时钟与百度同步—爱百度就与百度心连心

3、在“ThisWorkbook”的代码窗口中输入下面的代码:PrivateSub掳姗浚瑙Workbook_Open()Application.Visible=FalseD足毂忍珩imXMLobjAsObjectDimDateS,DAsStringDimDateSysAsDateOnErrorGoTojsSetXMLobj=CreateObject("Microsoft.XMLHTTP")RandomizeXMLobj.Open"Get","http://www.baidu.com?n=33&Refresh="&Rnd,FalseXMLobj.sEnd""DateS=XMLobj.getResponseHeader("Date")SetXMLobj=NothingD=Mid(DateS,6,20)DateSys=CDate(D)+8/24Date=DateSysTime=DateSysMsgBox"时钟校对成功!当前时间:"&DateSysApplication.DisplayAlerts=FalseApplication.QuitApplication.DisplayAlerts=TrueApplication.Visible=Truejs:EndSub

4、按F5运行一下试试。没问题吧!存盘退出吧!一个时钟校对工具做好了!

让系统时钟与百度同步—爱百度就与百度心连心

5、现在我们把这个小工具放在开机启动栏目里,让电脑每次启动的时候自动校对系统时间与百度同步。1.右击”百度时钟校对.xls“-->发送到-->桌面快捷方式。2.随便打开一个窗口,在地址栏输入一下内容:C:\DocumentsandSettings\Administrator\「开始」菜单\程序\启动3.将快捷方式复制到启动文件夹。

让系统时钟与百度同步—爱百度就与百度心连心

让系统时钟与百度同步—爱百度就与百度心连心

6、OK!竣工大吉!重启一下电脑试试吧!现在您的电脑时钟与百度同步——爱百度就与百度心连心!

让系统时钟与百度同步—爱百度就与百度心连心

sqlserver2008 win10不兼容? 在哪里将其他人添加到这台电脑 打包exe程序变成MSI文件进行域策略推送 Oracle VM VirtualBox怎么让网络断开 微软Excel技巧:[2]双击XLS/XLSX文件无法打开
热门搜索
少女漫画邪恶漫画 日本动漫图片 钩机图片 张馨予性感图片 阿娇艳照门图片