VBNet - Форум - Давайте разбираться ! Inet Transfer

Вопрос: Давайте разбираться ! Inet Transfer Добавлено: 15.12.02 23:15

Автор вопроса: EROS

Парни! Вот такая беда....
Почему у меня прога вываливается из цикла, если даже файл НЕ СКАЧАН! Как проконтролировать, что файл на самом деле скачан... 3 раза работает нормально, а на 4-прокол. Фигня какая-то... Может кто уже сталкивался? Какие у Inet Transfer есть свойства, проверка значений которых поможет определить в цикле, закачка закончена или нет.... И как добиться того, чтобы он ждал завершения закачки... Братва, выручай!!!
Inet1.Protocol = icFTP
Inet1.Execute "ftp://lidergroup:267471@ftp.fromru.com", "GET " & FromPathName & " " & ToPathName
While Inet1.StillExecuting And DoEvents
DoEvents
Wend
DownloadFile = True

Ответить

Ответы Всего ответов: 4

Номер ответа: 1
Автор ответа:

AASoft

Вопросов: 86
Ответов: 920

Профиль | | #1

Добавлено: 16.12.02 07:48

Perepishi kod vot tak:

Inet1.Protocol = icFTP

Inet1.Execute "ftp://lidergroup:267471@ftp.fromru.com", "GET " & FromPathName & " " & ToPathName

While Inet1.StillExecuting

DoEvents

Wend

If Dir$(ToPathName) = "" Then

DownloadFile = True

Else

MsgBox "Could not download the file!!!",,vbCritical

DownloadFile = False

End If

Ответить

Номер ответа: 2
Автор ответа:

EROS

Вопросов: 58
Ответов: 4255

Профиль | | #2

Добавлено: 16.12.02 21:58

VisualBasic.NET/// эта добавочка в твоем коде просто проверяет наличие скачанного файла на диске.Но делает это после того как выйдет из цикла.В принципе идея интересная, как дополнительная обработка ошибок. Но! Весь фокус в том что у меня на машине этот код работает, а на другой даже и не пытается... Я так думаю, что если бы проге чего-то не хватало(в смысле DLL,OCX/...) она бы ошибку выдала, материться начала... А у меня тишина... Она выходит из цикла, будто все скачала...Ничего необычного.. Но на винте файла нет!!! Чего делать?