Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]内部函数，获取服务器时间


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

主题：[求助]内部函数，获取服务器时间
帅哥哟，离线，有人找我吗？
pyh6918
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		[求助]内部函数，获取服务器时间  发帖心情 Post By：2012/11/2 15:04:00 [显示全部帖子]

第一个方案：
Dim cmd As New SQLCommand
Dim dt As Date
cmd.ConnectionName =args(0)
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
Return dt
调用时：
dim ls as row=tables("数据").Current
ls("操作日期")=Functions.Execute("ftime","luo")
=============================
第二个方案：
Dim cmd As New SQLCommand
Dim dt As Date=args(0)
cmd.ConnectionName
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
调用时：
dim ls as row=tables("数据").Current
ls("操作日期")=Functions.Execute("ftime",ls("操作日期"))

这两个方案都能获得服务器时间，但是不知道哪一个更合理，或者还有更好的办法？
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2012/11/2 15:25:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-11-2 15:09:00的发言：

我不明白，你威慑什么有两个参数，一个参数就行啊：

 

函数：

 

Dim cmd As New SQLCommand
Dim dt As Date
cmd.ConnectionName =args(0)
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
Return dt

 

调用：

dim ls as row=tables("数据").Current
ls("操作日期")=Functions.Execute("ftime"

第一个参数是自定义函数名称，第二个参数是数据库名称。
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2012/11/2 15:27:00 [显示全部帖子]

我没弄过SQL数据库，不知道哪一个更合理，所以上来问一下！

 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2012/11/2 15:30:00 [显示全部帖子]

以下是引用lin_hailun在2012-11-2 15:14:00的发言：
第二个，你最后就不用赋值了，只有这个区别吧。

你是说过个吧

ls("操作日期")=Functions.Execute("ftime",ls("操作日期"))

 

ls("操作日期")=Functions.Execute("ftime") 这样会报错
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2012/11/2 15:35:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-11-2 15:09:00的发言：

我不明白，你威慑什么有两个参数，一个参数就行啊：

 

函数：

 

Dim cmd As New SQLCommand
Dim dt As Date
cmd.ConnectionName =args(0)
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
Return dt

 

调用：

dim ls as row=tables("数据").Current
ls("操作日期")=Functions.Execute("ftime")

[此贴子已经被作者于2012-11-2 15:21:55编辑过]

这样能指向外部SQL数据库吗？SQL数据源名称为"luo”

项目里还有几个内部表。

[此贴子已经被作者于2012-11-2 15:36:41编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
pyh6918
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1135 积分：11099 威望：0 精华：2 注册：2008/9/1 10:45:00 		  发帖心情 Post By：2012/11/2 18:23:00 [显示全部帖子]

以下是引用狐狸爸爸在2012-11-2 15:09:00的发言：

我不明白，你威慑什么有两个参数，一个参数就行啊：

 

函数：

 

Dim cmd As New SQLCommand
Dim dt As Date
cmd.ConnectionName =args(0)
cmd.CommandText = "Select GetDate()"
dt = cmd.ExecuteScalar()
Return dt

 

调用：

dim ls as row=tables("数据").Current
ls("操作日期")=Functions.Execute("ftime")

[此贴子已经被作者于2012-11-2 15:21:55编辑过]

谢谢lin_hailun

谢谢muhua

老大的这个代码我还是有点不明白，外部数据源的名称在哪体现？

外部数据源的名称为"luo",自定义函数名称为"ftime",定义和调用时都没看到。请明示。谢谢！

[此贴子已经被作者于2012-11-2 18:27:15编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.06250 秒, 5 次数据查询