Download Progess

I asked this question a while ago but it didnt really get solved. My program downloads the HTML of the page you can see below. I would like to create a progess bar to show the progress of the download. I can not seem to be able to get the file size and the amount of the file downloaded therefore not allowing me to create a working progress bar. Any help?

VB Code:

Private Sub CmdDowload_Click()
 
Dim sHTML, URL As String
 
URL = "http://www.nats.co.uk/operational/pibs/pib1.shtml"
 
sHTML = Inet1.OpenURL(URL)
 
MsgBox ("COMPLETE")
End Sub

this link may help you.

I suggest you make a small research in VB forums before making a new thread

One of the libarys will not register on my PC so I can not use that. I had searched and found that. But I thought these forums were suppose to be dynamic places where people help you find the answer to what you want not just one big knowledge base.