Using this following code block I can able to download any file from my home computer. When I tried in my office it dosen't download anything(even I provided proxy name, port uid/pwd). I use Internet Transfer control. Please advise. Thanks.

Private Sub cmdGo_Click()
Dim bytes() As Byte
Dim fnum As Integer

    cmdGo.Enabled = False
    txtFile.Enabled = False
    txtURL.Enabled = False
    Screen.MousePointer = vbHourglass
    DoEvents

    ' Get the file.
    bytes() = inetDownload.OpenURL( _
        txtURL.Text, icByteArray)

    ' Save the file.
    fnum = FreeFile
    Open txtFile.Text For Binary Access Write As #fnum
    Put #fnum, , bytes()
    Close #fnum

    cmdGo.Enabled = True
    txtFile.Enabled = True
    txtURL.Enabled = True
    Screen.MousePointer = vbDefault
    Beep
End Sub

You should put some checks in your code to see where it fails. For instance, check the bytes array tp see if it holds some data. If not, most probably you have some security issues, like firewall resitriction..

____________________________
If you find the answer helpful, please mark this topic as solved.