帮忙写 PB加密机

Samrv.W 2009-08-28 09:13:20
/*
*密码 加密,解密
* SQL SERVER 2000 CODE
*/
declare @pwd varchar(30) /*加密文件内容*/
declare @str varchar(30) /*接收原密码字符串*/
declare @i int
declare @ii int /* 密匙 */
set @pwd='7%0%6='
-- set @pwd='salary'
set @i=1
set @ii=60
set @str=''
while (@i<=len(@pwd))
begin
-- set @str=@str + cast( char(ascii( substring(@pwd,@i,1) ) - @ii ) as varchar(30) ) /*解密*/
set @str=@str + cast( char(ascii( substring(@pwd,@i,1) ) + @ii ) as varchar(30) ) /*加密*/
set @i=@i+1
end
print @str

请 PowerBuilder 工程师们按照上SQL SERVER 2000 CODE 的算法 帮忙 写 加密机(EXE文件),需要有输入 密码原文、密匙,加密按钮、解密按钮 ,显示 密文,
可以理解为一个注册机。

本人不会使用POWERBUILDER。
...全文
70 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
Samrv.W 2010-03-19
想将此算法用PB语言写,
PB与MSSQL有一点点区别。
回复
fuxiaoyang13 2009-08-29
就是!!!!
回复
WorldMobile 2009-08-29
直接用sqlserver的这个,然后在程序里用pb调也可
回复
发动态
发帖子
数据库相关
创建于2007-09-28

732

社区成员

PowerBuilder 数据库相关
申请成为版主
社区公告
暂无公告