String ls_yonghu ls_mima, ls_queren, ls_quanxian
Ls_yonghu=trim (sle_1. Text)
Ls_mima=trim (sle_2. Text)
Ls_queren=trim (sle_3. Text)
Ls_quanxian=trim (ddlb_1. Text)

If ls_yonghu="" or ls_mima=" "or ls_queren=" "or ls_quanxian=" "then
Messagebox (hint! "" , "all the information can't be empty!" )
The else
If ls_mima=ls_queren then
if not the exists (select yonghu from zhanghao where yonghu=: ls_yonghu) then
Insert into zhanghao (yonghu, mima, quanxian) values (: ls_yonghu, : ls_mima, : ls_quanxian);
If the sqlca. Sqlcode=0 then
Commit the using the SQLCA;
Messagebox (" success!" , "the user to create success!" )
Ddlb_1. SelectItem (0)
Sle_2. Text=""
Sle_3. Text=""
Sle_1. Text=""
The else
Messagebox (" fail!" , "the user to create failure!" )
The rollback.
Ddlb_1. SelectItem (0)
Sle_2. Text=""
Sle_3. Text=""
Sle_1. Text=""
End the if
The else
Messagebox (hint! "" , the user name already exists! "" )
End the if
The else
Messagebox (hint! "" And "verify password mistake!" )
Sle_2. Text=""
Sle_3. Text=""
End the if
end if

CodePudding user response:

Embedded SQL no method exists, and therefore prompt error,
Can be changed to:
Int li_count
Select count (1) into: li_count from zhanghao where yonghu=: ls_yonghu

If li_count & gt; 0 then
Insert...

CodePudding user response:

Upstairs and tidy

CodePudding user response:

1/f, positive solutions

CodePudding user response:

The building Lord estimate before contact data is used.