与服务器进行时间同步,这个思路不知道有没有发过(毫秒级)

醉看ジ笑红颜づ

  

变量名	类 型	静态	数组	备 注
http	_WinHttp
r	文本型
gettime	整数型
time	整数型
修改的时间	日期时间型
取回的时间	日期时间型

gettime ＝ 取启动时间 ()  ' 开始取出服务器时间 这里我们记录一下 从什么时间开始取的
http.访问 (url, , , , , , , , r)  ' 我测试的网址耗时是78毫秒
修改的时间 ＝ 增减时间 (取回的时间, #秒, 1)  ' 在取回时间的基础上增减一秒
' 那么1秒=1000毫秒
' 这里取出他从服务器上返回的秒数
' 那么就是
' -------------------分割线内代码运行速度是是0毫秒 不必在意
gettime ＝ 取启动时间 () － gettime  ' 这里取出返回时间的相差值 那么他从服务器出来到这 是相差这么多毫秒的
time ＝ 1000 － gettime  ' 那么这个值就是距离下一秒还有多久
' ----------------------------------------------------------------------
' 这样就能精准延时了。
程序.延时 (time, 0)  ' N/A 那这里我们等待下一秒的到来
' 到这里就可以
置现行时间 (修改的时间)
' 完美同步 0毫秒相差

.版本 2<br /> <br /> .局部变量 http, _WinHttp<br /> .局部变量 r, 文本型<br /> .局部变量 gettime, 整数型<br /> .局部变量 time, 整数型<br /> .局部变量 修改的时间, 日期时间型<br /> .局部变量 取回的时间, 日期时间型<br /> <br /> gettime ＝ 取启动时间 ()  ' 开始取出服务器时间 这里我们记录一下 从什么时间开始取的<br /> <br /> http.访问 (url, , , , , , , , r)  ' 我测试的网址耗时是78毫秒<br /> <br /> <br /> 修改的时间 ＝ 增减时间 (取回的时间, #秒, 1)  ' 在取回时间的基础上增减一秒<br /> <br /> ' 那么1秒=1000毫秒<br /> ' 这里取出他从服务器上返回的秒数<br /> ' 那么就是<br /> ' -------------------分割线内代码运行速度是是0毫秒 不必在意<br /> gettime ＝ 取启动时间 () － gettime  ' 这里取出返回时间的相差值 那么他从服务器出来到这 是相差这么多毫秒的<br /> time ＝ 1000 － gettime  ' 那么这个值就是距离下一秒还有多久<br /> ' ----------------------------------------------------------------------<br /> ' 这样就能精准延时了。<br /> <br /> 程序.延时 (time, 0)  ' N/A 那这里我们等待下一秒的到来<br /> <br /> <br /> ' 到这里就可以<br /> 置现行时间 (修改的时间)<br /> ' 完美同步 0毫秒相差

welking

这个写法可以！！！

LK1266

我也要这个

qw584421266

这写法 绝对不能精准毫秒~
这个 1000-消耗时间 很有问题~
应该需要 多次访问 对比服务器时间是不是最新的 才可以这样吧？

俗者

手机可以同步么

俗者

手机能同步么

专注研究

{:4_272:}{:4_272:}

liuxin5163

这个思路多少年前就有了，取指定服务器时间嘛

1257628228

じ软件接单ジ 发表于 2016-8-25 00:27
有个问题，取回的时间变量是在哪里赋值的，取回完整的协yi头里提取的么，看了好久，你这写的有点乱啊，

这个是可以取出来，我觉得问题是，比如我第一次这样设置，访问URL的到得到返回的时间为600ms。那么我设置了，等于就是本机时间提前600ms。。第二次访问URL的时间可能是100ms也可能是900。这样怎么会跟服务器时间完全一样呢。。如果访问URL的时间大于1秒，那么time=1000- 访问用了多久的时间，就是负数了。。我觉得如果用ping他服务器IP的延时，比较更准确一点，但是也避免不了每次延时的变动，所以我觉得取HTTP返回协yi头的DATA值精确到秒是可以的，精确到毫秒这样的代码确实无法实现

Nice回忆

源码源码源码！！！！我没看见

王哥666

感谢分享，很给力！