下面的字符串老是报错!怎么写啊!
Dim UpdataStr As String
UpdataStr = "Update Product_Info Set [Prod_Name] = '" & ProdName.Text & "'," & _
" [ENGLISH_CODE]='" & EnglishCode.Text & "'," & _
" [PROD_AMOUNT]='" & Val(ProdPrice.Text) & "'," & _
" [PROD_TYPE]='" & ProdType.Text & "'," & _
" [MODIFY_BY]='" & ProdType.Text & "'," & _
" [MODIFY_DATE]=" + Now & _
" Where [Row_ID] =" + Val(ComClass.Rs.Fields("Row_ID").Value)
MsgBox UpdataStr
Dim UpdataStr As String
UpdataStr = "Update Product_Info Set [Prod_Name] = '" & ProdName.Text & "'," & _
" [ENGLISH_CODE]='" & EnglishCode.Text & "'," & _
" [PROD_AMOUNT]='" & Val(ProdPrice.Text) & "'," & _
" [PROD_TYPE]='" & ProdType.Text & "'," & _
" [MODIFY_BY]='" & ProdType.Text & "'," & _
" [MODIFY_DATE]=" + Now & _
" Where [Row_ID] =" + Val(ComClass.Rs.Fields("Row_ID").Value)
MsgBox UpdataStr
在 SQL Server 中用'' 括起来。
学习中.没用过带[]的sql.
把updatastr添加到监视中.取得sql的语句再到sqlexplorer中去执行一下,你用msgbox是看不出来错误的