FTP客户端的设计与实现Word文档下载推荐.docx
《FTP客户端的设计与实现Word文档下载推荐.docx》由会员分享,可在线阅读,更多相关《FTP客户端的设计与实现Word文档下载推荐.docx(11页珍藏版)》请在冰豆网上搜索。
VisualBasic6.0自带的一些功能控件可以帮助我们实现网络通信的功能,是我们网络编程中的一个重要的编程工具。
2.2WindowsAPI函数介绍
Win32API也就是MicrosoftWindows32位平台的应用程序编程接口。
WindowsAPI可以提供形形色色的服务,凡是在Windows操作系统环境下开发的应用程序,都可以调用WindowsAPI。
2.3InternetTransfer控件介绍
InternetTransfer控件是微软为方便使用者设计Internet应用程序所提供的一种控件。
它提供两种Internetprotocol:
HTTP及FTP。
我们在使用时,必须先设置好它的存取方式。
存取方式分为直接连接或通过proxy来连接Internet网络两种。
当我们设置好相关参数之后,InternetTransfer控件提供两个method(OpenURL及Execute)让我们执行网络相关操作,我们可以用这两个命令来执行一些Internetcommand。
2.4WindowsSocket控件
Socket由UNIX操作系统逐步移植到Windows,WindowsSocket规范于90年代初,依次有1.0、1.1、2.0和3.0。
WindowsSocket规范定义并记录了如何使用API;
Socket是网络通信的基本操作单元,目前Windows支持两种套接口:
流套接口和数据报套接口。
TCP/IP中的TCP协议使用的是流套接口,提供了面向连接的、无差错的、发送先后顺序一致、包长度不限和非重复的网络信息包的传输。
TCP/IP中的UDP则使用数据报套接口,该接口提供双向的、有序的、无重复并有记录边界的数据报服务。
2.5FTP基础理论知识
FTP是TCP/IP的一种具体应用,它工作在OSI模型的第七层,TCP模型的第四层,即应用层,同时在传输层使用TCP,所以FTP客户在和服务器建立连接前就要经过一个被称作"
三次握手"
的过程。
其连接是可靠的,传输是面向连接的,所以能为数据传输提供可靠的保证。
使用FTP时必须首先登录,在远程主机上获得相应的权限以后,方可上传或下载文件。
但其违背了Internet的开放性,为此系统管理员建立了一个特殊的用户ID,名为anonymous,Internet上的任何人在任何地方都可使用该用户ID。
习惯上,人们用自己的E-mail地址作为口令。
2.6FTP工作原理
FTP协议中,控制连接均由客户端发起,而数据连接有两种工作方式:
PORT方式和PASV方式。
下面以PORT方式为例,如图1所示:
①FTP服务器运行FTP守护进程,等待用户的FTP请求。
②用户运行FTP命令,请求FTP服务器为其服务
③FTP守护进程收到用户的FTP请求后,派生出FTP子进程与用户进程
交互,建立文件传输控制连接,使用TCP端口21。
④用户输入FTP子命令,服务器接收子命令,如命令正确,双方各派生一个数据传输进程FTP-DATA,建立数据连接,使用TCP端口20进行数据传输。
⑤本次子命令请求的数据传输完毕,拆除数据连接,结束FTP-DATA进程。
⑥用户继续输入FTP子命令,重复④、⑤的过程,直至用户输入quit命令,
双方拆除控制连接,结束文件传输,结束FTP子进程。
图1FTP工作原理示意图
3详细设计
3.1程序数据流程图
FTP的客户端程序设计的主要内容如图2所示:
客户登录模块、FTP服务器目录浏览模块、上传和下载模块。
设计流程:
客户端程序先连接服务器,然后浏览FTP服务器目录,选择文件下载或上传,进行文件数据传输,最后断开连接[2,3]。
3.2系统界面设计
系统界面主要包括以下几个方面的内容:
登录部分、远程目录浏览部分、本地目录文件浏览部分等。
系统界面是在新建窗体的基础上将其Caption改为“FTP客户端”,增加相应的文本框、命令按钮等一些控件实现,具体如图3所示
图2程序数据流程图
图3系统界面
3.3模块设计
3.3.1登录模块
为使客户端能登录服务器,须设置以下属性:
◆FTP服务器地址:
txtserver
◆用户名:
txtuser
◆密码:
txtpassword
◆端口号:
txtport(一般为21)
txtuser及txtpassword代表登录此FTP服务器所需要的用户名及密码,若两者皆为空字符串,则代表是以anonymous(匿名)身份登入;
若输入用户名与密码,Connect会以此做为其用户名及密码与FTP服务器建立连接;
随后是对“连接”按钮的设置,实现与服务器端的连接[4]。
以下为“连接”命令按钮的代码:
PrivateSubcmdConnect_Click()
IfNotbActiveSessionAndhOpen<
>
0Then
IftxtServer.Text="
"
Then
MsgBox"
Pleaseenteraservername!
ExitSub
EndIf
DimnFlagAsLong
IfchkPassive.ValueThen
nFlag=INTERNET_FLAG_PASSIVE
Else
nFlag=0
IfhConnection=0Then
bActiveSession=False
ErrorOutErr.LastDllError,"
InternetConnect"
bActiveSession=True
EnableUI(CBool(hOpen))
FillTreeViewControl(txtServer.Text)
FtpEnumDirectory("
)
IfEnumItemNameBag.Count=0ThenExitSub
EndSub
3.3.2浏览模块
3.3.2.1远程端浏览模块
本模块是通过对treeview控件的设置以及相关代码的编写来实现对FTP服务器默认目录与文件的读取。
当建立连接成功之后,通过函数调用取得FTP服务器端默认最大的目录(FTP服务器针对不同用户开放不同的目录名称)。
当然FTP服务器端也必须开放目录读取权限,允许客户端连接登录及浏览目录,否则Connect的执行将失效[5,6,7]。
3.3.2.2本地浏览模块
本地浏览模块通过DriveComboBox、DirectoryListBox和FileListBox三个控件设计实现。
DriveComboBox用于设置驱动器,DirectoryListBox用于显示当前驱动器所有文件与目录,FileListBox用于显示所选中的文件夹中的所有文件。
3.3.3文件上传下载模块
文件传输是一个双向的过程,既可以把服务器上的文件下载到指定的文件下,也可以把本地某文件上传到服务器。
3.3.3.1文件下载模块
文件下载是通过点击“下载”按钮来完成对选定的远程目录下文件的下载。
此功能实现主要是通过程序获取本地和远程的当前路径,区分被选中的内容类型为文件还是目录,若为文件时执行下载过程,否则退出。
以下为“下载”命令按钮的代码[8]:
PrivateSubcmdGet_Click()
DimbRetAsBoolean
DimszFileRemoteAsString,szDirRemoteAsString,szFileLocalAsString
DimszTempStringAsString
DimnPosAsLong,nTempAsLong
DimnodXAsNode
SetnodX=TreeView1.SelectedItem
IfbActiveSessionThen
IfnodXIsNothingThen
PleaseselecttheitemtoGET!
szTempString=TreeView1.SelectedItem.Text
szFileRemote=szTempString
nPos=0
nTemp=0
Do
nTemp=InStr(1,szTempString,"
/"
vbBinaryCompare)
IfnTemp=0ThenExitDo
szTempString=Right(szTempString,Len(szTempString)-nTemp)
nPos=nTemp+nPos
Loop
szDirRemote=Left(szFileRemote,nPos)
szFileRemote=Right(szFileRemote,Len(szFileRemote)-nPos)
szFileLocal=File1.Path
rcdszDirRemote
bRet=FtpGetFile(hConnection,szFileRemote,szFileLocal&
&
szFileRemote,
False,INTERNET_FLAG_RELOAD,dwType,0)
File1.Refresh
IfbRet=FalseThenErrorOutErr.LastDllError,"
FtpGetFile"
Notinsession"
EndSub
3.3.3.2文件上传模块
文件上传是通过点击“上传”按钮来完成对选定的本地文件的上传。
上传文件基本与下载文件类似,但FTP服务器端必须开放目录写入的权限,并允许修改FTP服务器目录下文件,否则,上传动作将失败。
以下为“上传”命令按钮的代码[9,10]:
PrivateSubcmdPut_Click()
SetnodX=TreeView1.SelectedItem
PleaseselectaremotedirectorytoPUTto!
IfnodX.Image="
leaf"
IfFile1.FileName="
Pleaseselectalocalfiletoput"
szTempString=nodX.Text
szDirRemote=Right(szTempString,Len(szTempString)-Len(txtServer.Text))
szFileRemote=File1.FileName
szFileLocal=File1.Path&
"
\"
&
File1.FileName
If(szDirRemote="
)ThenszDirRemote="
rcdszDirRemote
bRet=FtpPutFile(hConnection,szFileLocal,szFileRemote,dwType,0)
IfbRet=FalseThen
FtpPutFile"
EndIf
DimnodChildAsNode,nodNextChildAsNode
SetnodChild=nodX.Child
IfnodChildIsNothingThenExitDo
SetnodNextChild=nodChild.Next
TreeView1.Nodes.RemovenodChild.Index
IfnodNextChildIsNothingThenExitDo
SetnodChild=nodNextChild
closed"
nodX.Image="
open"
FtpEnumDirectory(nodX.Text)
FillTreeViewControl(nodX.Text)
4系统设计测试与分析
首先找到一个可以使用的FTP服务器的地址或自己配置一个FTP服务器,随后取得相应的权限。
运行设计完成的FTP客户端,并填写相关内容,点击“连接”按钮正常连入主机,具体如图4所示:
可以看到左边的是远程服务器端的文件与目录,而右边是本地文件与目录,我们可以点击“上传”和“下载”两个按钮对文件进行上传或下载操作,非常简捷,方便。
当完成相关操作后,我们可以点击“断开”命令按钮来断开FTP连接,以保证FTP用户正确安全的退出。
实验测试表明我们设计的FTP客户端程序已经实现了标准的FTP客户端的基本功能。
图4连接成功后系统界面
5结束语
通过此次毕业设计,我发现了自己在做工作中的许多不足,认识到了知识与实践联系的重要性,体会到只有不断的充实自己,不断的挑战自我,才能在今后的工作生活中获得更多的收获。
毕业设计是对自己的一个挑战,同时毕业设计也作为几年来学习成果的检验,让我学习到了很多东西。
虽然只有短短的几个月,但它将对我以后的前进道路产生深远的影响。
在此向所有帮助我的老师和同学致谢!
参考文献
[1]谢希仁.计算机网络(第4版)[M].北京:
电子工业出版社,2003:
284-289.
[2]黄嘉辉.VisualBasic.NET网络程序设计[M].北京:
清华大学出版社,2003:
17-268.
[3]张毅.VB应用技巧与常见问题你问我答[M].北京:
机械工业出版社,2003:
13-166.
[4]赵洁.同步FTP上载/下载程序的实现技术[J].计算机系统应用,2002(6):
38-40.
[5]吴光明.使用开发FTP客户端应用程序[J].河北理工学院学报,2005,27
(1):
59-64.
[6]谷震离,杜根远,谷新黎.VB应用程序开发与设计[J].许昌师专学报,2002,21
(2):
57-61.
[7]丁亚明.VB中的变量及参数传递[J].微型电脑应用,2002(7):
59-63.
[8]严仲兴.浅谈面向对象的程序设计思想[J].电脑知识与技术,2006(12):
139-158.
[9]李书浩,齐治昌.程序设计规则检查:
一种保障软件质量的基本方法[J].计算机科学,2003,30(11):
148-151.
[10]W.RichardStevens.TCP/IP详解卷1[M].北京:
机械工业出版社,2000:
14-324.
TheDesignandImplementofFTPClient
GUOYuan-jia
Abstract:
FTP(FileTransferProtocol)isaapplicationlayerprotocolinTCP/IPfamily.FTPclientterminalprogramalsooffersvisualanddirectwayoftransportingfiles.Clientscanfinishtherelevantoperationjustbydraggingthemouthandmakingchoice.ThetextmainlytellsyouhowtouseVisualBasicandWindowsAPIfunctiontoimplementeveryfunctionoftheFTPclient,finallyaccomplishthedevelopmentoftheVisualBasicapplicationprogram.
Keywords:
VB;
WindowsAPI