Как получить список файлов с Web сервера

[chira]

К примеру есть папка на web сервере (доступ к файлам свободный)
http://server.ru/download/
В папке находятся некоторое количество файлов, которое надо скачать на диск c:\
Как скачать файл зная его имя я знаю (см. внизу), а вот как скачивать файлы не зная их имен?, т.е. предварительно надо получить список файлов в папке, но как?

Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Public Event ErrorDownload(FromPathName As String, ToPathName As String)
Public Event DownloadComplete(FromPathName As String, ToPathName As String)
Private Sub knopka_Click()
DownloadFile "http://server.ru/download/test.doc", "c:\test.doc")'
End Sub

Public Function DownloadFile(FromPathName As String, ToPathName As String)
If URLDownloadToFile(0, FromPathName, ToPathName, 0, 0) = 0 Then
DownloadFile = True
RaiseEvent DownloadComplete(FromPathName, ToPathName)
Else
DownloadFile = False
RaiseEvent ErrorDownload(FromPathName, ToPathName)
End If
End Function

[alibek]

А есть ли к серверу FTP-доступ?
Если есть, то подключайся по FTP и запрашивай список файлов.

А через HTTP помоему это нереально, разве что считать html-страницу и смотреть по ссылкам.

[chira]

Ftp нет и не будет, доступ только по 80 порту (HTTP)

[codemaster]

Ftp нет и не будет, доступ только по 80 порту (HTTP)

Есть чудная прогр. TeleportPro

пользуй или бери за основу для своей разработки

[chira]

Прога хорошая, но не подходит, мне надо скачивать файлы по расписанию к примеру каждые 10 минут.
Хотелось бы самому написать прогу и засодить в планировщик.

[alibek]

codemaster, разве телепорт ходит не по ссылкам?
Помоему он не умеет находить файлы, на которые нет ссылок.

[codemaster]

codemaster, разве телепорт ходит не по ссылкам?
Помоему он не умеет находить файлы, на которые нет ссылок.

Он действительно не умеет находить файлы, на которые нет ссылок!
Итак исходные данные

Ftp нет и не будет, доступ только по 80 порту (HTTP).

о "ls" cкрипте находящемся на стороне сервера в вопросе ни чего не сказано.

следовательно качаем по ссылкам. Тeleport какраз для этих целей ,
кстати если не ошибаюсь там есть и планировщик.

[chira]

Ребята, web папка создана специально для меня, туда выкладывают в течении дня файлы которые я должен забирать. Внутри папки нет не каких ссылок, только файлы (teleport файлы не видит - я уже попробовал, планировщика там тоже нет).
Каким софтом можно наладить автоматическое скачивание всех файлов с web папки или подскажите код на VB.

[codemaster]

Ребята, web папка создана специально для меня, туда выкладывают в течении дня файлы которые я должен забирать. Внутри папки нет не каких ссылок, только файлы (teleport файлы не видит - я уже попробовал, планировщика там тоже нет).
Каким софтом можно наладить автоматическое скачивание всех файлов с web папки или подскажите код на VB.

Если имена файлов не изменяются то запросто на www.vbip.com
есть примеры.

если имена файлов заранее не известны тогда все гораздо труднее.
как вариант придется на сервере разместить скрипт

[FaKk2]

Создаешь в твоей папке файл .htaccess

В нем пишешь:

Код: Выделить всё

    Options Indexes

Веб браузер по запросу типа

Код: Выделить всё

http://www.tvoisite.ru/tvoyapapka

Выдаст тебе список файлов в директории

[ASD]

Да поможет вам Freewarный Wget под винду. Усе умеет....
Ищите в инете.