- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助 获取服务器系统时间 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53305)
-- 发布时间：2014/7/4 15:07:00
-- [求助 获取服务器系统时间
我有这样一个命令；获取到的日期为当前电脑的日期；如果我希望获取到的是存放数据库的服务器日期，该命令该怎么改？
If e.DataTable.DataCols.Contains("操作记录_增加日期") Then
e.DataRow("操作记录_增加日期") = Date.now
End If
-- 发布时间：2014/7/4 15:11:00
--
http://www.foxtable.com/help/topics/2318.htm
-- 发布时间：2014/7/4 17:19:00
--
是这么写吗？只要改 “数据源名称”就可以啦？
If e.DataTable.DataCols.Contains("操作记录_增加日期") Then
Dim dt As Date
cmd.ConnectionName = "数据源名称"
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
dt = dt.Date
e.DataRow("操作记录_增加日期") = dt
End If
-- 发布时间：2014/7/4 17:22:00
--
对的
-- 发布时间：2014/7/5 11:07:00
--
能告诉我 数据源名称 是指什么吗？我在服务器的哪能找到或者设置？
-- 发布时间：2014/7/5 11:10:00
--
http://www.foxtable.com/help/topics/1420.htm
此主题相关图片如下：qq截图20140705110935.jpg
-- 发布时间：2014/7/5 13:01:00
--
如下命令，发生错误提示； 操作记录_修改日期 列为 日期和时间 类型的 Date:
If e.DataTable.DataCols.Contains("操作记录_修改日期") Then \'如果当前表中存在"*****"列
Dim cmd As New SQLCommand
Dim dt As Date
cmd.C
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
dt = dt.Date
If dt <> "操作记录_修改日期" Then \'如果"*****"日期列的日期不等于当前电脑日期
e.DataRow("操作记录_修改日期") = dt \'在"*****"列纪录下当前电脑日期
End If \'结束
End If \'结束
此主题相关图片如下：360截图20140725125913125.jpg
[此贴子已经被作者于2014-7-5 13:01:27编辑过]
-- 发布时间：2014/7/5 14:27:00
--
If dt <> "操作记录_修改日期" Then 你这个判断是想做什么? 肯定会报错啊. 用日期来和字符串对比
-- 发布时间：2014/7/5 14:28:00
--
If dt <> date.today Then \'如果"*****"日期列的日期不等于当前电脑日期