ASP 암호화 및 복호화 의 원리는 줄 바꿈/캐리지 리턴 문자를 "lin"이라는 단어로 바꾸는 것입니다. -95~+95 사이의 숫자를 입력하는 경우에도 사용할 수 있는 수동 난수를 찾는 것입니다. 해독 과정에서.
먼저 시도했습니다:
C로 QQ.htm을 만들었습니다. 안에 있는 내용은 내 웹사이트 URL입니다.
프로그램 코드
44를 임의의 숫자로 사용하여 encryption.asp를 암호화하고 가져옵니다.
프로그램 코드<%
hu=림DDDZ4<86;4Z05림
실행(UnEncode(hu))
함수 UnEncode(임시)
하지만=44
i = 1에서 len(temp)까지
mid(temp,i,1)<> Lin이면
Asc(Mid(temp, i, 1)) < 32 또는 Asc(Mid(temp, i, 1)) > 126이면
a = a & Chr(Asc(Mid(temp, i, 1)))
또 다른
pk=asc(mid(temp,i,1))-하지만
pk>126이면
pk=pk-95
elseif pk<32이면
pk=pk+95
종료하면
a=a&chr(pk)
종료하면
또 다른
a=a&vbcrlf
종료하면
다음
인코딩 해제=a
함수 종료
%>
사실, 거기에 있는 Linquan을 제 성 Dan으로 바꿔도 같은 기능을 하게 되겠죠 :)
코드 프로그램 코드 but=44는 앞서 입력한 44입니다.
자세히 살펴보면 내가 종결하고 싶었던 이론이 이르면 2004년 초에 『해커X』에 게재된 것으로 드러났다.
홈페이지가 열리지 않는 경우에는 이 블로그에 내용을 발췌하겠습니다~
이제 아시다시피 Microsoft의 Script Encoder는 안전하지 않으므로 이를 압축하려면 프로그램을 직접 작성해야 합니다.
asp의 실행 기능은 문자열을 실행하는 데 사용됩니다. 즉, asp 문을 문자열로 작성한 다음 실행을 사용하여 실행할 수 있습니다. 예를 들어, 다음 코드 줄은 다음과 같습니다.
Execute(response.write(hackerXfiles)), 실행 후 효과는 response.write(hackerXfiles)를 실행하는 것과 동일합니다. 여기까지
실행 함수에 있는 내용은 문자열이므로 따옴표가 나타나면 이중으로 작성해야 합니다. 하하, 실행 중인 문자열이 있으므로 그 안에 있는 내용을 가져올 수 있습니다.
암호화로 오세요.
어떻게 암호화하나요? 하하, 그냥 가장 간단한 변속 방법을 사용하세요. 코드를 참조하세요:
[/color] 프로그램 코드이지만=1
cc=교체(nr,vbcrlf,Hu)
i= 1에서 len(cc)까지
mid(cc,i,1)<>Hu이면
pk=asc(mid(cc,i,1))+하지만
pk>126이면
pk=pk-95
elseif pk<32이면
pk=pk+95
종료하면
온도=온도&문자(pk)
또 다른
온도=온도&Hu
종료하면
다음
임시=교체(임시,,)
응답.쓰기(임시)
이 코드는 ASP의 순환 이동 방법입니다. 변수는 이동할 비트 수이며 수정될 수 있습니다. 하하, 사이클을 뭐라고 부르나요? 프로그램이 문자를 비교하기 때문에
ASCII 코드는 126보다 크거나 32보다 작을 때 처리되므로 범위는 32~126입니다. 이렇게 하면 창에 표시할 수 없는 문자를 피할 수 있기 때문입니다. 이것
이는 캐리지 리턴 및 줄 바꿈 문자가 처음부터 대체되는 이유이기도 합니다. 여기서는 교대 암호화 ASP 프로그램 xor.asp를 작성하여 첨부했는데, 도움이 되셨으면 좋겠습니다.
그러면 위 코드를 사용하여 response.write(hackerXfiles)를 암호화한 결과를 살펴보겠습니다: sftqpotf/xsjuf)
#ibdlfsYgjmft#* 헤헤 이번에는 신들도 이해 못하겠어^_^
암호화되어 있으므로 당연히 해독해야 합니다. 해독 코드를 참조하세요.
프로그램 코드 함수 UnEncode(temp)
but=1 '이것은 Shift 방식으로 이동된 비트 수입니다! 여기의 수정 사항은 암호화할 때 사용된 수정 사항과 일치합니다.
i =1 ~ len(temp)
if mid(temp,i,1)<>Hu 그러면
pk=asc(mid(temp,i,1))-하지만
pk>126이면
pk=pk-95
elseif pk<32이면
pk=pk+95
종료하면
a=a&chr(pk)
또 다른
a=a&vbcrlf
종료하면
다음
인코딩 해제=a
함수 종료
하하, 이제 실행 방법을 알았으니 다음 암호 해독 함수를 호출하세요: Execute(UnEncode(sftqpotf/xsjuf)#ibdlfsYgjmft#*))