ASP可逆算法
ASP可逆算法2010-02-25jmylfunction encrypt(ecode)Dim textsdim ifor i=1 to len(ecode)texts=texts & chr(asc(mid(ecode,i,1))+i)nextencrypt = textsend functionfunction decrypt(dcode)dim textsdim ifor i=1 to len(dcode)texts=texts & ...