Download a file from the Internet and show the status

[programmer]

Hello,
------

How can I download a file from the internet and also show the status of the file that im downloading? I want it to be exactly like im downloading a file from the internet using Internet Explorer or Netscape.

Thanks in advance!!

[Serge]

Sure thing. Try something like this:

Private Declare Function DoFileDownload Lib "shdocvw.dll" (ByVal lpszFile As String) As Long


Private Sub Command1_Click()
   
   Dim strDownload As String
   
   strDownload = "http://www.MySite.com/myfile.zip"
   strDownload = StrConv(strDownload , vbUnicode)
   Call DoFileDownload(strDownload )
   
End Sub

This will show the IE's download dialog box.

[dj4]

Serge!!!

Your example bring out Common Dialog("Save as").

But I want automatically save file example App.Path folder and using same name.

How I can do this??

- Dj4

[VBGuy74]

Hi there...

I am working on a program that will open an internet connection, and based on the user's choice (via a dropdown combobox) go to the determined web page and also show the html source. The problem is that I have tried to display the source with a textbox and a richtextbox, and the source is not complete. Could it be that those components reached the maximum storage capacity and everything was 'truncated'? If so, how can I capture and display the source within my application?

I'll apreciate any help.

Sincerely,

VBGuy74