当前位置: 代码迷 >> PB >> PB中怎么记录注册信息
  详细解决方案

PB中怎么记录注册信息

热度:127   发布时间:2016-04-29 05:27:13.0
PB中如何记录注册信息
    我想通过这样的一个界面,点击注册把注册信息记录在表格 UserInfo(ID,UserName,PassWord)中,请问这个可以怎样实现?

// Profile SIMS001
SQLCA.DBMS = "ODBC"
SQLCA.AutoCommit = False
SQLCA.DBParm = "ConnectString='DSN=SIMS001;UID=sa;PWD=123456'"
connect using SQLCA;
string userName
userName=trim(sle_username.text)
string passWord
passWord=trim(sle_password.text)
//假设userName不为空且不与数据库原有的UserName重复,passWord不为空
------解决方案--------------------

//定义一个变量 ll_id 作为 你新增记录的ID
long ll_id
string ls_error
//获取新的ID值
//自己打代码获取,因为不知道你用的什么数据库,ID值怎么设置的
insert into Userinfo
  (ID, UserName, PassWord)
values
  (:ll_id, :userName, :passWord);
ls_error = sqlca.sqlerrtext
if sqlca.sqlcode <> 0 then
     rollback;
     messagebox("提示","注册失败!~n"+ls_error)
else
      commit;
      messagebox("提示","注册成功!")
end if
  相关解决方案