View previous topic :: View next topic |
Author |
Message |
_aas_
Joined: 22 Jan 2005 Posts: 5
|
(Separately) Posted: Sun Jul 31, 2005 12:54 Post subject: потоки в FTP |
|
|
Можно каким-нибудь образом организовать так, чтобы ТС при скачке с FTP использовал одну очередь при фоновом копировании. При f5-f2 он всегда создает новую. Приходится вручную переключаться в окошко очереди и через 'серый +' добавлять файлики. |
|
Back to top |
|
|
_aas_
Joined: 22 Jan 2005 Posts: 5
|
(Separately) Posted: Mon Aug 01, 2005 17:15 Post subject: |
|
|
Че, никто с таким не маялся? |
|
Back to top |
|
|
metos
Joined: 01 Aug 2005 Posts: 5
|
(Separately) Posted: Mon Aug 01, 2005 19:15 Post subject: |
|
|
Да я тоже замаялся с этим. Ведь ftp-серверы обычно не дают создать более 2 потоков. Приходится обычно ждать окончания текущего процесса , а это достаёт ! |
|
Back to top |
|
|
HomeDimoN
Joined: 09 Sep 2005 Posts: 3
|
(Separately) Posted: Fri Sep 09, 2005 20:56 Post subject: Total commander + ReGet = |
|
|
Кто знаком с KillCopy и имеет ReGet может попробовать присоединить для скачивания такой скриптик:
Code: |
desc="" ' Коментарии
ref="" ' это для закачки с HTTP:
addr="" ' аресс который качает по умолчанию
Confirm=True ' нужно ли подтверждение (если надо менять путь куда сохранять, коментарии то пускай True, иначе False)
' Разбор переданых параметров
' WScript.Arguments(0) - ссылка на файл который надо скачать передаеться в тело процедуры без обработки (во сказал)
' WScript.Arguments(1) - Коментарии к файлу если пусто то берем из переменной desc
If WScript.Arguments.Count>1 Then desc=WScript.Arguments(1)
' WScript.Arguments(2) - Reffer это для закачки с HTTP: (откуда пришли на страницу - актуально для антилича, narod.ru и т.д.)
If WScript.Arguments.Count>2 Then ref=WScript.Arguments(2)
' WScript.Arguments(3) - требовать ли подтверждения при передачи ссылки ReGET если незадано то берем из переменной Confirm
If WScript.Arguments.Count>3 Then If CStr(WScript.Arguments(3))="NoConfirm" Then Confirm=False
AddLink WScript.Arguments(0), desc, ref, Confirm
Sub AddLink(ByVal Url, ByVal Info, ByVal Refer, ByVal Confirm)
Set Catch = CreateObject("ReGetDx.ReGetDownloadApi")
With Catch
.Info = Info
.Confirmation = Confirm
.Url = Url
.Referer = Refer
.AddDownload
.saveto = "c:\temp\" ' немогу понять API. Ссылка есть, а неработает (по идее куда сохранять файл)
End With
End Sub
|
Создаем файл.
Вставляем туда код.
Сохраняем.
Содаем кнопку на пенели на этот скрипт.
теперь достаточно перетащить на эту кнопку файл как её схватит ReGet и будет качать в соответствии со своими настройками.
Коментарии:
Позволяет перетаскивать только по одному файлу (короче ташиш несколько на закачку идет только первый)
Не работает "Куда сохранять" скачиваемый файл (немогу понять почему)
Переменная Confirm может принимать значения True и False. При True появляеться диалоговое окно в котором можно указать дополнительные параметры. False означает что качать сразу без вопросов, файл сохраняеться в директорию по умолчанию. |
|
Back to top |
|
|
Volniy
Joined: 15 Dec 2004 Posts: 585 Location: Местный
|
(Separately) Posted: Sat Sep 10, 2005 02:13 Post subject: |
|
|
RegetDX - это имхо из пушки по воробьям.
Но если уж и использовать внешние утилиты, то самая крутая весчь для этого - это Transfer Engine, который идет в комплекте CuteFTP Pro и поддерживающий COM. Множество (около 80!) нормально документированных свойств и методов. Причем он не запускает интерфейс CuteFTP Pro, а работает сам и с минимальными затратами ресурсов системы. Кроме того, он не только умеет загружать, но и выгружать файлы на сервер. В поставке образцы скриптов на разных языках программирования, документация.
Короче, глобальная штука. Рекомендую попробовать, не пожалеете. |
|
Back to top |
|
|
|