Это программа отсылает сообщение на Асю. Можно легко переделать в программу отправки сообщений на пейджер (например через page.gate.ru), SMS и другое. При умении анализировать ответ сервера, можно вытаскивать анекдоты c anecdot.ru или курс доллара с rbc.ru. Здесь лишь минимум для задачи:

сформировать запрос из разных полей
открыть сокет
записать запрос

<?

   flush();

   // поля надо заполнить
   $from='Dmitry Borodin';
   $fromemail='ваше_мыло@php.spb.ru';
   $subject='сабж';
   $to='00000000';  // <-- номер. (Уверен, что кто-нить не догадается :-)
   $body='само сообщение';

   $submit='Send Message';        // don't edit
   $ref="http://wwp.icq.com/$to"; // don't edit


   // формирование заголовка
   $PostData=
   "from=".urlencode($from)."&".
   "fromemail=".urlencode($frommail)."&".
   "subject=".urlencode($subject)."&".
   "body=".urlencode($body)."&".
   "to=".urlencode($to)."&".
   "submit=".urlencode($submit);
  
   $len=strlen($PostData);
  
   $nn="rn";
   $zapros=
"POST /scripts/WWPMsg.dll HTTP/1.0".$nn.
"Referer: $ref".$nn.
"Content-Type: application/x-www-form-urlencoded".$nn.
"Content-Length: $len".$nn.
"Host: wwp.icq.com".$nn.
"Accept: */*".$nn.
"Accept-Encoding: gzip, deflate".$nn.
"Connection: Keep-Alive".$nn.
"User-Agent: Mozilla/4.0 (compatible; MSIE 5.01; Windows NT)".$nn.
"".$nn.
"$PostData";

   echo $zapros."nn-------------nnn";
   flush();

   // открываем сокет и шлем заголовок
   $fp = fsockopen("wwp.icq.com", 80, &$errno, &$errstr, 30);
   if(!$fp) { print "$errstr ($errno)<br>n"; exit; }


   // для наглядности выводим заголовок ответа и страницу на экран
   fputs($fp,$zapros);
   print fgets($fp,20048);
   fclose($fp);

?>

Добавлено: 24 Августа 2013 06:29:55 Добавил: Андрей Ковальчук Нравится 0

Добавить