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

[spaceship5]

如有pbl请发到[e-mail]中
多谢了

[lmby]

网上有很多算法，如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

[lmby]

建议你去搜索des算法，下个dll.然后调用。几乎不可能被破/

[jdsnhan]

是啊，加密算法好多的，可以去找找。