用DAO update database问题

Question

'Update the customer sequence No. & path according to the customer ID
Public Function updateCustomer(ByVal p_customer As customer) As Boolean
    Dim sqlcmd As String
    sqlcmd = "update Customer set sequence_no = " & p_customer.sequence_no & _
                                                       " , path = " & in_util.addQuote(p_customer.path) & _
                                                       "  where customer_id = " & in_util.addQuote(Trim(p_customer.id))
    
    MsgBox (sqlcmd)
    Set db = OpenDatabase("", False, False, "ODBC;DSN=CTIDSN;UID=sa;PWD=;TIMEOUT=180")
    db.Execute (sqlcmd)
    db.Close
    Set db = Nothing
    updateCustomer = True
End Function上面的execute会alarm,大意说明不能update
刚接触VB,求教

Answer 1

你的更新语句一般有误，先检查一下字段类型是否相符。p_customer.sequence_no是否正确。