|
挂QQ的网页源代码[ASP/PHP/JS]3 W6 [. b( d7 ^# Q3 e
8 M( C* t$ ^5 E8 y7 q
' A5 E% r% n5 U8 w6 e7 j! t6 ?8 @/ I: y* q* m9 z
' S' z! d8 H; O5 n! ]8 y: @( G说明:此代码适合你做网站用,普通朋友可以不用理这个东西!
8 A+ `' c, U9 N& y c% @9 S7 }( C5 S3 w; P
ASP: & t/ e8 M* z8 h/ }
/ j5 A, d% r, t. H1 \5 F7 ]$ d+ R: p2 i1 c8 N# Z
- G6 ~: q! p$ I# N v8 K
CODE: [Copy to clipboard] C4 f. J: z! O# \% B; e! C# }/ A% M; Y& N, a
<% : U. E; i$ c2 t- ~5 [, Q
dim objXMLHTTP, qq, pwd
- I( k+ T$ m6 ^# Q( ~) `; t9 B8 H' G! ?+ M5 `
qq = "10000" / R5 n' x7 M$ w" p$ x/ z0 |
pwd = "123456" p. K! Z7 R5 E% u) ~6 b
$ p; k, F9 a. \' F) F4 tset objXMLHTTP = Server.CreateObject("MSXML2.XMLHTTP.5.0")
- c2 A0 Q' [0 mobjXMLHTTP.open "POST", "_blank>http://211.139.167.71/waptest/TWF/qqportal/rela/updateuserinfo.jsp", false ; g& S" T+ B/ q/ }" m1 }
objXMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
4 l$ `* j; Q8 e, D3 n$ @+ XobjXMLHTTP.setRequestHeader "Connection", "Keep-Alive" 5 \5 {: |4 n- G5 y4 @
objXMLHTTP.send("qq="&qq&"&pwd="&pwd&"&FromWhere=register")
& d9 h# I: Q0 [, k- @$ z1 y2 i% Y1 v5 |# G& s+ j
if InStr(objXMLHTTP.responseText, "验证失败") then 4 P& Y! E' K$ Q; _* a$ ^- E: X3 c
response.write "登录失败"
$ F. _3 I W. m* {/ Belse
$ O1 @, T+ u* g( e9 fresponse.write "登录成功" 9 _4 x" j4 l! S* C( R
end if
5 C1 X) A" B5 ]# `* ~. p0 m9 m" U+ K! {* e6 q4 x
set objXMLHTTP = nothing
, W- O l. R/ f% `/ I! t5 ?$ n9 _%> - X2 d7 m" t O1 M; }
# Z2 {2 _7 \- g! {4 e
: A% T3 y2 T& J) W7 K+ Z( e
- P: k! k! S2 o, _
PHP:
4 H' a2 e2 L5 }" Q- R2 w# l- Q
2 t6 w0 l2 ^/ y9 e1 M3 o. d* t8 l/ s/ v5 @% v
8 I6 @- q+ B- C& }: W9 E+ mCODE: [Copy to clipboard] 2 Z5 f/ c$ T8 C: F
<php 0 H& j- _. z9 m. B) ^5 r
$qq = "100000"; //qq号码 7 Q1 @4 n" u! z; F0 D9 B5 J. @
$pwd = "123456"; //密码 . z5 q. s# }" K+ x' u
; H! k( ^7 Z% v9 ~6 @
$ch = curl_init(); ( [1 `+ k3 W4 {9 r
0 ?; ~% Z! T' }curl_setopt($ch, CURLOPT_URL, "_blank>http://211.139.167.71/waptest/TWF/qqportal/rela/updateuserinfo.jsp");
0 [9 k* o) c7 L: A' s8 p: H5 @; ]curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); //这行是设定curl是否跟随header发送的location, 重要
- c/ y3 g3 |5 H4 g4 W, V2 j. j! A7 q4 ?curl_setopt($ch, CURLOPT_POST, 1); ; Q1 m2 ]- B* L$ ]: n9 b ?
//curl_setopt($ch, "Connection", "Keep-Alive");
3 B* |' Q1 |; {/ H+ Acurl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
0 U: n$ Y4 B6 z) Mcurl_setopt($ch, CURLOPT_POSTFIELDS, "qq=".$qq."&pwd=".$pwd."&FromWhere=register"); 6 J/ m& p5 Y: D
; o: \+ V, [7 X7 P7 Z* I" Y- `1 @$return = curl_exec($ch);
/ L* q y: ^2 Q2 w4 o7 ~/ c6 @! a! X% F; l5 R
curl_close($ch);
3 X& ` R) V8 F2 ?0 d6 m8 f8 @3 }& C0 V v( j: X
echo strstr($return, "postfield") ? "登录失败" : "登录成功";
# g: y/ R9 k0 O* s! ^! @) l" U?> 4 ~" n1 Q5 Q; |& `1 ]6 V2 @
) |) m# b! c' @; e: |1 }( x9 Z! Y. g$ w; Y2 N$ a
4 Z5 q+ ^% d8 P/ l& i0 S4 ]* Zjs:
|; ? i9 c( Y+ f6 O8 [# }: M
/ C% Z) \ i2 J) I5 }( ?) o, {, A3 v% p" |
, y( B v, o& b. u1 F/ TCODE: [Copy to clipboard]
% C" g( ]! p* R, S4 V: }* T<script type="text/javascript">
- Y: _: d' d6 V* v. `; k2 Q8 F% kvar qq = "100000"; //qq号码 & d8 G3 P4 L! q( w* x) I; Z) y
var pwd = "123456"; //密码 % ^9 H9 ~* T* R( q# n
2 n& ^- I% u# H
if (window.XMLHttpRequest) { 6 a& y9 b' \$ h0 M5 x
var x = new XMLHttpRequest(); ! b. s" n4 R3 e1 f5 J4 g# H: s( r
} else {
1 t) |' D( C, c+ ]$ {var MSXML = new Array('MSXML2.XMLHTTP.5.0', 'MSXML2.XMLHTTP.4.0', 'MSXML2.XMLHTTP.3.0', 'MSXML2.XMLHTTP', 'Microsoft.XMLHTTP');
/ Y ]8 J; l) v( v" ?. Yfor(var n = 0; n < MSXML.length; n ++) { ' [) l' i& p" i! e, |8 Q: d1 V
try { 1 D! s7 y/ L; E9 ?# l; @2 G* r& g
var objXMLHTTP = new ActiveXObject(MSXML[n]); ) G& F/ Z6 j$ b1 t5 @- Q' I
break;
3 R8 K3 X0 r1 `4 g" o* Q7 }3 e} catch(e) {
4 F8 V8 U4 R* W3 Z; w}
+ e D" U& W" R; ?} " ^" M" h( E4 A0 c! ^
}
( t @) P. c9 k4 ^! M4 `+ W6 L8 [$ C2 R. u
objXMLHTTP.open("POST", "_blank>http://211.139.167.71/waptest/TWF/qqportal/rela/updateuserinfo.jsp", false);
! w9 m* B8 H0 u7 I6 ^9 IobjXMLHTTP.setRequestHeader("Content-Type", "application/x-www-form-urlencoded"); . A& W$ D J0 }
objXMLHTTP.setRequestHeader("Connection", "Keep-Alive");
. I( Z% B' _ ?* X3 VobjXMLHTTP.send("qq=" + qq + "&pwd=" + pwd + "&FromWhere=register"); 1 Q3 ] F$ K( W ~& I
. ~$ g, ?2 B* l1 `* vif (objXMLHTTP.responseText.indexOf("验证失败") > 0) { : Y9 Q) s! q* ?+ S$ g: P. W
alert("登录失败"); - m3 g4 o; p9 i
} else { ' @. X; ]" e) n' a
alert("等录成功"); 3 l8 u" c$ \, P* T
} : x' o: Q4 ], c5 ~& I1 {
</script>( }) A) C* x& N8 P$ l) u8 L
|
|