• Home
 · 
• Coding Standards
 · 
• Simple internet file download

Simple internet file download

Downloads a file from the internet

Assumes
You must load the Internet Transfer Control (msinet.ocx)

Rate Simple internet file download

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Dim File2() As Byte
File2() = Inet1.OpenURL("http://www.alleghany.k12.nc.us/chat/chatclie/chatclie.exe", icByteArray) ' Download file
Open "C:\windows\desktop\chatupdate.exe" For Binary Access Write As #1 ' Choose local path
Put #1, , File2()
Close #1