Advertisement
C_Volume2 Coding Standards #74769

Simple internet file download

Downloads a file from the internet

AI

AIサマリー: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.

ソースコード
original-source
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
オリジナルのコメント (3)
Wayback Machineから復元