加密的方法是:把明文的每一个字符转为ASCII码,再加上相应的字符在明文中的位置,再加上明文的长度得到一个整型数据(ASCII码),再把它转成相应的字符,连接起来就是密文了。
知道加密的方法,你就可以进行解密了呀。把上面的函数整理一下就OK了。
//口令加密
// 字符串
//返回值:字符串
integer i,li_kllen
string ls_zmkl
li_kllen=len(a_ymm)
for i=1 to li_kllen
ls_zmkl=ls_zmkl + char(asc(mid(a_ymm,i,1)) + i +li_kllen)
next
return ls_zmkl
//口令解加密
// 字符串
//返回值:字符串
integer i,li_kllen
string ls_zmkl
li_kllen=len(a_ymm)
for i=1 to li_kllen
ls_zmkl=ls_zmkl + char(asc(mid(a_ymm,i,1)) - i -li_kllen)
next
return ls_zmkl
通过解密得到的密码是:wg8999