以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]请问这个是什么错误?谢谢  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=5918)

--  作者:xycn
--  发布时间:2010/1/31 16:56:00
--  [求助]请问这个是什么错误?谢谢

图片点击可在新窗口打开查看此主题相关图片如下:error.jpg
图片点击可在新窗口打开查看
请问这个是什么错误?谢谢
--  作者:xycn
--  发布时间:2010/1/31 16:57:00
--  

语句如下:

dim a as string = Tables("窗口1_Table1").current("条形码编号")
dim b as string = Tables("窗口1_Table1").current("备注")
Dim cmd As New SQLCommand
cmd.C

cmd.CommandText = "update " & b & " set 销售日期 = 2009-12-5 where 条形码编号 = " & a
MessageBox.Show(cmd.CommandText)
cmd.ExecuteNonQuery()

[此贴子已经被作者于2010-1-31 16:59:35编辑过]

--  作者:yangming
--  发布时间:2010/1/31 17:33:00
--  

cmd.CommandText = "update " & b & " set 销售日期 = 2009-12-5 where 条形码编号 = " & a

这句中的"b"表示数据表名,不知你的备注列的是否是列出的表名?


--  作者:xycn
--  发布时间:2010/1/31 17:39:00
--  

是的


--  作者:yangming
--  发布时间:2010/1/31 18:18:00
--  

Dim cmd As New SQLCommand
cmd.ConnectionName  = "xc"
cmd.CommandText = "update  " & b & " set  销售日期 = \'2009-12-05 \'  where 条形码编号 =  \'" & a &"\'"

MessageBox.Show(cmd.CommandText)
cmd.ExecuteNonQuery


--  作者:xycn
--  发布时间:2010/1/31 21:20:00
--  

可以了,多谢啦!