MSInet downloading gif files

[JonathonC]

The following code overwrites a picture on the users machine with a file downloaded off the Interent by the INet control. But once the download is complete the gif picture cannot be viewed. I think it might have something to do with the 'Binary' part because when downloading plain text files or HTML files it works fine.

Dim b() As Byte
Open App.Path & "\support\" & "gifpicture.gif" For Binary Access Write As #1
b() = Inet1.OpenURL("

http://www.g.com/gifpicture.gif))

Put #1, , b()
Close #1

Thanks,
Jonathon. Computer problems? Have you checked the loose nut in front of the keyboard yet?

 

[JonathonC]

Ignore the previous post, I've just realised that I forgot the ", icByteArray" on the end of the downloading from URL.

Jonathon. Computer problems? Have you checked the loose nut in front of the keyboard yet?