[求助获取服务器系统时间 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助获取服务器系统时间

共有3823人关注过本帖树形打印复制链接主题：[求助获取服务器系统时间

wumingrong1

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1029 积分：6497 威望：0 精华：0 注册：2014/1/3 12:49:00

[求助获取服务器系统时间 发帖心情

Post By：2014/7/4 15:07:00 [显示全部帖子]

我有这样一个命令；获取到的日期为当前电脑的日期；如果我希望获取到的是存放数据库的服务器日期，该命令该怎么改？

If e.DataTable.DataCols.Contains("操作记录_增加日期") Then

e.DataRow("操作记录_增加日期") = Date.now

End If

wumingrong1

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1029 积分：6497 威望：0 精华：0 注册：2014/1/3 12:49:00

Post By：2014/7/4 17:19:00 [显示全部帖子]

是这么写吗？只要改 “数据源名称”就可以啦？

If e.DataTable.DataCols.Contains("操作记录_增加日期") Then

Dim cmd As New SQLCommand
Dim dt As Date
cmd.ConnectionName = "数据源名称"
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
dt = dt.Date

e.DataRow("操作记录_增加日期") = dt

End If

wumingrong1

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1029 积分：6497 威望：0 精华：0 注册：2014/1/3 12:49:00

Post By：2014/7/5 11:07:00 [显示全部帖子]

能告诉我数据源名称是指什么吗？我在服务器的哪能找到或者设置？

wumingrong1

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：五尾狐帖子：1029 积分：6497 威望：0 精华：0 注册：2014/1/3 12:49:00

Post By：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 '结束

此主题相关图片如下：360截图20140725125913125.jpg

[此贴子已经被作者于2014-7-5 13:01:27编辑过]

下一主题 >> << 上一主题

主题：[求助 获取服务器系统时间

主题：[求助获取服务器系统时间