INET Control

23 Mar 2006 11:40 PM

Rick

I need to download a file from an http server. Is this data right?
I don't get any result. Inet1 is the Internet Transfer Control.

    Inet1.UserName = "MyUser"
    Inet1.Password = "MyPwd"
    Inet1.AccessType = icUseDefault
    Inet1.Protocol = icHTTP
    Inet1.URL = "999.99.999.999" 'Fake ip address for htttp server
    Inet1.OpenURL
    Do While Inet1.StillExecuting = True: Loop
    Inet1.Execute , "CD " & Chr(34) & "/folder1/Folder2/MyFolder/" & Chr(34)
    Do While Inet1.StillExecuting = True: Loop
    Timer1.Enabled = True
    Inet1.Execute , "GET " & "MyFile.ext" & " " & Destination
    Do While Inet1.StillExecuting = True: Loop
    Inet1.Execute , "CLOSE "
    Inet1.Execute , "QUIT "

--
Rick

24 Mar 2006 1:22 PM

Larry Serflaten

"Rick" <R***@discussions.microsoft.com> wrote

> I need to download a file from an http server. Is this data right?
> I don't get any result. Inet1 is the Internet Transfer Control.
>

rearrange your commands to set the URL first.

>     Inet1.URL = "999.99.999.999" 'Fake ip address for htttp server
>     Inet1.UserName = "MyUser"
>     Inet1.Password = "MyPwd"

See if that helps...

LFS