UPDATE 语句的语法错误
lirh 2003-08-19 02:12:48 总是报错,在查询视图里面试过了,sql语句没有问题,可就是报错
Private Sub cmdOk_Click()
If Trim(txtPassword) <> Trim(txtCompare) Then
MsgBox "两次输入的密码不相符!", vbCritical, "错误"
Exit Sub
End If
strSql = "update administrators set password='" & Trim(txtPassword) & "'where administrator='" & Trim(txtUser) & "'"
On Error GoTo Errorhandle
conn.Execute strSql
Exit Sub
Errorhandle:
MsgBox "执行操作出错,原因:" & Err.Description & Err.Number, vbCritical, "错误"
End Sub