Foxtable(狐表)用户栏目专家坐堂 → 调用储存过程结果返回表格出错


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

主题:调用储存过程结果返回表格出错

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


加好友 发短信
等级:一尾狐 帖子:447 积分:4572 威望:0 精华:0 注册:2009/1/11 11:00:00
调用储存过程结果返回表格出错  发帖心情 Post By:2013/11/25 16:03:00 [只看该作者]

Tables("ksoa_采购综合应用_Table2").fill("exec mg_qry_cg_1 1,'','2013-09-01','2013-09-31','','2013-10-01','2013-10-31','','2013-11-01','2013-11-31'","sys1",False)
出错提示:对于多个基表不支持动态 SQL 生成。


但是使用这个,能够试出语句是没有问题如:
Dim dt As DataTable
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "exec mg_qry_cg_1 1,'','2013-09-01','2013-09-31','','2013-10-01','2013-10-31','','2013-11-01','2013-11-31'"
dt  = cmd.ExecuteReader
output.show(dt.DataCols.Count) '显示565
output.show(dt.DataRows.Count) '显示10426

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/11/25 16:06:00 [只看该作者]

Dim dt As DataTable
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "exec mg_qry_cg_1 1,'','2013-09-01','2013-09-31','','2013-10-01','2013-10-31','','2013-11-01','2013-11-31'"
dt  = cmd.ExecuteReader
Tables("ksoa_采购综合应用_Table2").DataSource =dt

看看这样

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


加好友 发短信
等级:一尾狐 帖子:447 积分:4572 威望:0 精华:0 注册:2009/1/11 11:00:00
  发帖心情 Post By:2013/11/25 16:07:00 [只看该作者]

好的,谢谢,我试试看,

我试过这样就可以:Tables("ksoa_采购综合应用_Table2").fill("exec mg_qry_cg_1 1,'','2013-09-01','2013-09-31','','2013-10-01','2013-10-31','','2013-11-01','2013-11-31'","sys1",True)

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/11/25 16:08:00 [只看该作者]

对是的,我大意了.没看到.   必须是SQLQUERY类型才可以正常执行.

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


加好友 发短信
等级:一尾狐 帖子:447 积分:4572 威望:0 精华:0 注册:2009/1/11 11:00:00
  发帖心情 Post By:2013/11/25 16:12:00 [只看该作者]

以下是引用Bin在2013-11-25 16:06:00的发言:
Dim dt As DataTable
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "exec mg_qry_cg_1 1,'','2013-09-01','2013-09-31','','2013-10-01','2013-10-31','','2013-11-01','2013-11-31'"
dt  = cmd.ExecuteReader
Tables("ksoa_采购综合应用_Table2").DataSource =dt
楼主:你的这个,试过OK通过了,谢谢


 回到顶部