❶ pb 修改密码程序 如何将更新的密码更新到sql的数据库中
主要问题在于这句:
UPDATE"t_user" SET "t_user"."Mm" = :ls_b where "t_user"."yhbm" =:ls_yhbm;
表名和字段名不应该用引号括起来。
另外,提醒楼主,关于rollback和commit,稳健一点的写法是:把它们写在messagebox语句之前,因为你无法确定用户什么时候去点击提示框的确定,写在之后的话,如果用户没有点确定而离开了计算机,那么数据表将长时间的保持在事务未决状态。
-------------------
补充一下,又发现你一个问题,这句:
if sqlca.sqlcode<>-1 then
应该是
if sqlca.sqlcode<>0 then
也就是说,不为0时,是执行失败。
❷ pb数据库密码忘了有什么办法打开吗
pb数据库密码忘了就是忘了登陆数据库的密码吧,跟PD无光的吧
ORACLE的话
cmd
sqlplus /nolog
conn /@你的配置服务名 as sysdba
如果没有服务名是本机的数据库的话直接conn / as sysdba
然后再配置你的PD登陆的用户名和密码
alter user youruser identified by yourpassword;
比如你的PD登陆用户名是abc,希望密码改为123,那么语句就是
alter user abc identified by 123;
❸ pb 同一个单行编辑框实现修改密码代码
如果想界面友好的话最好通过改变cb_new 的不同TEXT值来提示用户如何操作,然后按钮中根据不同的TEXT显示来判断如何执行语句
比如首先按钮 cb_new 的TEXT为‘修改密码’,点击后判断你的步骤1,如果对则修改按钮 cb_new 的Text为‘输入新密码确认’,然后再次点击按钮 cb_new 时根据当cb_new.TEXT='请输入新密码确认'来执行对应的判断步骤2,如果对的话则再次改变按钮cb_new的TEXT为‘再次输入新密码确认’,然后根据当cb_new.TEXT='再次输入新密码确认' 来执行对应的判断步骤3.
这时大概思路,代码就不写给你了,自己想想吧,思考有好处
❹ 如何用pb12.5实现更改密码代码,求帮忙,求代码,以及备注,急用~~
您好,你现有代码 1234 不就是密码
upsd = String(1234) 改成 upsd = String(5678) 不就改了
如果你要让用户自己改,那你需要把密码存储在 ini 文件中 或者是数据库中
❺ PB实现,要求用户更改的密码不能单纯为数字,也不能单纯为字母,该怎么实现
string s,c
long n,t
boolean b
s=sle_1.text//用户输入的密码
t=lenw(s)//取得s的总长度
if t=0 then return//空密码串不处理
b=false
for n=1 to t
c=midw(s,n,1)//依次取字符
if not (isnumber(c)) then//如果字符不是数字,设置标志
b=true
exit
end if
next
if b=false then//如果所有字符都是数字
messagebox('提示','密码不能是纯数字串!')
return
end if
b=false
for n=1 to t
c=midw(s,n,1)//依次取字符
if not ((asc(c)>=65 and asc(c)<=90) or (asc(c)>=97 and asc(c)<=122)) then//如果字符不是字母,设置标志
b=true
exit
end if
next
if b=false then//如果所有字符都是字母
messagebox('提示','密码不能是纯字母串!')
return
end if
❻ 用PB实现修改密码的代码
string mima,username
SELECT yonghuming,
yonghumima
INTO :username,
:mima
FROM yonghu
WHERE yonghuming = :sle_1.text;
if sle_1.text="" or sle_2.text="" or sle_3.text="" then
messagebox("错误!","用户名或密码不能为空!",exclamation!,ok!,2)
return
end if
if sle_1.text=username and sle_2.text=mima then
UPDATE yonghu
SET yonghumima =:sle_3.text where yonghuming = :sle_1.text ;
messagebox("密码修改成功!","请记住新密码,下次登录时请使用新密码!",exclamation!,ok!,2)
else
messagebox("错误!","用户名或密码错误,请重新输入!",exclamation!,ok!,2)
end if
❼ PB修改密码窗口的实现
列名和表名用引号括起来,不会提示语法错误?提示保存成功那句,不管有没保存都会执行到。把表名和列名上的引号去掉,还有修改成功那句改一下看看:If sqlca.sqlcode = 0 Then MessageBox('提示','修改成功')Else MessageBox('提示','修改失败!'+sqlca.sqlerrtext)End If
❽ 怎么更新pb
在你的游戏根目录里边有个pbsvc.exe,打开那个,然后点Test Services,等完成后点OK,再点Next,然后点I Agree ,等完成后点Next,最后点Finish,就完了
❾ PB 登陆窗口密码修改。这段代码第七行出现:syntax error 求高人指点,在线等。。。
UPDATE users
SET password = :ls_password
WHERE(users.name = :gs_username) AND
(users.password = :gs_password)
这一句后加分号,应该是:
UPDATE users
SET password = :ls_password
WHERE(users.name = :gs_username) AND
(users.password = :gs_password);
在pb中写的sql都要加分号