读书人

怎么利用WINSOCK 向FTP发送大文件

发布时间: 2012-12-16 12:02:32 作者: rapoo

求助:如何利用WINSOCK 向FTP发送大文件
小弟近期简单的研究了一下WINSOCK connect FTP的方法
在上传文件的时候遇到了这个问题

经过尝试,我发送40-50M的文件没有问题,一切顺利
而发送一个1.38G的文件,客户端提示 没有可使用的缓冲区空间

代码如下:


dim buff(8191) as byte,lngfile as long
lngfile=filelen(upFile) \ 8192 '这里的upFile 是我要上传的本地文件
for i=0 to lngfile
Open upFile for Binary as #1
get #1,I*8192+1,buff
close #1
winsock1.sendData buff
doevents
next i


在 winsock_sendComplete 事件中写入

winsock1.close


如有需要我再补充!
[最优解释]
打开文件后,你可以每次读一部分如2048字节,并调用send发送,一直循环到发完数据.这里有FTP客户端的实现,你可以参考一下:
http://download.csdn.net/detail/geoff08zhang/4571358

读书人网 >VB

热点推荐