hello guyz..can anybody help me with my problem..i have a command button for update and every time i execute the command, an error occurred "too few parameters, expected 2" how can i solve it? heres my code:


Private Sub cmdok_Click()
'On Error Resume Next

Call openConn

If Trim(txtnp.Text) = Trim(txtcp.Text) Then
strsql = "update profile set password='" & Trim(txtnp.Text) & "' where (int(code) = '" & Int(Val(xins_code)) & "') "
Set myrs = myconn.Execute(strsql, adExecuteNoRecords)
MsgBox ("Password Updated"), vbOKOnly + vbInformation
Unload frmchpassword
frmchpassword.Hide
Else
MsgBox ("New-Password and Confirm-Password do not match!"), vbOKOnly + vbCritical
txtnp.SetFocus
txtnp = ""
txtcp = ""
End If
Exit Sub
Call closeConn
End Sub