Foxtable(狐表)用户栏目专家坐堂 → 通过http头信息获取网络时间


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

主题:通过http头信息获取网络时间

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


加好友 发短信
等级:童狐 帖子:224 积分:2222 威望:0 精华:0 注册:2011/12/14 9:56:00
通过http头信息获取网络时间  发帖心情 Post By:2022/1/24 15:50:00 [只看该作者]

'这个是帮助文件的方式,但有时候不是sql数据库的时候,无法使用,找了下面的方法。记录一下。
Public Function SDate() As Date
'Dim cmd As New SQLCommand
'cmd.C
'cmd.CommandText = "Select GetDate()"
'Return cmd.ExecuteScalar()
'通过http头获取服务器时间
Dim htc As new HttpClient("http://www.baidu.com")
If  htc.GetInformation() Then
    htc.Close() '必须执行Close方法关闭连接
    Return CDate(htc.ResponseHeaders("date"))
End If

End Function

 回到顶部