Форум: "Сети";
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];
ВнизКак закачать файл на сервер через www Найти похожие ветки
← →
Baatars (2002-01-16 19:06) [1]О-епрст. Еле нашел свой вопрос. Хоть бы какое-то уведомление было что вопрос перенесен в другой раздел.
Казалось бы, передавать в качестве параметра имя файла -
Делаю NMHTTP1.Post(MyURL,"filename=c:\autoexec.bat");
но в данном случае - КАК УКАЗАТЬ ЧТО ЭТО ФАЙЛ?
Параметр береться просто как значение.
Вот скрипт который обрабатывает закаченные файлы:
#!/usr/bin/perl -w
use lib "..";
use CGI qw(:standard);
use CGI::Carp qw/fatalsToBrowser/;
print header();
print start_html("Загрузка файла на mymesi.pp.ru");
print h1("File Upload");
print start_multipart_form(),
"Введите имя файла с путем:",
filefield("filename","",45),
br,
p,
reset,submit("submit","Послать"),
endform;
open(FTXT,">$ENV{DOCUMENT_ROOT}/file.tmp") or die ("$! Error");
if ($file = param("filename"))
{
while (<$file>)
{
print $_ . br;
print FTXT $_;
}
}
close FTXT;
print b("$file").br."\n";
print end_html;
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2002.04.01;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c