Главная страница


ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Nikolay Leschev                      2:5020/400     09 Jan 2004  16:58:40
 To : Denis Poznyakov
 Subject : Re: Net::ICQ
 -------------------------------------------------------------------------------- 
 
 Denis Poznyakov wrote:
 
 >>>Net::ICQ, как я понимаю, предназначен для прошлой (чуть ли не
 >>>позапрошлой) версии ICQ, уже не поддерживаемой мирабилисом.  Hадо
 >>>пользоваться Net::ICQ2000.
 >>>
 >>
 >>Ходил на dnk-patches.org ничего подходящего не нашел для себя
 >>
 >>Поставил Net::ICQ2000 те же яйца только в профиль коннекчусь к серваку
 >>коннектится отправляю сообщение (даже в цикле) ноль эмоций
 >>
 >>Мне всего лишь надо одно сообщение отправить
 > 
 > 
 > если сообщение больше (непомню сколько) символов - то не пройдет
 > или возможно не правильно отдаешь
 
 сообщение маленькое отдовал
 больше 450 символов
 
 > 
 > коннект то хоть появляется ?
 > 
 > 
 
 Все вопрос решен всем спасибо кто откликнулся
 
 Антиофтопик
 Решение выглядит вот так
 #!/usr/bin/perl
 use Net::ICQ2000;
 $icq = Net::ICQ2000->new('223110332', '?', 1);
 
 #$icq->Set_Debugging(3);
 $icq->Connect();
 
 while (1) {
   $icq->Execute_Once();
   if ($icq->{_LoggedIn})
      {
      Send_ICQ_Message('1537360','lalala');
      }
 
   sleep 1;
 }
 
 sub Send_ICQ_Message {
   my ($uin, $text) = @_;
   my $details;
 
   $details->{uin} = $uin;
   $details->{text} = $text;
   $details->{MessageType} = "text";
 
   $icq->Send_Command("Cmd_Send_Message", $details);
 }
 
 тока шлет в цикле но думаю это уже не самая больша проблемма
 
 --- ifmail v.2.15dev5.1
  * Origin: Communication Company MARK-ITT (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

 Тема:    Автор:    Дата:  
 Net::ICQ   Nikolay Leschev   08 Jan 2004 17:11:11 
 Re: Net::ICQ   Artem Chuprina   08 Jan 2004 18:36:31 
 Re: Net::ICQ   Nikolay Leschev   09 Jan 2004 13:51:49 
 Re: Net::ICQ   Denis Poznyakov   09 Jan 2004 16:44:41 
 Re: Net::ICQ   Nikolay Leschev   09 Jan 2004 16:58:40 
 Re: Net::ICQ   Andrei Mikhailenko   10 Jan 2004 10:29:45 
Архивное /ru.perl/437021cb9f93.html, оценка 1 из 5, голосов 10
Яндекс.Метрика
Valid HTML 4.01 Transitional