Hello everyone!
Being quite a newbie to Inet-programming, I got some questions to you pro-guys:
I use the Inet control to download files from the Internet. I do this by using this function:

Public Function Download(Location As String, Filename As String, DirToSaveTo As String)
Dim DownloadURL As String
DownloadURL = Location & Filename
Dim bData() As Byte
Dim intFile As Integer
intFile = FreeFile()
bData() = Inet1.OpenURL(DownloadURL, icByteArray)
Open DirToSaveAt & "\" & Filename For Binary Access Write _
As #intFile
Put #intFile, , bData()
Close #intFile
End Function

Now my questions are:
1.
Is this the best way to do it? It seemed to be the easyest, and it doesn't need tons of code...

2.
I want to let the user see the progress using a progress bar. For this I need to know the filesize of the File that's downloaded. How do I get this (at best using the same Inet control).

Thanks for your help, hope I'll get some soon...