Foxtable(狐表)用户栏目专家坐堂 → 如何网络上的日期


  共有5779人关注过本帖树形打印复制链接

主题:如何网络上的日期

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106763 积分:543016 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/1 14:04:00 [显示全部帖子]

如果电脑可以联网,参考:
Dim htc As new HttpClient("https://www.baidu.com/")
htc.GetInformation()
htc.Close() 
Dim gmtStr As String = htc.ResponseHeaders("Date")
Output.Show(gmtStr )
Dim enUS As new System.Globalization.CultureInfo("en-US")
Dim d As Date
DateTime.TryParseExact(gmtStr, "r", enUS, System.Globalization.DateTimeStyles.AssumeLocal, d)
Output.Show(d )
d = d.AddHours(8)
Output.Show(d )

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106763 积分:543016 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/9 9:24:00 [显示全部帖子]

调用接口查询:https://www.baidu.com/s?wd=ip%E6%9F%A5%E8%AF%A2%E6%8E%A5%E5%8F%A3

调用方法:http://www.foxtable.com/mobilehelp/topics/0157.htm

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106763 积分:543016 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/10 14:18:00 [显示全部帖子]

使用HttpClient调用接口获取

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106763 积分:543016 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/6/10 14:32:00 [显示全部帖子]

Dim hc As New HttpClient("http://pv.sohu.com/cityjson#%20设置编码http://pv.sohu.com/cityjson?ie=utf-8")
hc.ResponseEncoding = "GBK"
Dim dt As String = hc.GetData()
MessageBox.Show(dt)
[此贴子已经被作者于2022/6/10 14:31:52编辑过]

 回到顶部