帮忙写 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。
...全文
97 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
Samrv.W 2010-03-19
  • 打赏
  • 举报
回复
想将此算法用PB语言写,
PB与MSSQL有一点点区别。
fuxiaoyang13 2009-08-29
  • 打赏
  • 举报
回复
就是!!!!
WorldMobile 2009-08-29
  • 打赏
  • 举报
回复
直接用sqlserver的这个,然后在程序里用pb调也可

754

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧