String ls_password

If the trim (sle_1. Text) & lt;> Ls_password then
Messagebox (" prompt ", "old password error")
The else
If the trim (sle_2. Text) & lt;> Trim (sle_3. Text) then
Messagebox (" prompt ", "two password is not the same")
The else
Ls_password=(sle_2. Text)
Gs_password=(sle_2. Text)
Update the users
Set the password=: ls_password
The where (user) name=gs_name) and
(the user. The password=: gs_password);
If the sqlca. Sqlcod<> 0 then
Messagebox (" prompt ", "password change failed")
The else
Close (the parent)
Messagebox (" prompt ", "password is changed")
End the if
End the if
End the if

CodePudding user response:

The user. The name= : gs_name

CodePudding user response:

School level error!