How to download a file with the OpenURL method of the Internet Transfer control
-------------------------------------------------------------------------------

This snippet allows you to retrieve a file from the internet and make a copy
of it in your HD. If you want to access a text file (or HTML file) and use it
later in your program,you might want to consider retrieving it in a string
rather than a byte array.

Dim bFile() as Byte         ' Retrieving a binary file.

' Retrieve the file.
bFile() = Inet1.OpenURL ("ftp://ftp.geocities.com/home.htm", icByteArray)

' Write file to disk.
Open App.path & "\home.htm" For Binary Access Write As #1
Put #1, , bFile()
Close #1