何用GET和PUT来拷贝二进制文件？

[cm603]

想用WINSOCK编写一个传送二进制文件的程序，需要用open打开源文件在划分好一小块小块的数据，再用get读
取文件的数据块，用put将读出的数据块放入目标文件，最后凑成完整的文件但我即使不用WINSOCK，直接在同一
台机子上用get和put分块传送文件，我也无法设计成功，请问这是什么会事，如果您有用get和put读取传送文件
的源代码，可否寄给我看？

[TopHead]

get方法：
Dim bit() As Byte
Open "C:\WINDOWS\安装程序.bmp" For Binary As #1
ReDim bit(LOF(1)) As Byte
Get 1, 1, bit
Close 1
put方法：
'然后将字节数组的内容拼装成文件即可
Open "c:\1.bmp" For Binary As #1
Put 1, 1, bit
Close 1

不知道你有什么问题？