以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  有几个虫子  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=6420)

--  作者:唐尸三摆手
--  发布时间:2010/4/1 8:38:00
--  有几个虫子
1.外部查询表能够编辑。
2.预览sql命令不能显示查询结果。
3.下面的代码为什么提示出错呢?sql语句在sql查询管理器中执行正常,但是在FOXTABLE中的命令窗口执行错误如图
Dim cmd1 As New SQLCommand
Dim cmd2 As New SQLCommand
Dim cmd3 As New SQLCommand
Dim cmd4 As New SQLCommand
Dim Count AS Integer
Dim Count1 AS Integer
Dim Count2 AS Integer
Dim Count3 AS Integer
Dim Count4 AS Integer
cmd1.CommandText = "update aef00000 set aef00000.deptcode=b.deptcode from aef00000 a,abb00000 b where a.itemcode=b.itemcode and  a.deptcode=\'\' and a.centercode=\'0100\' and a.plannum<>0"
Count1= cmd1.ExecuteNonQuery()
cmd2.CommandText = "update aef00000 set aef00000.workcentercode=b.workcentercode from aef00000 a,abc00000 b where a.itemcode=b.itemcode and  a.workcentercode=\'\' and a.centercode=\'0100\' and a.plannum<>0 and b.code=\'0001\'"
Count2= cmd2.ExecuteNonQuery()
cmd3.CommandText = "update aeg00000 set aeg00000.deptcode=b.deptcode from aeg00000 a,abb00000 b where a.itemcode=b.itemcode and  a.deptcode=\'\' and a.centercode=\'0100\' and a.plannum<>0"
Count3= cmd3.ExecuteNonQuery()
cmd4.CommandText = "update aeg00000 set aeg00000.workcentercode=b.workcentercode from aeg00000 a,abc00000 b where a.itemcode=b.itemcode and  a.workcentercode=\'\' and a.centercode=\'0100\' and a.plannum<>0 and b.code=\'0001\'"
Count4= cmd4.ExecuteNonQuery()
count=Count1+Count2+Count3+Count4
Messagebox.Show( "总共更新" & Count & "行!")

图片点击可在新窗口打开查看此主题相关图片如下:pic036.jpg
图片点击可在新窗口打开查看

--  作者:狐狸爸爸
--  发布时间:2010/4/1 9:13:00
--  
1、不算错误
2、我查查
3、说明你组合的语句有误,这么测试一下:
Messagebox.show(cmd4.CommandText)


[此贴子已经被作者于2010-4-1 9:14:05编辑过]

--  作者:唐尸三摆手
--  发布时间:2010/4/2 13:27:00
--  
Dim cmd As New SQLCommand
Dim Count AS Integer
cmd .CommandText = "update aeg00000 set plandesc=contractno from aeg00000 where centercode=\'0100\' and finishnum=0 and ifprocess=0 and warehousecode=\'0110\'"
Count= cmd.ExecuteNonQuery()
Messagebox.Show( "总共删除" & Count & "行!")

这段代码执行报错,为什么呢?
在SQL查询管理器中没问题的呀?

老大,帮我分析分析上面的红色部分有什么问题呀,贴图考出来

图片点击可在新窗口打开查看此主题相关图片如下:pic043.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2010-4-2 13:30:23编辑过]

--  作者:czy
--  发布时间:2010/4/2 13:29:00
--  
删除?
删除应该是Delete啊?
--  作者:唐尸三摆手
--  发布时间:2010/4/2 13:35:00
--  
老大,这个词语改成更新也报错的,所以不是它的问题
--  作者:狐狸爸爸
--  发布时间:2010/4/2 15:48:00
--  
 你的代码似乎没有指定数据源名称
--  作者:唐尸三摆手
--  发布时间:2010/4/3 8:16:00
--  
单独一行指定数据源还是在更新语句中使用dbo.erp.aeg00000格式