求教:把数组保存成二进制文件?

Question

谢谢!

Answer 1

Open "TESTFILE" For Binary Access Write As #1
Put #1, , "文件内容"
Close #1

Answer 2

下面的代码保存后打开为什么是txt格式的啊?
 Inet1.AccessType = icUseDefault
   Dim b() As Byte
   Dim strURL As String   '假定这仍然是一个有效的 URL。
   strURL = "ftp://ftp.microsoft.com/" & _
   "developr/drg/Win32/Autorun.zip"   '把该文件作为字节数组来检索。
   b() = Inet1.OpenURL(strURL, icByteArray)
   
   Open "C:\Temp\Autorun.zip" For Binary Access _
   Write As #1
   Put #1, , b()
   Close #1