Advertisement
TheD3X

Untitled

Mar 25th, 2012
1,226
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Function GetLogin(SentName$,SentPW$)
  2.     TCP = OpenTCPStream(HTTPServerAdress$, 80)
  3.    
  4.     ;HTTP GET
  5.     WriteLine TCP, "GET /login/check.php?name="+SentName$+"&pass="+SentPW$+" HTTP/1.0"
  6.     WriteLine TCP, "Host: siriusmmo.si.ohost.de"
  7.     WriteLine TCP, "Connection: Close"
  8. ;   WriteLine TCP, ""
  9.  
  10.     readacc$=""
  11.     While Not Eof(TCP)
  12.         DebugLog ReadLine$(TCP)
  13.     Wend
  14.     CloseTCPStream TCP
  15.  
  16. End Function
  17.  
  18. (Ends up in)
  19.  
  20. HTTP/1.1 200 OK
  21. Set-Cookie: notabotxxx=19a32bc1df78c99b44982472dadfcc20; expires=Sun, 25-Mar-2012 09:19:22 GMT; path=/; domain=siriusmmo.si.ohost.de
  22. Content-Length: 784
  23. Date: Sun, 25 Mar 2012 08:19:22 GMT
  24. Connection: close
  25. Server: Apache/2.2.16 (Debian) mod_perl/2.0.4 Perl/v5.10.1
  26. Content-Type: text/html; charset=ISO-8859-1
  27.  
  28. (Instead of Echoing)
  29.  
  30. 1 or 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement