| Вопрос: Закачка файлов | Добавлено: 19.11.05 16:10 |
Автор вопроса:  -=Fenix=-
|
|
Привет, подскажи как закачать файл с нета?
к примеру с сайта www.text.ru файлик text.txt (http://www.text.ru /text.txt) |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  astoro ICQ: 649109 Вопросов: 31 Ответов: 391 |
Профиль | | #1 | Добавлено: 21.11.05 08:17 |
|
Public 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 Function DownloadFile(ByVal URL As String, ByVal LocalFilename As String) As Boolean  im lngRetVal As Long
lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0) If lngRetVal = 0 Then ownloadFile = True
Else ownloadFile = False
End If End Function |
||
|
Номер ответа: 2 Автор ответа: DushesICQ: 249195431 Вопросов: 8 Ответов: 110 |
Профиль | | #2 | Добавлено: 24.11.05 13:27 |
| А можно вообще без API обойтись, если юзать AsyncTransfer. | ||
|
Номер ответа: 3 Автор ответа: -=Fenix=- Вопросов: 33 Ответов: 81 |
Профиль | | #3 | Добавлено: 26.11.05 12:55 |
| Огромное псиба | ||
|
Номер ответа: 4 Автор ответа: -=Fenix=-Вопросов: 33 Ответов: 81 |
Профиль | | #4 | Добавлено: 26.11.05 13:14 |
|
если можите киньте примерчик с AsyncTransfer.
и с АПИ, а то у емня чё-то неполучается немного |
||
|
Номер ответа: 5 Автор ответа: DushesICQ: 249195431 Вопросов: 8 Ответов: 110 |
Профиль | | #5 | Добавлено: 28.11.05 11:49 |
| http://www.vb.kiev.ua/code/networks/CSAsyncTransfer.zip | ||
Страница: 1 |