slamet Harto
09-14-2009, 09:50 PM
Hi there,
Can you help to fix this line, please?
As I have an errorr message "Syntax error in Update Statement"
Thanks for assistance,
msq = "Update TbVouch set CompNm='" & frmVoucherBB.txtCoyNm.Text & "',Route='" & frmVoucherBB.txtRoute.Text & "',Amount='" & frmVoucherBB.TxtAmt.Text & "'," & _
"Qty='" & frmVoucherBB.TxtBoxQty.Text & "',VoucherNo='" & frmVoucherBB.TxtBoxVno.Text & "',In-Out='" & frmVoucherBB.CBoInOut.Text & "'," & _
"Status='" & frmVoucherBB.CboInStat.Text & "'," & _
"VocStat='" & frmVoucherBB.CboStat.Text & "',Comment='" & frmVoucherBB.txtComments.Text & "' where Ltrim(TbVouch.VoucherRegno)='" & frmVoucherBB.lblVoucher.Text & "'"
Cn.Execute (msq)
MsgBox "Update Completed...!!!", vbInformation, "Thank you"
Can you help to fix this line, please?
As I have an errorr message "Syntax error in Update Statement"
Thanks for assistance,
msq = "Update TbVouch set CompNm='" & frmVoucherBB.txtCoyNm.Text & "',Route='" & frmVoucherBB.txtRoute.Text & "',Amount='" & frmVoucherBB.TxtAmt.Text & "'," & _
"Qty='" & frmVoucherBB.TxtBoxQty.Text & "',VoucherNo='" & frmVoucherBB.TxtBoxVno.Text & "',In-Out='" & frmVoucherBB.CBoInOut.Text & "'," & _
"Status='" & frmVoucherBB.CboInStat.Text & "'," & _
"VocStat='" & frmVoucherBB.CboStat.Text & "',Comment='" & frmVoucherBB.txtComments.Text & "' where Ltrim(TbVouch.VoucherRegno)='" & frmVoucherBB.lblVoucher.Text & "'"
Cn.Execute (msq)
MsgBox "Update Completed...!!!", vbInformation, "Thank you"