Закачка файлов из интернета с отображением прогресса закачивания

@tomaticus · Регистрация: 02.01.2011

Author24 — интернет-сервис помощи студентам

VB.NET

1	My.Computer.Network.DownloadFile("http://cdimage.debian.org/debian-cd/6.0.3/multi-arch/iso-cd/debian-6.0.3-amd64-i386-netinst.iso", "debian-6.0.3-amd64-i386-netinst.iso")

как я понял , это команда отвечает за скачивание файла из интернета, а как отслеживать сколько скачалось? например как в торренте ну или в браузерах.
Единственная идея , делить размер файла на 100% , и каждую переменную делать statusbar на statusbar+1.
думаю это велосипед,может есть что-то еще?

Памирыч · 17.11.2011, 15:43

tomaticus, в FAQ есть с прогрессбаром.

@tomaticus · 17.11.2011, 20:49 **[ТС]**

Не нашел.
А как отслеживать скорость скачивания?

Добавлено через 2 часа 14 минут
НТТР?

Памирыч · 17.11.2011, 20:52

Сообщение от tomaticus

Не нашел

Второй пост

VB.NET

    Dim WithEvents wc As New System.Net.WebClient 'Создаем событие, вызываемое WebClient
   
    Private Sub ButtonDownload_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ButtonDownload.Click
        wc.DownloadFileAsync(New Uri("откуда качаем"), "куда сохраняем")
    End Sub
   
    Private Sub wc_DownloadFileCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) Handles wc.DownloadFileCompleted
        ProgressBar1.Value = 0 'Загрузки завершены
    End Sub
   
    Private Sub wc_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles wc.DownloadProgressChanged
        ProgressBar1.Value = e.ProgressPercentage 'Показываем прогресс скачивания
    End Sub

Насчет скорости не видал, но думаю, отсюда можно как-нибудь и скорость рассчитать, имхо

@tomaticus · 17.11.2011, 22:06 **[ТС]**

Не качает,что-то

Памирыч · 17.11.2011, 22:08

tomaticus, кнопка называется ButtonDownload?
Процедура не мертвая?

@tomaticus · 18.11.2011, 14:12 **[ТС]**

Памирыч, неа.

Добавлено через 16 секунд
Памирыч, ну с кнпокой - да,с процедурой - нет)

Памирыч · 18.11.2011, 14:15

tomaticus, скопируй сюда код, посмотрим

@tomaticus · 18.11.2011, 14:34 **[ТС]**

VB.NET

Public Class Form1
 
    Dim WithEvents wc As New System.Net.WebClient 'Создаем событие, вызываемое WebClient
 
    Private Sub ButtonDownload_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        wc.DownloadFileAsync(New Uri("http://cdimage.debian.org/debian-cd/6.0.3/multi-arch/iso-cd/debian-6.0.3-amd64-i386-netinst.iso"), "D:")
    End Sub
 
    Private Sub wc_DownloadFileCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) Handles wc.DownloadFileCompleted
        ProgressBar1.Value = 0 'Загрузки завершены
    End Sub
 
    Private Sub wc_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles wc.DownloadProgressChanged
        ProgressBar1.Value = e.ProgressPercentage 'Показываем прогресс скачивания
    End Sub
End Class

Памирыч · 18.11.2011, 14:36

tomaticus, как и говорил, процедура мертвая
Кинь кнопку, дважды щелкни по ней и в ее коде напиши

VB.NET

1	wc.DownloadFileAsync(New Uri("http://cdimage.debian.org/debian-cd/6.0.3/multi-arch/iso-cd/debian-6.0.3-amd64-i386-netinst.iso"), "D:")

И потом, "Куда сохраняем" - у тебя указан диск D:\
А надо еще имя указать, например
D:\bla-bla.iso

@tomaticus · 18.11.2011, 16:59 **[ТС]**

Теперь работает.
Дак может как то можно узнать скорость скачивания?

Добавлено через 10 секунд
И время до конца)

@KingManiya · 19.11.2011, 13:38

Дак может как то можно узнать скорость скачивания?

Добавлено через 10 секунд
И время до конца)

Это делается просто. Раз ты видишь прогресс скачивания, значит ты можешь замерить сколько скачалось за интервал допустим в 1 секунду. Зная сколько ты за 1 секунду скачал, можно посчитать скорость в чем тебе нужно. Зная сколько осталось качать и скорость скачивания можно легко получить оставшееся время скачивания.

Не по теме:

Памирыч, спасибо за поздравление!)

@tomaticus · 23.11.2011, 15:33 **[ТС]**

KingManiya, это все логично,и понятно,мне не нужен велосипед,хочу одну функцию.

@_Лёша_ · 23.11.2011, 19:02

Типо того )))

@_Лёша_ · 26.11.2011, 22:33

Сообщение от _Лёша_

Типо того )))

Ваще если честно, со скоростью очень врет )))

@Serega_96 · 27.11.2011, 17:20

VB.NET

1	My.Computer.network.downloadfile(ссылка , путь к файлу , true , 60000 , true)

Первая true обозначает что прогрес загрузки будет показыватся
60000 время ожидания ответа сервера
И еще true если есть уже такой файл то заменить его

Добавлено через 1 час 15 минут
Извиняюсь ошибка))

VB.NET

1	My.Computer.Network.DownloadFile(ссылка, путь куда файл сохранить, Login, Password, True, 60000, True)

Login и Password можно оставить пустыми

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	17.11.2011, 15:43	2
	tomaticus, в FAQ есть с прогрессбаром. 1

@tomaticus 51 / 51 / 5 Регистрация: 02.01.2011 Сообщений: 503
	17.11.2011, 20:49 [ТС]	3
	Не нашел. А как отслеживать скорость скачивания? Добавлено через 2 часа 14 минут НТТР? 0

@tomaticus 51 / 51 / 5 Регистрация: 02.01.2011 Сообщений: 503
	17.11.2011, 22:06 [ТС]	5
	Не качает,что-то 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	17.11.2011, 22:08	6
	tomaticus, кнопка называется ButtonDownload? Процедура не мертвая? 0

@tomaticus 51 / 51 / 5 Регистрация: 02.01.2011 Сообщений: 503
	18.11.2011, 14:12 [ТС]	7
	Памирыч, неа. Добавлено через 16 секунд Памирыч, ну с кнпокой - да,с процедурой - нет) 0

Памирыч Почетный модератор 21400 / 9134 / 1083 Регистрация: 11.04.2010 Сообщений: 11,014
	18.11.2011, 14:15	8
	tomaticus, скопируй сюда код, посмотрим 0

@tomaticus 51 / 51 / 5 Регистрация: 02.01.2011 Сообщений: 503
	18.11.2011, 16:59 [ТС]	11
	Теперь работает. Дак может как то можно узнать скорость скачивания? Добавлено через 10 секунд И время до конца) 0

@KingManiya 203 / 203 / 13 Регистрация: 14.10.2011 Сообщений: 227
	19.11.2011, 13:38	12
	Дак может как то можно узнать скорость скачивания? Добавлено через 10 секунд И время до конца) Это делается просто. Раз ты видишь прогресс скачивания, значит ты можешь замерить сколько скачалось за интервал допустим в 1 секунду. Зная сколько ты за 1 секунду скачал, можно посчитать скорость в чем тебе нужно. Зная сколько осталось качать и скорость скачивания можно легко получить оставшееся время скачивания. Не по теме: Памирыч, спасибо за поздравление!) 0

@tomaticus 51 / 51 / 5 Регистрация: 02.01.2011 Сообщений: 503
	23.11.2011, 15:33 [ТС]	13
	KingManiya, это все логично,и понятно,мне не нужен велосипед,хочу одну функцию. 0

@_Лёша_ 386 / 375 / 22 Регистрация: 08.02.2011 Сообщений: 1,078
	26.11.2011, 22:33	15
	Сообщение от _Лёша_ Типо того ))) Ваще если честно, со скоростью очень врет ))) 0

Закачка файлов из интернета с отображением прогресса закачивания

Решение