?
//###########################################################
//
For questions and comments
Roland (Alias-=: Vlieg: =-)
ICQ #78354631
Mail:vlieg@atoomnet.net
//
Nb:this script won ' t work on free hosting pages, because of the secure mode!
Nb:you must have registered your icq# at http://web.icq.com/sms/login/in the order of this script to work
//###########################################################
\//config:
$uin = ""; Your ICQ number
$PASSW = ""; Your Icqpassword
$PRefix = ""; SMS Prefix
$phonenumber = ""; SMS Phone number
$message = "hello!"; SMS Message
\//en:calculate The content length
$contentlength = (37+
Strlen ($uin) +
Strlen ($PASSW)
);
\//Openen van de Inlogpagina
En:open LoginPage
$htmlreply = "";
$post = "Post http://web.icq.com/karma/dologin/1,,, 00.html http/1.0
Accept:image/gif, Image/x-xbitmap, Image/jpeg, Image/pjpeg, Application/vnd.ms-powerpoint, Application/vnd.ms-Excel , Application/msword, */*
REFERER:HTTP://WEB.ICQ.COM/SMS/LOGIN/1,,, 00.html
Accept-language:nl
content-type:application/x-www-form-urlencoded
Accept-encoding:gzip, deflate
user-agent:mozilla/4.0 (compatible; MSIE 5.0; Windows 98; Digext)
Host:web.icq.com
Content-length: ". $contentlength."
Proxy-connection:keep-alive
Pragma:no-cache
Cookie:uin= ". $uin."; Sms_country= ". $prefix."; Karmaservice1=yes; Uin= ". $uin."; Sms_country= ". $prefix."; Karmaservice1=yes
Uservice=1&ulogin= ". $uin." &upassword= ". $passw." &x=0&y=0 ";
$remote = Fsockopen ("web.icq.com", & $errno, & $errstr, 30);
Global $remote;
Global $post;
Fputs ($remote, $post);
while (!feof ($remote)) {$htmlreply. =fgets ($remote, 120);}
Uncomment for Output:echo "". Htmlspecialchars ($htmlreply). "";
Fclose ($remote);
\//persoonlijke Cookie uit de Inlogpage Halen
En:fetch personal cookie from login page
$splited = Split ("\ n", $htmlreply);
$cookies = $splited [3];
$cookies = Str_replace ("set-cookie:karmalogin=", "", $cookies);
$cookies = Str_replace ("; path=/"," ", $cookies);
$cookies = Str_replace ("\ n", "", $cookies);
Uncomment voor Output:echo $cookies;
if (strlen ($prefix) = = 2) {$contentprefix = '. $prefix;} else {$contentprefix = $prefix;}
$charcount = (160-strlen ($message));
$contentlength = (1561+
Strlen ($message) +
Strlen ($charcount) +
Strlen ($phonenumber) +
Strlen ($prefix)
);
\//verzendpagina Openen met de Opgehaalde cookies
En:open Send page with fetched cookie
$htmlreply = "";
$post = ' Post http://web.icq.com/sms/send_history/1,,, 00.html http/1.0
Accept:image/gif, Image/x-xbitmap, Image/jpeg, Image/pjpeg, Application/vnd.ms-powerpoint, application/vnd.ms-excel , Application/msword, */*
REFERER:HTTP://WEB.ICQ.COM/SMS/SEND_SESSION/1,,, 00.html?prefix=+ '. $prefix. &carrier=&tophone= '. $phonenumber. '
Accept-language:nl
Content-type:multipart/form-data; boundary=---------------------------7D12442EAB4
Accept-encoding:gzip, deflate
user-agent:mozilla/4.0 (compatible; MSIE 5.0; Windows 98; Digext)
Host:web.icq.com
Content-length: '. $contentlength. '
Proxy-connection:keep-alive
Pragma:no-cache
Cookie:uin= '. $uin. '; Sms_country= '. $prefix. '; Karmaservice1=yes; Karmalogin= '. $cookies. '; Uin= '. $uin. '; Sms_country= '. $prefix. '; Karmaservice1=yes; Karmalogin= '. $cookies. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Carrier"
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "prefix"
'. $contentprefix. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Tophone"
'. $phonenumber. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usession"
1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Ureply"
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Ulastid"
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usend"
1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Unextid"
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Uhistorycounter"
1
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Count"
0
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Usubmitcount"
0
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Checknewmsg"
180000
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "CharCount"
'. $charcount. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "MSG"
'. $message. '
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "X"
30
-----------------------------7D12442EAB4
Content-disposition:form-data; Name= "Y"
16
-----------------------------7d12442eab4--
';
$remote = Fsockopen ("web.icq.com", & $errno, & $errstr, 30);
Global $remote;
Global $post;
Fputs ($remote, $post);
while (!feof ($remote)) {$htmlreply. =fgets ($remote, 120);}
Uncomment for Output:echo "". Htmlspecialchars ($htmlreply). "";
Fclose ($remote);
\//Check if message is send if send ' moved Permanently ' is returned
if (eregi (' Moved Permanently ', $htmlreply))
{echo "Sms message successfully sent!";}
Else
{echo ' Sms not sent! ';}
?>