以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]请教有点甜老师关于互联网时间和access服务器的时间问题!  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=44429)

--  作者:ericsky
--  发布时间:2013/12/30 20:16:00
--  [求助]请教有点甜老师关于互联网时间和access服务器的时间问题!
有点甜老师,搜索论坛获得您关于抓取互联网时间和服务器时间的回帖,现请教

一、我将抓取互联网时间的代码打包函数,放在afteropenproject中,有时间会报错,报错如图:
 


此主题相关图片如下:未命名.bmp
按此在新窗口浏览图片

 

请教,是什么原因,我该如何正确设置?

 

二、关于抓取access 所在的电脑的时间代码


Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "Select now"
Dim dcurr As Date = cmd.ExecuteScalar
Today = dcurr \'将得到的时间写入本机电脑
TimeOfDay = dcurr

 

我运行后获得的时间任然是本机的时间,不是access文件所在的电脑的时间,

有没有方法获得access电脑的时间?

 

以上请指教,多谢!!!


--  作者:有点甜
--  发布时间:2013/12/30 20:19:00
--  
 获取网络时间,参考


--  作者:有点甜
--  发布时间:2013/12/30 20:30:00
--  
 获取局域网电脑时间,如下

shell("net time \\\\192.168.1.119 > d:\\date.txt")

[此贴子已经被作者于2013-12-30 20:30:35编辑过]

--  作者:ericsky
--  发布时间:2013/12/30 20:38:00
--  

谢谢回复!!

比较一下,好像上面的代码少用了一个timeserver。

 

第二个问能不能也帮忙回复一下?

 


--  作者:ericsky
--  发布时间:2013/12/30 21:04:00
--  

甜老师,互联网时间还是会报错,如图,看来此路不通。多谢老师帮忙!!

 


图片点击可在新窗口打开查看此主题相关图片如下:未命名2.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2013/12/30 21:04:00
--  
 第二个问题,无法通过access获取时间的,只能用命令去获取。

 通过局域网的ip地址或者机器名,可以获取,在狐表里这样写,得到的内容保存到txt文件里,然后你打开这个文件去读取。

shell("net time \\\\192.168.1.119 > d:\\date.txt")
 
 又或者,这样写,设置你本机的时间等于119那台电脑的时间,然后获取本机的时间,就行了

 shell("net time \\\\192.168.1.119 /set /yes")