求加密代码,该如何处理
求加密代码
以下为解密代码,请各位老大帮我研究出加密代码.
Long i
String ls_str1
String ls_str2
ls_str1 = "加密后的字符"
DO WHILE Len(ls_str1) >= i
ls_str2 = ls_str2 + Mid(ls_str1,Len(ls_str1) - i,1)
ls_str2 = ls_str2 + Mid(ls_str1,i + 1,1)
i += 2
LOOP
MessageBox("解密后的字符",ls_str2)
------解决方案--------------------
以下为解密代码,请各位老大帮我研究出加密代码.
Long i
String ls_str1
String ls_str2
ls_str1 = "加密后的字符"
DO WHILE Len(ls_str1) >= i
ls_str2 = ls_str2 + Mid(ls_str1,Len(ls_str1) - i,1)
ls_str2 = ls_str2 + Mid(ls_str1,i + 1,1)
i += 2
LOOP
MessageBox("解密后的字符",ls_str2)
------解决方案--------------------
Long i
String ls_str1
String ls_str2 , ls_str3
ls_str1 = "加密后的字符"//"加密后的字符"
DO WHILE Len(ls_str1) >= i
ls_str2 += Mid(ls_str1,Len(ls_str1) - i,1)
ls_str2 += Mid(ls_str1,i + 1,1)
i += 2
LOOP
MessageBox( "解密后的字符",ls_str2)
//加密
i = 0
int j
j = len(ls_str2) / 2
for i = 1 to j
ls_str3 += mid(ls_str2, 2 * i, 1) + mid(ls_str2, len(ls_str2) - 2 * i, 1)
next
MessageBox( "加密后的字符",ls_str3 )