Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Вебмастеру (http://forum.oszone.net/forumdisplay.php?f=22)
-   -   sms (http://forum.oszone.net/showthread.php?t=31801)

local 23-03-2003 09:41 217042

Дайте пожалуйста линк где можно взять скрипт для отправки смс (надо на к-селл)

Interrupt 26-03-2003 01:40 217043

это отправка на "асю" через сокеты, если чуточку поправить, то получишь, то что хочеш :)
Я думаю идея ясна
<?

  flush();

  // поля надо заполнить
  $from='Interrupt';
  $fromemail='email';
  $subject='сабж';
  $to='95055380';  // <-- номер. (Уверен, что кто-нить не догадается :-)
  $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="\r\n";
  $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: www.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."\n\n-------------\n\n\n";
  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);

?>


Время: 07:10.

Время: 07:10.
© OSzone.net 2001-