以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  Date.Today获取的是网络时间,还是本地计算机时间  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109221)
--  作者：李小胖
--  发布时间：2017/11/7 10:45:00
--  Date.Today获取的是网络时间,还是本地计算机时间
Date.Today获取的是网络时间,还是本地计算机时间
--  作者：有点蓝
--  发布时间：2017/11/7 11:53:00
--  
本地计算机时间
--  作者：有点甜
--  发布时间：2017/11/7 12:09:00
--  

 获取网络时间，参考

 

Dim url As String = "http://api.k780.com:88/?app=life.time&appkey=10003&sign=b59bc3ef6191eb9f747dd4e83c99f2a4&format=json"
Dim hc As New HttpClient(url)
Dim str As String = hc.GetData()
Output.Show(str)

Dim jo As JObject = JObject.Parse(str)

Dim d As Date = jo("result")("datetime_1")
msgbox(d)
--  作者：jeffic
--  发布时间：2018/10/30 21:28:00
--  

感谢感谢！蓝老师