strSQL = "Update tblSaleItem SET " _
& "[YKAmt] = (Nz([YKAmt], 0) + " & curAdjtAmt & "), " _
& "[QKKAmt] = (Nz([QKKAmt], 0) - " & curAdjtAmt & "), " _
& "[KPDate] = (" & CDbl(Me.ARDate) & " )," _
& "[QtyStringA] = (" & Me.Remark) & " )" _
& "Where SaleNum = '" & rstblARItem!SaleNum & "' AND RowNo = " & rstblARItem!RowNoA & " "
ExecuSQL strSQL
strSQL = "Update tbwSaleItem SET " _
& "[YKAmt] = (Nz([YKAmt], 0) + " & curAdjtAmt & "), " _
& "[QKKAmt] = (Nz([QKKAmt], 0) - " & curAdjtAmt & "), " _
& "[KPDate] = (" & CDbl(Me.ARDate) & "), " _
& "[QtyStringA] = (" & Me.Remark) & " )" _
& "Where SaleNum = '" & rstblARItem!SaleNum & "' AND RowNo = " & rstblARItem!RowNoA & " "
ExecuSQL strSQL
运行时提示:语法错误(操作符丢失),在= " & (Me.Remark) & " " _ 中
这一行的控件是文本,输入数字的时候运行正常,如果是文本的话就出错,!!!
经过网站上变量符号的学习文章解决了,参考文档如下:
变量符号用法:文本型变量.日期型变量,数字型变量
http://www.accessoft.com/article-show.asp?id=8013