Forum Webscript.Ru

Программирование => PHP => Тема начата: obytatel от 23 Июня 2002, 06:12:02

Название: Автосабминт...
Отправлено: obytatel от 23 Июня 2002, 06:12:02

Вопрос возможно смешной. Нужен простой пример рабочего скрипта по автосабминту.

Название: Автосабминт...
Отправлено: Messerscmitt от 23 Июня 2002, 11:40:18

вот простой рабочий скрипт:


$a="text";

auto_submit($a);

?>

Название: Автосабминт...
Отправлено: Меняздесьдавнонет от 24 Июня 2002, 00:27:40

Формы придуманы для людей, а не для скриптов.

Название: Автосабминт...
Отправлено: от 24 Июня 2002, 14:51:12

Messerscmitt, очень смешно, ХА-ХА-ХА...

Название: Автосабминт...
Отправлено: Covex от 24 Июня 2002, 23:45:04

а яваскриптом не хочешь. такой примерно одноразовый таймер :

Код: [Выделить]





Название: Автосабминт...
Отправлено: obytatel от 29 Июня 2002, 03:57:27

Ладно, поставим вопрос по другому: чего же ентот скрипт хочет?

$url="http://127.0.0.2/submit.php";
$port=80;
$fp=@fsockopen($host,$port,$errno,$errstr,120);
$ret="";
$req=substr($url,$p);
if ($fp)
{
fputs($fp,"POST $req HTTP/1.0\\r\\n");
fputs($fp,"Accept: */*n");
fputs($fp,"Accept-Language: enn");
fputs($fp,"Connection: Keep-Aliven");
fputs($fp,"User-Agent: Mozilla/4.0 (compatible; MSIE 5.5; Windows98");
fputs($fp,"Referer: http://127.0.0.2/submit.html\\r\\n");
fputs($fp,"Content-type: application/x-www-form-urlencodeden");
$out="";
while (list ($k,$v) = each ($data))
{
if(strlen($out)!=0)  $out .= "&";
$out.=rawurlencode($k)."=".rawurlencode($v);
}
// error prase пишет вот здесь:
$out=trim($out);
// а что он имеет ввиду непонятно - скрипт-то отдолженый на питерском форуме
//в русском мануале trim() вообще отсутствует :(
fputs($fp,"Content-lenght:"strlen($out)"\\r\\n\\r\\n");
fputs($fp,"$out");
fputs($fp,"\\r\\n");
while(!feof($fp))
{
$ret=fgets($fp,128);
}
fclose($fp);
}
?>
Объясните что к чему мне недалёкому.

Название: Автосабминт...
Отправлено: Sad Raven от 29 Июня 2002, 12:23:14

Может:
$out = trim ("$out");
?

Название: Автосабминт...
Отправлено: Covex от 30 Июня 2002, 12:07:36

string trim (string str)
рубать пустоты в начале и конце  str, пустоты это "\\n", "\\r", "\\t", "\\v", "\\0" и пробел(plain space)

что имеет ввиду - загадка,  а еще я не понял:

Цитировать

$req=substr($url,$p);

1) зачем если в $p  не установлено значение----> вернет целиком исходную строку.
2) $ret="\'; -  зачем нужна

Название: Автосабминт...
Отправлено: Sad Raven от 30 Июня 2002, 13:13:10

Цитировать

2) $ret="\'; - зачем нужна

$ret=""; и $out=""; - это, видимо, экзотический способ объявления переменных. Зачем - это уже второй вопрос. Важен сам процесс.

Название: Автосабминт...
Отправлено: GotZfild от 30 Июня 2002, 14:05:10

Цитировать

fputs($fp,"Content-lenght:"strlen($out)"\\r\\n\\r\\n");

А где у нас конкатенация?

Название: Автосабминт...
Отправлено: obytatel от 03 Июля 2002, 03:24:32

ну вот в принципе я и пришёл к тому с чего начал: попроще есть способы?
Бзы,  "конкатенация" - это что за зверь?
Вялики дзякуй за увагу:)

Название: Автосабминт...
Отправлено: от 03 Июля 2002, 03:35:47

Цитировать

Бзы, "конкатенация" - это что за зверь?

$aaa = "конкатенация";
$bbb = "зверь";
$ccc = $aaa." - это что за ".$bbb."?";
Что-то в этом духе. :)

Название: Автосабминт...
Отправлено: Sad Raven от 03 Июля 2002, 03:37:05

Цитировать

Бзы, "конкатенация" - это что за зверь?

$aaa = "конкатенация";
$bbb = "зверь";
$ccc = $aaa." - это что за ".$bbb."?";
Что-то в этом духе. :)

Название: Автосабминт...
Отправлено: Sad Raven от 03 Июля 2002, 03:43:08

Второй раз уже косякопорю со входом. Sorry about this.

Хотя, с другой стороны, можно гораздо меньше долбить по клавиатуре (в частности по Ctrl+Shift):
$aaa = "конкатенация";
$bbb = "зверь";
$ccc = "$aaa - это что за $bbb?";
Одлжно быть либо:
fputs($fp,"Content-lenght:".strlen($out)."\\r\\n\\r\\n");
Либо:
$a = strlen($out);
fputs($fp,"Content-lenght: $a\\r\\n\\r\\n");

Название: Автосабминт...
Отправлено: obytatel от 03 Июля 2002, 04:32:13

Sad Raven, спасибо за советы. Учтём и применим :)