Показать сообщение отдельно
Старый 13.12.2001, 18:28
AlexSm вне форума Посмотреть профиль Отправить личное сообщение для AlexSm Найти все сообщения от AlexSm
  № 2  
AlexSm
 
Аватар для AlexSm

Регистрация: Aug 2001
Адрес: Москва
Сообщений: 275
По умолчанию Ура! Я сам сделал.

Спасибо всем кто не ответил.
Сам сделал.
Единственное что, читать удалось только в _root

Если кому будет Интересно Вот пример.

Count - Динамик ТХТ.

в первом кадре пишем:
_root.URL = "http://localhost/cgi-bin/flash.pl";
_root.OldCount=-1;
_root.Count=0;


Во втором кадре:
if (_root.OldCount !=_root.Count){
loadVariables (_root.URL+"?Count="+_root.Count,"_root");
_root.OldCount=_root.Count;
}


В третьем кадре:
gotoAndPlay(2);


В CGI-BIN кладем flash.pl
Следующего вида:

#!/usr/bin/perl
use strict;
use CGI;
my $q = new CGI;
print "Content-type: text/html\n\n";
if (defined ($q->param("Count"))){
print "\n\n&Count=".(int($q->param("Count"))+1);
}
else{
print "\n\n&Count=Error! Param Count not defined.";
}


Вуаля! Наблюдаем как МЕДЛЕННО работает эта гадость.
Но работает.

ОТСЮДА ВОПРОС !

Как бы _Любыми_способами_ сделать скоростной обмен данными. Например с цеью сделать нечто вроде сетевой игрульки. Если есть идеи, пишите!