基于TCP的文件传输试验报告

本文格式为Word版，下载可任意编辑——基于TCP的文件传输试验报告

0ThenInput#2,receivedWinsock1.SendDatareceivedEndIfClose#2flag=FalseElse

OpentempfileForOutputAs#2'建立数据缓冲区ReDimdata(bytesTotal)'接收服务器端传输的数据

Winsock1.GetDatadata,vbArray+vbByte'将接收的数据写入文件

Forj=received+1Toreceived+bytesTotalPut#1,j,data(j-received-1)Next

15

'更新已接收的数据

received=received+bytesTotal'更新临时文件Write#2,received

ProgressBar1.Value=Int((received/filelength)*100)'传输完毕

IfProgressBar1.Value>=100ThenStatusBar1.SimpleText=\数据传输完毕！\Close#2'删除临时文件Kill(tempfile)Close#1EndIfClose#2EndIfEndSub

运行效果如图4所示：

16

图4客户端断点续传的效果

4、总结

整个设计到目前为止已基本完成，从选择这个设计课题开始，对winsock控件一无所知到现在能够独立完成本次设计，从中获益非浅。在设计中碰见了好多所未预料的难办的难题，通过图书馆查阅资料，上网探寻相关知识以及通过VB群里的朋友的帮助，逐个逐个的解决难题。同时，对自己程序设计的思维和问题解决能力也是一个很大的提高。

本课题设计了基于VB的网络数据传输的C/S模型以及控制端和受控端模型。其中Winsock控件、文件夹的传输、添加客户端，是设计的重点和难点。每个模块都通过了屡屡的试验和测试。本文通过在VB中使用Winsock控件，实现网络之间的文件传输，更进一步理解了其工作原理。此外，还研究在网络传输文件中要注意的问题，并对怎样处理传输文件比较大时的状况进行了详细的分析，并通过实际的方法实现了文件的“断点续传〞，可以满足实际中的要求，其设计的思想也具有普遍的通用性。

通过此次的毕业设计,从另一个角度加深了自己的编程和软件开发的能力。首先，对设计的需

17

求和功能设计要有全局的了解和把握。在初次拿到这个课题时对winsock控件作了一番了解，简单实现了字符的通信；在此基础上设计本课题需要实现的功能模块。在实际编程过程中，对于客户端的断开再连接实现操作一直是个难题，同时深层次的文件夹传输也困扰了许久。。

在本次设计中所遇到的一些难点，都是由自己寻求各种途径和方案最终将其解决，在编程和设计思路上有了新的提升。

参考文献

[1]崔彦锋，许小荣.VB网络与远程控制编程实例教程[M].北京：北京希望电子出版社，1996.34～65

[2]卞志强.VisualBasic网络程序设计[M].北京：人民邮电出版社，1993.48～93

[3]肖斌，董磊.VisualBasic6网络编程实例教程[M]北京：北京希望电子出版社,1998.47～139

[4]LorenEidahl.VisualBasic控件设计与开发[M].浙江：浙江科学技术出版社，1998.26～89[5]魏江江.VisualBasicAPI编程百例通[M］.北京：科学出版社