Загрузка файлов через WEB форму на сервер

[Sergey2]

Сообщение от Jensi

А в php.ini file_uploads = On или off?
На локальном компе тоже не работает? И может стоит попробовать так:

http://sait.ru/www/my/

http://www.google.com.ua/codesearch?...title&resnum=4

p.s.: с этой функцией не работал, не пинать

неее. На локальном не пробовал, но нашел код, который грузит файлы. Причем я не могу тепеьр понять почему пример из темы не работает. Ща ковыряю

[Sergey2]

Сообщение от ADSoft

да.... конечно же в $Out должен быть путь.... куда сохраняется файл... ну и ; конечно же нужно...

еще method правилдьно написать и все будет работать И на том спасибо. Двое суток бился головой об стену

пойду php изучать, раз с первлом не сраслось

[mv28jam]

Ну народ вы даёте, вы же будущие программисты(Серёга-jensi ты прям меня расстроил!)

PHP код:

move_uploaded_file($_FILES['FILE']['tmp_name'],'/www/my/') 


'/www/my/' - это директория, а имя файла в ней какое будет?

[wall66]

Сообщение от mv28jam

...

наша цель - не написать код за автора, а помочь разобраться в вопросе

[mv28jam]

Прошу прощения за флуд: но я с Вами абсолютно согласен...
просто не мог смотреть на мучения

[Sergey2]

Сообщение от mv28jam

'/www/my/' - это директория, а имя файла в ней какое будет?

Ну во первых в реальности я там так и писал на всякий случай с именем фалйа, а сюда кинул "подправленный" кусок. Во вторых, когда там нет имени файла ошибка совсем другая...
С php я разобрался. Кусок рабочит, косяк был в форме. Но с перлом не получается

[wall66]

Сообщение от Sergey2

Но с перлом не получается

да у нас тоже

[Sergey2]

УРА!!!!!!!!!!! Я сделал это!!!!
Самое странное, что несмотря на всякие надписи на форумах "этот пример рабочий", в этом самом примере есть ошибки...

#!/usr/bin/perl 

use CGI qw/:standard/; 

# Код для HTML-формы 
print "Content-Type: text/html\n\n"; 
print "<form method=\"post\" enctype=\"multipart/form-data\" action=\"\">"; 
print "<input type=\"file\" name=\"picture\">"; 
print "<input type=\"submit\" name=\"Submit\" value=\"Submit\">"; 
print "</form>"; 

#end of print form 

insert_image() if (param()); 

sub insert_image { 
# путь к директории для закачки директория 
# должна иметь право на запись для 
# пользователя, под которым работает веб-сервер 
my $downpath = "/www/ausa/www/htdocs/my/"; 

my $in=param('picture'); 

# выделяем имя файла из параметра 
my ($name) = $in =~ m#([^\/:]+)$#; 

open(OUT,">$downpath$name"); 
binmode(OUT); 
# читаем входной поток и пишем в файл 
while (<$in>) { 
print OUT $_; 
} 
close(OUT); 

# выводим надпись о закачке файла <$name> 
print "Upload file: $name"; 
}