小弟需要一加解密函数,请大家帮忙!!!

spaceship5 2003-11-02 09:28:38
如有pbl请发到spaceship5@163.com中
多谢了
...全文
21 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
jdsnhan 2003-11-02
  • 打赏
  • 举报
回复
是啊,加密算法好多的,可以去找找。
lmby 2003-11-02
  • 打赏
  • 举报
回复
建议你去搜索des算法,下个dll.然后调用。几乎不可能被破/
lmby 2003-11-02
  • 打赏
  • 举报
回复
网上有很多算法,如des算法。在google搜索”加密 算法“即可。

这里有个简单的

as_worker = as_worker +'irene'

// Programmed by Harrison Jiang

integer i, j
integer li_mask[] // Encryption mask
integer li_wlen // Length of worker number
integer li_plen // Length of password

string ls_char // A character of string
string ls_asc // String of ASCII value of the character
integer li_asc // ASCII value of the character

li_wlen = Len(as_worker)
FOR i = li_wlen TO 1 STEP -1
ls_char = Mid(as_worker, i, 1)
ls_asc = String(Asc(ls_char))
FOR j = 1 TO Len(ls_asc)
li_mask[i] += Integer(Mid(ls_asc, j, 1))
NEXT
NEXT

li_plen = Len(as_password)

i = 1
FOR j = 1 TO li_plen
ls_char = Mid(as_password, j, 1)
li_asc = Asc(ls_char) + li_mask[i]
as_password = Replace(as_password, j, 1, Char(li_asc))
IF i < li_wlen THEN
i ++
ELSE
i = 1
END IF
NEXT

return as_password

397

社区成员

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

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