Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> закачать набор файлов с клиента, закачать набор файлов с клиента 
:(
    Опции темы
WERT
Дата 25.6.2007, 15:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 9
Регистрация: 25.6.2007

Репутация: нет
Всего: нет



Проблема!
Нужно через одну форму закачать несколько файлов. Т.е. пользователь указывает директорию, где лежат. Названия файлов известны, набор их ограничен, никаких проверок на наличие и т.п. делать не надо.
С одним файлом- то всё просто:
Формирование формы получения файла
  use CGI qw(:standard);
  sub to_page { submit(-NAME => ".State", -class=> "but", -VALUE => shift) }

sub take_f
{      print hr, h3("2. Редактирование имеющегося файла описателя:");

      print start_multipart_form( );
    print "<br><input type=file size=50 name=in_file><br>";
    print to_page("Загрузить");
    print end_form();
}

Обработчик полученного файла
  sub load_f {
        my $active = shift;
      unless ($active) {return;}
  
    print h1("Файл загружен");
        print p("Получены следующие параметры:");
    my $paste = param("in_file");
    my $date= localtime(time);
    my $time=substr($date,11,8);
    $time=~s/:/_/g;
    my $filename="D:/Results/tests/".$machine{$ENV{'REMOTE_ADDR'}}.$time."_temp.xml";

    open FI, ">".$filename;
    while(<$paste>){print FI;};
    close FI;    
    my $build_in=base_sat_cgi::from_razbor($filename);
    if ($build_in==4){sat_menu2( );}
    else {sat_menu( );}
  }
PM MAIL   Вверх
dimes
Дата 25.6.2007, 18:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 249
Регистрация: 20.7.2004
Где: то около СПБ

Репутация: нет
Всего: 14



Белых решений не существует. 
Perl тут тебе ничем не поможет, а элемент "file" хорошо защищен что бы с ним можно работать через js+html
Самое простое, учи пользователей пользоваться ZIP-ом что бы закачивать не кучу файлов а всего один или учи java однажды мне попадался на глаза красивый загрузчик на нем... но это было давно и не правда ;)
PM ICQ   Вверх
WERT
Дата 26.6.2007, 08:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 9
Регистрация: 25.6.2007

Репутация: нет
Всего: нет



Т.е. если с помощью Java, то нужно предварительно на клиента java поставить или библиотек накачать.
Просто на mail.ru при отправке письма возможно указывать несколько файлов и насколько я помню ничего на клиента не подкачивается.
PM MAIL   Вверх
dimes
Дата 26.6.2007, 08:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 249
Регистрация: 20.7.2004
Где: то около СПБ

Репутация: нет
Всего: 14



Вот именно что несколько файлов. Каждый файл выбирается отдельно а не вся папка целиком.


Цитата(WERT @  26.6.2007,  09:02 Найти цитируемый пост)
Т.е. если с помощью Java, то нужно предварительно на клиента java поставить или библиотек накачать.

Лучше сначала посоветуйся с профессионалами, они тебе либо все объяснят либо скажут что это и на java сделать нельзя ;)

PM ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl: CGI программирование"
korob2001
sharq
  • В этом разделе обсуждаются вопросы относящиеся только к CGI программированию
  • Если ваш вопрос не относится к системному или CGI программированию, задавайте его в общем разделе
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", качать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: разработка для Web | Следующая тема »


 




[ Время генерации скрипта: 0.0605 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.