FTP客户端课程设计报告书知识培训资料

PAGE第32页《计算机网络》课程设计课题名称课题名称ＦＴＰ客户机搭建学院信息工程学院专业网络工程班级学号姓名目录和索引一、需求分析——－－——－-－-———-————-—－—－－－--—-－－－-－2１、功能需求2、开发环境与工具3、所需要知识二、知识理解-－—--－———-－－-－--—-——－－--－－－—--－－-—－－-—２1、ＦTP实现的基本原理（1）概要（2）上传和下载（3）用户ＦTP和匿名FTP（4）ASＣIＩ和Ｂinａry（5)Port和Ｐａsｓｉve三、完成进度-—-—－－—-－-－-—-—－-—-—-——-－————--—-—－－－－31、已完成部分２、未完成部分3、还需改善的部分四、FＴP服务工作过程－－－－—--－—－--—－－—-—--－—-－-—-－４五、详细设计-－—--－-———-—－—-——－-——－－-—－5１、CFtpDｌg类的一些函数定义………………5２、CFtｐOpeｒate的一些函数定义……………1７六、测试结果--———－－-－－—－－--—-－－—－－——-－-－—-—-—-—-－29七、用户手册—－—-—-———--————--－-——--—－—－—－—－--—32八、实验总结-———-———－—-－—－－－—-－—－—－————－－-32ＦTＰ客户端程序一、需求分析１、功能需求(1）实现一个图形用户界面的FＴＰ客户端，保证文件的安全传输和存储。（２)提供登录界面，上传下载界面、帮助界面、关于界面。（3）通过输入服务器地址、用户名和密码，可以实现远程FTＰ主机的登录。（４）提供本地文件和文件夹的上传功能，可对ＦTP主机文件进行下载和删除文件。（5）提供对本地目录的读取与返回，能正确列出文件和文件夹,在没有登录服务器前可以作为一个简单的文件查询工具对本地文件进行查询。（6）帮助页面可以对用户提供使用说明。(７）关于界面包含设计者的信息.（9)要求开发出的FTP客户端符合标准FTP协议规范，支持AＳＣII传输模式和二进制数据传输模式（10）FTＰ的两种工作模式的选择Porｔ模式（主动)和Ｐａssivｅ模式（被动）2、开发环境与工具(1)使用的ＩＤE:使用VC+＋６。0作为开发环境IDＥ（２）使用的语言:C＋+（３）使用的开发包:使用MFＣ和WｉnInet（４）开发平台：Ｗinｄows7３、所需要知识(1）计算机网络的基本知识（2)了解ＦTP基本实现原理(２）使用VC＋+6．0IDE进行ＭＦC程序开发的基本知识（3)熟悉WｉnＩnet中属于FTP部分的操作(４)熟悉文件或文件夹操作(5)熟悉控件的操作，如在LiｓtCtｒoｌ添加图片（浏览文件或文夹的图标）二、知识理解１、FTP实现的基本原理（1）概要Ｉntｅrnｅｔ是一个非常复杂的计算机环境，Inｔernet上的计算机已有上千万台,而这些计算机可能运行不同的操作系统，有运行Ｕｎiｘ的HＹPEＲLIＮK"http：/／baｉke.ｂａiｄｕ．com/vieｗ/899.htm＂＼t＂_blａnｋ"服务器，也有运行Ｄos、Ｗindows的PC机等等，而各种操作系统之间的文件交流问题，需要建立一个统一的文件传输协议,这就是所谓的ＦＴP。基于不同的操作系统有不同的FTP应用程序，而所有这些应用程序都遵守同一种协议,这样用户就可以把自己的文件传送给别人，或者从其它的用户环境中获得文件。FTP也是一个客户机/服务器系统。用户通过一个支持FTP协议的客户机程序，连接到在远程主机上的FＴＰ服务器程序。用户通过客户机程序向服务器程序发出命令，服务器程序执行用户所发出的命令，并将执行的结果返回到客户机。使用FTＰ时必须首先登录，在远程主机上获得相应的权限以后,方可下载或上传文件.（2）上传和下载＂下载”文件就是从远程主机拷贝文件至自己的计算机上;"上传"文件就是将文件从自己的计算机中拷贝至远程主机上（3）用户ＦＴＰ和匿名FTＰ用户FTP：种方式为已在FTP服务器上建立了特定帐号的用户使用,需要合法的用户名和密码才能登录到远程计算机传输文件.匿名FTP:用户作为“anonｙmoｕs"登录到FTP服务器,不需要有自己的用户名和密码。（4)ASＣII和ＢinaｒyASCII:文本传输器使用ＡSCII字符，并由回车键和换行符分开Binａry:二进制不用转换或格式化就可传字符，二进制模式比文本模式更快,并且可以传输所有ASCII值，所以系统管理员一般将FTＰ设置成二进制模式。（5)Ｐorｔ和PasｓiveＰoｒｔ模式（主动)：FＴＰ客户端首先和FＴＰ服务器的ＴＣP21端口建立连接，通过这个通道发送命令，客户端需要接收数据的时候在这个通道上发送PORT命令。PＯRT命令包含了客户端用什么端口接收数据。在传送数据的时候,服务器端通过自己的TCP20端口连接至客户端的指定端口发送数据。FTPseｒver必须和客户端建立一个新的连接用来传送数据。Paｓｓｉve模式(被动）：Pａsｓｉve模式在建立控制通道的时候和Stanｄard模式类似，但建立连接后发送的不是Pｏrｔ命令，而是Paｓv命令.FTP服务器收到Pasｖ命令后,随机打开一个高端端口(端口号大于102４)并且通知客户端在这个端口上传送数据的请求，客户端连接FTP服务器此端口,然后ＦTP服务器将通过这个端口进行数据的传送，这个时候FTPsｅrver不再需要建立一个新的和客户端之间的连接。三、完成进度1、已完成部分(1)实现一个图形用户界面的FTP客户端,保证文件的安全传输和存储.（2)提供登录界面，上传下载界面、帮助界面、关于界面（3）通过输入服务器地址、用户名和密码,可以实现远程FTP主机的登录.（4）提供本地文件上传功能,可对FTＰ主机文件进行下载和删除文件。（5)提供对本地目录的读取与返回，能正确列出文件和文件夹，在没有登录服务器前可以作为一个简单的文件查询工具对本地文件进行查询。(6)帮助页面可以对用户提供使用说明。（7)关于界面包含设计者的信息(帮助界面和关于界面整合在一起）。(9）支持ＡSCＩI传输模式和二进制数据传输模式，外加自动选择的模式（10)ＦTP的两种工作模式的选择Port模式（主动）和Pａｓｓive模式（被动）(11）提供用户操作的状态信息输出2、未完成部分只提供了本地文件的上传功能，暂时不能提供文件夹的上传功能，由于当初没有使用多线程对服务器端进行操作，若上传或下载的文件过大，会导致界面陷入长时间的不响应中。由于时间问题，就不再进行多线程的扩充,也就不提供文件夹的上传功能。3、还需改善的部分（1）使用多线程进行操作(2)提供文件夹上传和文件夹下载功能(３)改进界面,提供更方便的操作(4）增加上传和下载的队列（5)同时可连接多个FTＰ服务器(6）改善提示信息(7）账户.密码等用户资料在本地加密后保存(8）增加更多的功能，如下载完成后关机等（9）等………四、FTＰ服务工作程 五、详细设计（1）CFtpＤlg类的一些函数定义BOOLCFtｐDlｇ:：OnIniｔDiaｌoｇ(）{ CDialoｇ::OｎＩｎitDialog（）;ﻩ/／Ａdd＂Aｂｏut。。.”menuｉtｅmtoｓysｔemmenu. //IDM_ABOUTBＯXmuｓｔbｅiｎtheｓyｓｔｍａｎｄｒaｎgｅ.ﻩASSEＲＴ(（IDM_ＡBＯＵＴBOX＆0xFFF０）==IDM＿ＡBOUTBOＸ）；ﻩＡSSERT（IＤM_ABOUTBOＸ〈0xF00０）； ＣMenu*pSysＭenu＝GetSysteｍMenu(FALＳE);ﻩif(ｐSysMenu！=ＮULL)ﻩ{ﻩﻩCＳtrinｇｓtrAboｕｔMenｕ；ﻩﻩsｔrAbｏｕｔＭｅnu。LoａｄStｒing（ＩDＳ＿ＡBＯUＴＢOX）;ﻩﻩif（！stｒAboｕtMenu.IｓEｍpty()） ﻩ｛ﻩﻩﻩpSysMｅｎu－＞AppendＭenｕ（MF_SEPAＲATＯR）; ﻩﻩpＳysMenu->AppenｄMeｎu(MF_SＴRING，IＤＭ＿ＡBＯUTＢOX，strAbouｔMenｕ）;ﻩﻩ}ﻩ｝ﻩSetIcoｎ(m＿ｈＩｃｏn，TRUE);ﻩﻩ SetIcon（m_hＩcｏn,FALSE）;ﻩﻩ m_ctrBｉnarｙ。SetChecｋ(1）；m_ctｒAｃtｉvｅ。SetＣheck(1)；m_eｄitPｏrt。ＳetWindowＴexｔ（"21＂）；ﻩbBｉnａry1=１；//使用二进制ｂＰassｉve1＝0;//使用主动ｍyＰort=２１；ﻩm_imgLｉst．Create(20，２0,ILC_COＬOR3２，0，0）；/／创建图像列表m＿ｉmgＬｉst.SeｔBkＣｏlor（RＧB(2５5,255，255)）；//文件夹图标hIcｏｎＦolｄ=：:LoadIcoｎ（ＡfxＧetRｅsourceHaｎdle（)，MAＫEINTREＳOURCE（IＤI_FOLDＥR)）;//文件图标hIｃonFile=：：LoadＩｃoｎ（AfxGeｔResｏuｒceHaｎdle()，ＭＡKＥＩNＴＲESOUＲCE（IDI_ＦIＬE）); ｍ＿ｉmgＬisｔ。Adｄ(ｈIcoｎFold)；m_imgＬist．Add(hIcoｎFilｅ)；ｍ_ctrlLocａｌFile。SetImageLisｔ（＆m_iｍgＬist,LＶＳIL_SMALL）；／/关联m＿ctｒlＳerverＦile.SetImageＬist（&m_iｍｇLｉst，LVSIL_SMALL)；／/关联 m_ｅｄitServer。SｅｔWｉndｏwText("ftp：//”); m_editName.SetWindowText(””）; ｍ_edｉtPａｓsｗord．SｅｔWiｎdowTexｔ（””）;ﻩm_ｂｔnＣoｎ。EｎableＷiｎdow(ＴRUE)；ﻩm_btnＣｌo.EnabｌeWｉnｄｏw（ＦAＬSＥ）； m_ctrlLocalFile．SetExteｎdｅdＳｔyle（LＶS_EX_FULＬROWSELECＴ｜LＶＳ_ＥＸ_GRＩDLINＥＳ); m＿cｔｒlServerFｉle.SetＥxtendeｄＳｔyle(LVＳ_EX_FULＬROWSEＬECT｜LＶS_EX_ＧRIDLＩNES）；ﻩm＿ｃtrlLocａlＦiｌe.IｎsｅｒtColumn（0，”文件名”，LVCFMＴ＿LEFT,1４0,０)；//设置列m_ctrlLocalFiｌｅ.InsertColumn（１，”文件类型",LVCFMT_LEＦT，100，1）;m_ctrｌLocａlFilｅ．ＩｎsertCoｌumｎ（２，”修改日期"，LＶCFMＴ＿LEFT，1０0，2); m_cｔrlSｅrvｅrFｉle。InsertＣoｌumn（０,"文件名＂，ＬVＣＦMT＿ＬEＦT,140，0);//设置列m_ctrlＳerverFilｅ．InseｒtＣoluｍn（１,＂文件类型”，LＶCFMT_LEFT，1００,1）;m_ctｒlSeｒverFｉle.InsｅrtＣolumn（2，＂修改日期”，LVＣＦMT_ＬEＦＴ，10０,2）； /／添加硬盘盘符ﻩsiｚe＿tszAｌlDrivｅStｒings=:：GeｔLｏｇicaｌＤｒiveSｔrings(0,NＵLＬ)；ﻩTCHAR*pDrivｅStｒings=newTＣHＡR［szAlｌDrivｅStｒinｇs+ｓｉzeof(_Ｔ（””））］;ﻩＧetLｏgｉcalDｒiveStrｉnｇs（sｚＡｌｌＤriveStrings,pDriveStrｉnｇｓ）；ﻩsize_tszDriveString=：：strlen(pDriｖｅStｒｉｎｇｓ）; wｈiｌｅ（szDriｖｅStrinｇ〉0）ﻩ｛ﻩ m_ctrｌLocａｌ．ＡddStrinｇ(pDriveＳtrings）; pＤｒiｖeＳｔrinｇs+=szDｒiveStriｎg+1； ｓzＤriveStｒｉnｇ=:：sｔrlen（pDｒｉveStrings）; ｝ ｉnｔinｄex=m_ｃtrlLoｃａl。FiｎdＳtｒing（0,”ｃ：\\”)； m＿ctrlLocal.SetＣuｒSel（iｎdeｘ);ﻩm_strLocPａth＝"c：＼＼"；//初始化为c盘 LｉstＬocFiｌe()；ﻩｃFtpＯpr．seｔEidt(&ｍ_ediMessaｇe）；ﻩｒeturnTRUＥ；//reｔuｒnTRUＥunleｓsyousｅttheｆocusｔoaｃontｒｏｌ｝voiｄCFtpDｌｇ：：OnＳyｓCｏmｍａｎd（ＵINTnID,LＰARAＭlPaｒaｍ)｛ﻩif(（ｎID&0xFFF0）＝=IDM_ABOＵＴＢOX） ｛ CAｂｏutDlgｄｌgAｂoｕt；ﻩﻩdlｇAbouｔ。DoModaｌ（）；ﻩ｝ eｌseﻩ｛ﻩﻩCＤialｏg：:ＯnＳysComｍａｎｄ（nID，lPaｒam）； ｝｝ｖoｉdCFtｐDlｇ：:OｎPainｔ(）｛ if(IsIcｏniｃ()）ﻩ｛ ﻩCPainｔDCdc（this）;//ｄevicｅｃoｎtextforpaiｎｔinｇﻩﻩSendMessaｇe(WM_ICONERASEＢKGNＤ,（ＷＰARAM）dｃ.GetSafeHdｃ（），0）;ﻩﻩinｔｃxIcon=GｅtSｙstemMetrics(SM_ＣＸICON）； ﻩiｎtcｙＩｃon=GｅtＳystemMetrics(SM_CYICON）;ﻩﻩCＲectrｅct；ﻩ GetCｌienｔRect(＆rect）; intx=(rect。Ｗidｔh()-cxIcon＋1)／2； ｉnｔy=(reｃt.Ｈeight（)－cｙIcｏｎ+1)/2； ﻩdｃ。DrawＩｃon（x，y,m_hIｃoｎ）； ｝ else {ﻩﻩCDialoｇ:：OnPａint（)；ﻩ}}ＨＣＵRSORCFtpDlg::OnQuｅryDrａｇIcon（）｛ﻩｒeturn（ＨCＵＲSOＲ)m＿hＩcon；｝//连接服务器voidＣFtpDｌg:：OnBtｎＣｏnneｃｔ（){ﻩ//TODO:Ａdｄyouｒcontrolnotificationhａndlercodehｅrｅm_ｅｄｉtServｅr。GetWiｎdoｗＴexｔ（m_strSｅrver)；／/记录FTP服务器地址 CSｔringstrtemp; m＿ｅditPoｒt.GetWiｎｄoｗTｅxt（strtｅmｐ);ﻩmｙPort=：:atoｉ（strtemp）；//获得设置的端口号ﻩiｎti; if(bAnony==0)ﻩ｛／/不使用匿名ﻩﻩm_ediｔNamｅ。GetＷindｏwText（ｍ_ｓtrName)；／/记录FTP登陆用户名ﻩm_editPassｗord.GeｔWｉｎｄoｗＴexｔ(m_strPaｓswoｒｄ）;//记录FＴP登陆用户密码ﻩﻩｉ＝cFtpＯｐr.seｔ（m＿strServｅr,m_ｓｔrＮａmｅ，m_ｓtrPasｓwoｒd)； ｝ﻩelｓe {//使用匿名 CStｒiｎgstrNamｅTeｍp； ﻩm_editName．ＧｅtWindowＴeｘt(strＮameＴemp)；//匿名登陆的用户名ﻩﻩi=cFtpOpr．ｓet（m_sｔrServer，ｓtrＮameＴemｐ，＂＂）;ﻩﻩ } if(ｉ） ｛//设置成功，打开连接iｆ（cFtpＯpr．ＯｐenConnecｔｉon（）) ﻩ{//连接成功 m_btnClo。EnableＷindow（TＲUＥ）; ﻩﻩｍ＿btnＣｏn。ＥnablｅＷinｄow（ＦAＬSE)；ﻩ UpｄａｔｅServｅｒＦile(）；/／更新服务器的文件显示 ﻩ ｍ_cｔｒlＳｅｒｖer。RｅsｅｔＣonteｎｔ（）;ﻩﻩﻩＣStriｎｇtｅｍp; ﻩﻩcFｔｐOpr。GetPath（teｍp）；ﻩﻩﻩｍ＿ctrlSｅrver。AddStrｉng（(LＰSＴＲ）(LPCTSTR）tｅmｐ）；m_ctrlSerｖｅr．SeｔCｕrSel（０);ﻩﻩﻩｍ_chkAｎony．EnabｌｅＷindoｗ（FAＬSE）；ﻩﻩﻩｍ_cｔｒAcｔive。EnableWindｏｗ(FＡＬSＥ)； CＢuttｏｎ＊teｍｐ2＝（CＢｕtton＊）GetDlｇItem（IＤＣ_PASSIVＥ)； ﻩ teｍp2-＞EnableＷindｏｗ（FAＬＳE)；ﻩﻩ m＿eｄitPort。EｎableWｉｎdｏw(FALSＥ）；｝ ﻩeｌseﻩ {ﻩﻩ //连接失败ﻩ ｝ ｝｝voidCFtpDlg:：OnBｔｎClose(）{／/关闭连接 if（cFtｐOpr.CloseConnｅctioｎ(）) ｛／/关闭成功 ﻩm_ｂtnClo.EｎablｅWindow（ＦALＳE）； ﻩm＿btnCoｎ.EnaｂｌｅWｉｎdｏw(ＴRＵE)；ﻩ m_ctrlServeｒFｉlｅ。DeleteAllIteｍs(）; m_ctｒlSeｒver。ResetＣｏｎtent()；ﻩ m_cｔrActｉｖe.EnableWindow（TＲUE）; CBuｔton＊temp2=（CBuｔｔｏn＊)GetDlｇItem(IＤC_PASＳIVＥ); tｅmｐ2—>EｎablｅWinｄow（TRUE)；ﻩ m_eｄitPｏrｔ.EnabｌeＷｉndow（TＲUＥ）;ﻩﻩｍ＿chkＡnｏny.EnableＷindow（TＲUE）； }｝/／双击本地文件列表控件中的选项voiｄCFtpDlｇ::OｎDblclｋLｉｓtLoｃalfile(NMＨDＲ*ｐNMHDR,LＲESULＴ＊pＲesｕｌt){ﻩ/／TODO：ＡddyourcoｎｔrｏlnotifiｃaｔｉonhandleｒcodeheｒeﻩPOSITIONp=ｍ_ctｒｌLｏcaｌＦiｌｅ．ＧeｔFｉrｓｔＳeｌｅcｔedItemPｏsitiｏn();ﻩif（p＝=ＮULL） { retｕrn； ｝ﻩ//获取刚选取的位置的下标(从0开始的） intindex=m_ｃtrlLocaｌFｉle.ＧetNexｔSｅｌｅctedItem(p）;ﻩ//获得选中的内容 ／／得到第indeｘ行.第０列的内容(下标从0开始) CStringＦｉrsｔColumn=ｍ_cｔｒｌLocalFile．GetＩtemText（inｄｅx，０）；CStringＳeｃoｎdColumn=ｍ＿ｃtｒlＬocalFile．ＧetItemText(ｉnｄex，1）; if（indeｘ==0）//返回上层目录 ｛ ﻩinｔk＝ｍ_ｓtrLｏcPatｈ.ＧeｔLengtｈ（）－１；ﻩﻩｉf（m＿ｓtrLocPath.Ｒighｔ（2)==”：＼\")ﻩ ｛ﻩﻩﻩｒetｕrn； ﻩ} ﻩ/／删除当层的项目ﻩﻩｉntｉx=m＿ctrlLｏｃaｌ。FindStrｉng（０,m_sｔｒLoｃPaｔｈ)；ﻩﻩｉf（ix!=CＢ＿ＥRR)ﻩﻩ｛ m＿ctrlLoｃal.DｅｌｅtｅStriｎｇ(iｘ)； ｝ﻩﻩｆｏr（inｔj＝k—1；j>=2；－－j)ﻩ ｛ﻩﻩ if(m_stｒＬocＰａth．ＧeｔAt（j)=＝'\\’） {ﻩﻩ m_ｓｔrLoｃPaｔh＝m_stｒLocPath.Ｌeft(j+1); ﻩﻩﻩbreaｋ;ﻩ ﻩ｝}ﻩ LisｔLocFile(）;＊pＲesulｔ=0；ﻩﻩｒｅｔurn; } ｉf（SｅcondCoｌuｍｎ=="文件夹＂）ﻩ{ﻩ CＳｔｒingstｒTemｐ=FｉｒsｔCｏlumn； ﻩm_ｓtrLocＰath+=stｒＴemp＋'\\'；ListLoｃFiｌe（);//更新本地磁盘文件显示 ｝ﻩeｌｓeif(SeconｄＣolumn=＝"文件”)ﻩ｛//点到的是文件，进行上传ﻩﻩiｆ(ｃＦｔpOpｒ。ReStａtｕｓ()=＝2）ﻩﻩ｛ ﻩcFtpOpr。PutＦtpFilｅ（m_strLocＰａth+ＦｉｒstＣolumn，FirstCｏlumn）; ﻩﻩUｐｄateSｅrverFile(）;／/更新服务器的文件显示ﻩﻩ｝ﻩ} ＊pRｅsｕlt=０；}voｉｄCFtpDlg：:ＯnＤbｌclkLisｔServerfｉlｅ（NMＨDR＊pNMHDR，ＬRＥSULＴ*pResｕlt）{ //TODO：Addyoｕrconｔrolｎotificatiｏnhaｎｄｌercoｄehereﻩ／/获取选中的的一个位置 POＳＩTＩONp＝ｍ_ｃtrlSeｒｖerFilｅ.ＧeｔFirsｔＳｅlecｔｅdＩteｍPositiｏn（); if（p==ＮULＬ)ﻩ{ ｒetuｒn; ｝ﻩ／/获取刚选取的位置的下标（从0开始的) iｎtｉnｄeｘ=m_ｃtｒlＳervｅrＦiｌe。GeｔNｅxtSeｌecｔedItem（p）; //获得选中的内容，得到第iｎｄex行。第0列的内容(下标从0开始）ﻩCStｒingFirstＣoｌumｎ=m_ｃｔｒlSｅｒvｅｒＦile.GetItemＴext（inｄｅｘ，０);CSｔriｎgSｅconｄCｏlumn=ｍ＿cｔｒlＳeｒｖerFile。GetItｅmText（inｄex，1）； CＳｔｒｉngArrａyServNaｍｅ; iｎtnFiｌｅNumbeｒ＝0；ﻩif(ｉndex==0）／/返回上层目录 ｛ ﻩif(cFｔpＯpr.setＢackＰatｈ（）＝=0） ﻩ｛ﻩﻩ ＊ｐResuｌt＝0； retｕｒn;ﻩﻩ}UpdatｅSｅrveｒFilｅ(）；／／更新服务器的文件显示 ﻩCStrｉｎgｔemp； ﻩｍ_ｃtrlServer．ＲeseｔＣonteｎｔ()；ﻩﻩcFｔpＯpr.GeｔPatｈ(temp); ﻩm_ctｒlSeｒver.AddStｒing((LPSTＲ)（LPCTSTR）tｅｍp）；m_ｃtrｌServｅr.SetCｕrSｅl（0）;＊pResult＝０；ﻩ ｒeturｎ；ﻩ}ﻩif(SｅcondCｏluｍn＝=＂文件夹”)ﻩ｛ if(cＦtｐＯｐｒ.setNeｘｔＰath（FirｓtＣolumn）==0） ﻩ｛ ﻩ*pReｓulｔ=0;ﻩ ﻩreｔurｎ； ﻩ｝ ﻩUpdateSeｒｖｅrFile()；／/更新服务器的文件显示 ﻩCStrｉngｔｅｍp；ﻩﻩm_ctｒlＳeｒver.ResetＣｏntenｔ（）;ﻩ cＦtｐOpr。GetPaｔh（ｔeｍp）；ﻩ ｍ_ctrｌServer。AddString（（ＬPSTR)(LPCTSTR)teｍp)；m_ｃtrlSｅrver．SetCurSel（0）;ﻩ}ﻩelseif（SｅｃondCｏｌumn＝=＂文件") ｛//点到的是文件，进行下载ﻩﻩcFtpOpｒ.GeｔFtpＦile(FirstColｕmn,m_strＬocPatｈ)；ﻩﻩLiｓtLoｃFiｌe(）;ﻩ｝ *pResｕlt=0；}//将本地文件列表出来ｖoidCFｔpDlg：:ListLｏcFile()｛ m_ｃtｒｌLｏcaｌFｉｌe．DｅleteAllIteｍs（）;ﻩiｎtiｘ＝ｍ＿cｔrlLoｃaｌ。ＦｉndＳtｒiｎｇ（0，ｍ_strＬocPath)；if（ix==CB_ERR)ﻩ{ intｉｙ=m_ctｒlLocａl．GetＣount()；m_ｃtｒlLoｃａｌ。ＳetCurSel(m_cｔrｌLocal.ＡdｄSｔriｎg（m_ｓtrLocPath));｝ﻩelse ｛ ﻩm_ｃtrlＬoｃal。SetCｕｒＳｅｌ(m＿ｃｔrｌLocａl．SｅtＣｕrSel（ix））; ｝ﻩinｔk=0；ﻩｍ_ctｒlLoｃａlFｉle。InsｅrtIｔeｍ(0，”．。。上层目录”)；char*lpPａth＝(LＰSTR）(ＬＰＣTSTR)m_strLoｃPatｈ；chaｒｓzFind［300］；WIN32_ＦIＮD_ＤＡTAFiｎｄFilｅData;strcｐy(szFｉnｄ，lｐＰａｔh)；sｔrcaｔ（ｓzFind，”*。*＂)；HANDLEhFinｄ=：：ＦｉndＦirstFiｌe（szFｉnd,&FindＦileＤaｔa);while(TRＵE）｛iｆ(FinｄFiｌeＤata．dwFilｅＡｔtｒiｂutes&FIＬE_AＴTRＩＢＵTＥ_DＩRECTORY）｛ CＳｔrｉngstr=FｉndFileDatａ.ｃＦｉｌeＮame;ﻩﻩ iｆ（ｓtr!=’．’&&ｓtｒ!=”．.”） ｛ LＶIＴEＭlviteｍ；ﻩ lｖiｔem。mａsｋ=LVIF_IMAＧE｜ＬVIＦ_TEXＴ；ﻩﻩﻩﻩlviｔｅｍ.ｉItｅm=k+1; ﻩﻩ lvｉtem。pszTexｔ=(LＰＳTR)（LＰCＴSＴR）ｓtr;ﻩﻩﻩﻩｌvｉtｅm。iＩmage＝0; ﻩ lｖiｔeｍ。iＳubＩtem＝０； ﻩ m_ctｒlLocalFｉle．InseｒtItｅｍ（＆lvitem）;ﻩﻩﻩ m_ｃtｒlLocalFｉle．SeｔItｅmTeｘt（k+1,1，"文件夹");++k；ﻩ ﻩ｝ ﻩﻩ}ｅlse｛ ﻩﻩ／／文件 ﻩＬＶIＴＥMlｖｉteｍ; ﻩlviteｍ.mａsk＝LVIF_ＩＭAGE|ＬVIF＿TＥXT;ﻩﻩ lvｉtem．ｉItem=ｋ+1;ﻩﻩ lviｔｅｍ。ｐszTexｔ=FinｄFｉleＤata.cＦiｌeNａmｅ；ﻩ ﻩlvｉｔｅm。iIｍａｇｅ＝1;ﻩﻩﻩｌviｔｅm.iSubIteｍ=0;ﻩﻩﻩｍ＿cｔrｌLocaｌFile。InｓeｒｔＩtem（＆ｌviｔem）； ﻩﻩm＿ｃtｒlLocalＦile．SｅｔItemText(k+1，1，＂文件");++k;ﻩﻩ｝ｉｆ（！FindNexｔFiｌe（hFｉnd,＆FindＦileData））ｂreａk；} ＦｉndClose（hFｉnd）；｝//选择了本地文件的组合框中的不同项目vｏidCＦtpＤlg：:ＯnSeｌchangeComboboｘｅｘLｏcal（){ ｍ_ｃtｒlLocａl。SetCｕｒSｅl（m_ｃｔrlLoｃal。ＧetＣurSel（)）; ｍ_ctｒｌＬｏcａｌ.GetＷｉndowText（ｍ_strLｏcPath）;ｍ_ctrｌLｏcａl．ResｅtＣonｔent（）;ﻩ//添加硬盘盘符ﻩsizｅ＿ｔszＡllＤriｖeStrings=:：ＧetLogiｃａlＤｒivｅＳtrings（0,ＮULL）;ﻩＴCHAR＊pDrｉvｅSｔringｓ＝neｗＴＣHAＲ［ｓｚAllDriｖeＳtrｉnｇｓ+ｓizeof(＿T（”"）)］；ﻩGetＬogicalDｒiveStｒｉnｇｓ（sｚAllＤrivｅStｒiｎgs,pDｒiveＳｔｒinｇs); sｉｚe＿ｔszＤrivｅＳtring=::sｔrｌen（ｐDｒiveＳｔrings);ﻩwｈile（sｚDriveString＞0） ｛ m_ctｒlＬocaｌ。AddＳｔring(ｐＤｒiｖｅＳｔrings）； pDriveStｒｉｎgs+=ｓｚＤｒivｅＳtring＋1；ﻩﻩszDriveＳｔring＝：:strlｅn（pＤrivｅStringｓ）;ﻩ}ﻩListＬｏcＦile（）;ﻩ｝／/点击了ASＣII单选按钮voidCFｔpDlｇ::OnAscii（){ﻩﻩbBiｎary１=0；｝/／点击了二进制单选按钮ｖoｉdCFtｐDｌｇ::OnBinａry(）{ ﻩbBinary1=１；//使用二进制｝／／自动选择二进制或ASCＩI单选按钮vｏidCFtpDｌg：：OnAuto(){ﻩbBinary1=２;／/自动｝/／主动方式单选按钮ｖoｉdCFtｐDｌｇ：：OnActive()｛ bPassive1＝0;｝／/被动方式单选按钮ｖｏidCＦtpDｌg：：ＯｎＰassiｖｅ(）{ bPassiｖｅ1=１;}//上传voidCＦtｐDｌg:：OnBｔnup（){ﻩPOSITIＯNp=m_ｃtrlLｏcalFilｅ．GetFｉrstSｅlecteｄItemPoｓitｉoｎ（）； if（p==NULＬ） ｛ retｕrn；ﻩ} //获取刚选取的位置的下标(从0开始的）ﻩintiｎdｅx=ｍ_ctｒlLocaｌFiｌe.GetＮextSelectｅdIteｍ(p);ﻩ//获得选中的内容 //得到第inｄex行。第０列的内容（下标从0开始)ﻩCStriｎgFirstＣolumn＝ｍ_ｃtｒlLｏcalFｉle。GｅｔIｔeｍTｅxｔ(ｉndex,0）；CＳtrｉnｇSecoｎdＣolumｎ=ｍ_ｃｔrlLｏcalFile．GetIｔeｍTexｔ（index，1)；ﻩiｆ(SecoｎdCｏｌumn==＂文件夹”）ﻩ｛ CTimｅCurrenｔTime=CTiｍe：:GetCuｒｒentTｉme()； ﻩCStrｉｎgｓtrＴiｍe; ﻩstｒTｉｍe。Ｆoｒmat（＂％d/％ｄ/％d％ｄ：%d：%d”，ＣurrenｔTｉｍe。GeｔYeａｒ（)，ＣｕrrentTiｍe.ＧｅtMoｎtｈ()，ﻩ ﻩCurrｅnｔTime．GetDay()，ＣuｒｒenｔTiｍe。ＧｅｔHour（），CｕrrｅｎtTime．GｅtMinute(),ﻩﻩ CuｒrentTime。GeｔSｅcoｎd（)）;stｒTimｅ+＝”暂不支持上传文件夹!\r＼n";ﻩ ｉntnLenｇｔh＝m_eｄiMｅｓｓagｅ.SeｎdMeｓsage（ＷM＿GＥTTEXTLENGTH）;m_edｉMeｓsaｇe．ＳｅtSｅｌ(nLenｇｔh,nLｅｎgｔh）;m_ediＭessage。ReｐlaceSel（stｒTｉｍe)；ﻩ returｎ； ｝ ｅlseif（SecondＣolｕmn=＝＂文件”） { ﻩ//点到的是文件，进行上传ﻩﻩｉｆ（cFtｐOpr。RｅStａtｕs(）==２） ﻩ｛ﻩﻩﻩcFtpOpr.PutFtｐFｉle（m_strLocPａｔh+FirstＣｏｌｕｍn,FirｓtColumn）；ＵpdaｔeServｅrＦile()；//更新服务器的文件显示ﻩ } }｝//下载voidCFtｐDlg::OnＢtnｄown（){ ／/ＴODＯ:Ａddyｏurcontrolｎotｉficatioｎhａndlercｏdｅｈere POSITIONp＝m_ctｒlSeｒvｅrFile.ＧetFirstSｅlｅcteｄItemPosｉtion()；ﻩif(ｐ＝=NＵＬL） {ﻩ reｔurn； ｝ //获取刚选取的位置的下标（从0开始的)ﻩintindｅｘ=m＿ｃtrlＳeｒverFiｌe.GｅtＮeｘｔSeleｃtedＩｔeｍ（p);ﻩ//获得选中的内容 ／／得到第iｎdeｘ行。第０列的内容（下标从０开始) CSｔringFirstColumn=m_ctrlSerｖerＦｉle.ＧetIteｍText(inｄeｘ，0）;CＳtrinｇSecｏndColumn＝m_ｃtrlServｅrFile.ＧetItemTｅxｔ(inｄex，１）; if（SeｃondＣolumn=＝”文件夹")ﻩ｛ﻩ ＣTｉmeＣurｒentTime＝ＣTimｅ:：GetCuｒｒentTime(）； CStｒinｇstｒTime；ﻩ ｓtrTime。Format("％d/％d/％d%d：％d:%d"，ＣuｒrenｔTime.GetYｅar（)，CurrentTｉmｅ。GetMｏｎth()，ﻩﻩﻩCurｒentTｉｍｅ.GetDay（）,CｕrrentTime.ＧeｔHｏur（）,CｕrrentTime。ＧetMinute()，ﻩ ﻩCuｒｒeｎtTime．GeｔSeconｄ（））;strＴime+=”暂不支持下载文件夹！＼r\ｎ";ﻩﻩintnＬength=ｍ_ｅｄiMｅｓsａgｅ。SeｎｄＭessａgｅ(WM_ＧETＴEXTＬＥNＧTH)；m_ediＭessage．SｅtSel(ｎＬeｎgｔh，nLength);ｍ_ediMesｓagｅ.ＲeplacｅSel（stｒＴｉme）；ﻩﻩreturn; ｝ﻩｅlseiｆ（SecoｎｄCｏｌuｍn=＝”文件＂) ｛ ﻩ//点到的是文件,进行下载ﻩﻩif(cFｔpOpr。ReStatuｓ（)==2) ﻩ{ﻩﻩ ／/点到的是文件,进行下载ﻩ ﻩcFtpOpr。GｅｔＦtpFｉle（FｉrsｔＣolumn,m_stｒＬoｃＰaｔh);ﻩ ListLoｃFｉｌｅ（)；//下载完成后更新本地文件显示 ﻩ｝ ｝｝//删除服务器文件或文件夹voiｄCFｔpDlｇ::OnBtndeｌ(）｛ﻩPＯＳＩTＩOＮp=m_ctrｌSｅrvｅrＦilｅ．GetFiｒstSeｌｅctedItemＰosition(）; if(p==ＮULL） { reｔurn； ｝ﻩﻩ//获取刚选取的位置的下标(从0开始的） inｔindex=m_ctrlSｅrverFiｌｅ．GetＮｅxｔSｅｌecteｄItｅｍ(ｐ）； /／获得选中的内容ﻩ//得到第ｉnｄeｘ行。第0列的内容（下标从0开始） CStringFiｒstColumｎ=ｍ_ctrlServeｒFile.GetIｔｅmＴexｔ（index，0）;ＣStringSｅcｏnｄCoｌuｍn=ｍ_ｃtｒlSｅｒｖerFiｌｅ。GetItemＴext（index，1）;ﻩiｆ（SecondColumn==”文件夹＂） ｛ﻩﻩｉf（cFtpOpr。ＲｅStａtuｓ(）＝＝２）ﻩ ｛ ﻩ//移除文件夹ﻩﻩﻩcFtｐOpr.DeleteFTPf(ＦｉrｓtＣolumｎ，0）;ﻩﻩﻩUpdａteＳerveｒFile（);／/更新服务器的文件显示ﻩﻩ} ﻩ returｎ；ﻩ}ﻩeｌsｅｉf(SeconｄＣoｌｕmn==”文件”)ﻩ｛ﻩ iｆ（cFtｐOpr。ＲｅStａtｕs()=＝2) ﻩ{ ／/移除文件ﻩﻩﻩcFtpOｐr.DeleｔeFＴPf(ＦiｒsｔColumn，1);ﻩﻩ UｐｄatｅServerＦｉle()；//更新服务器的文件显示ﻩ ｝ﻩ｝}voidCＦtpDlg：：UpdaｔeSｅｒｖerＦiｌe()//更新服务器的文件显示｛ ﻩﻩ /／获得目录ﻩＣＳtringArraylocalＮame； intnFiｌeNuｍｂｅｒ=0; nFileNumbｅr=ｃＦtpＯｐr．GetMultｉplｅＦileＮame（&locａlＮame）； ﻩｍ_ctｒｌＳeｒｖeｒFile。ＤeleteAllItems（)；ﻩm_ctrlＳｅｒverFilｅ．InsｅｒtIteｍ(0，”.．。上层目录”)；ｆoｒ（ｉｎｔtest=0;ｔesｔ〈nFｉlｅNumber;ｔｅｓｔ+＋)ﻩ{ CStｒｉnｇstTemｐ=ｌocalName。ＧeｔAｔ(tesｔ); ｉf（stTeｍｐ。Rｉghｔ（5)==＂〈DIR>＂）ﻩﻩ{//文件夹 LＶITEMlvitｅm;ﻩﻩﻩＣStringstr=stTemp.Leｆt（sｔTｅｍp。GetLｅngtｈ（）－5）； ﻩﻩｌvitem．mask=ＬVIF_ＩMＡＧE|LＶＩF_TEXＴ；ﻩﻩﻩlvｉtｅm.iItem=tｅsｔ+1;ﻩﻩ lviｔem。pｓｚText=（LPSTR)（LＰＣTSＴR）str； ﻩﻩlvitem.ｉＩmaｇe＝0;ﻩﻩﻩｌｖｉｔem.iＳuｂＩｔeｍ＝0； ﻩﻩm_ｃtrｌＳerverFiｌe。ＩnｓertItem(＆ｌviｔem）;ﻩﻩ m_ctrｌServｅｒＦile.ＳetItｅmTｅxt(tｅｓt+1，1,＂文件夹”）;ﻩﻩ｝ else {//文件 ﻩ LVITEMlｖitｅｍ；ﻩﻩ ｌviｔeｍ．maｓk=LVIＦ＿IMAＧＥ｜LVＩＦ_TＥXT;ﻩ ﻩｌvｉteｍ.iItem＝test+１；ﻩ ﻩlｖｉtｅm.pszＴｅｘt=(ＬPSTR)(ＬPCTSTR）stTemp；ﻩﻩﻩlｖiｔｅm.iＩmagｅ=1; ｌｖｉｔem。iSubIteｍ=0；ﻩ m_ｃtｒｌSｅrverＦｉle.InsｅrｔItem（＆lvitem）； ﻩ m_ctrlServerFilｅ．SｅｔItemText（test+1，１，＂文件”）;ﻩ ｝ﻩ｝ﻩﻩ}voidCFｔpDｌg::OnＢtnhelｐ（）｛ CAbｏutＤlgdｌg;ﻩdlg.DoMｏdal（);｝／/用于屏蔽按下回车键程序退出的问题BＯOＬＣＦｔpDlｇ：：PｒｅTraｎslateＭessage(ＭＳG＊pMｓg)｛ﻩiｆ(ｐMsg—>ｍesｓaｇe==WＭ_KEYＤOＷN&＆pＭｓg－〉wParam=＝VK_ＲＥTURN） ｛ﻩﻩreturnｔrue； ｝ rｅtｕｒnＣDｉaloｇ:：PrｅTransｌaｔeMeｓsaｇe（pＭsg）；}／／复选框,是否匿名vｏiｄＣFtpDlg:：OnＣhkａnonyｍｏｕｓ（）｛ﻩif（ｍ＿cｈkＡnony．GetＣheｃk（）） ｛//被选上 bAnony=1；//使用匿名ﻩﻩｍ＿editNａmｅ．GetWindowTｅxt(m_strName)；//记录FTP登陆用户名，用于不使用匿名后恢复 m_editPasｓword。ＧeｔWindowText(ｍ_sｔrPasｓwｏrd)；//记录FTP登陆用户密码，用于不使用匿名后恢复m_editＮame.SetＷｉndowText(＂anonｙmous＂）； ﻩｍ＿editPaｓｓwｏrd。SetWindowTexｔ（"”）; ﻩm_ｅdiｔＮａmｅ.EnaｂleWindow(ＦＡLSE)；ﻩﻩｍ_editPasｓword.ＥnaｂleWindow（ＦＡLSE);ﻩ}ﻩelｓe {ﻩﻩbAnony＝０；//不使用匿名 m_eｄitNａｍe.SetWiｎdowText（ｍ_stｒＮame);//恢复 m_ediｔPassｗord．SetWiｎdｏwTｅxt（m_strＰasswoｒd）;//恢复 ﻩm_edｉtNａme.ＥｎabｌeWinｄow(TＲＵＥ）; ﻩm_edｉｔPａｓｓworｄ．EnableＷindoｗ（TＲＵＥ)；ﻩ}}（2）CFtpOｐerａte的一些函数定义//构造函数CＦtｐOperaｔe：:ＣFtpＯｐerａtｅ（）｛ﻩｓtrＡppNaｍe。LoaｄStｒｉng（AFX_ＩDＳ_APP_TITＬE）；／／获得应用程序的名字 pInｔｅrnｅｔSeｓsioｎ=newCIntｅrnｅtSｅsｓion(sｔｒAｐpNamｅ,IＮTERＮET_OPＥN＿TYPE_PＲＥCＯNFIG）；pEdiMｅs=NULＬ； if（！pＩnternｅtSesｓｉon） ｛ AfxMessａｇｅBoｘ("初始化会话失败！”)；ﻩﻩfｌａg=－１；／/初始化失败设为-1ﻩ rｅｔｕrn;ﻩ}ﻩflaｇ=0；／/初始化成功，标志初始化为0｝//析构函数ＣＦtpOperate：:~CFtpOperatｅ（）｛ pIｎtｅrnetSesｓiｏn—>Close(）;ﻩif（pInternetSesｓｉon!=NULL）ﻩ｛ﻩﻩｄeletｅpInterｎetSｅssioｎ; }｝/／设置，由外部调用，把数据传进来bｏoｌCFtpＯperatｅ::sｅt(ＣStrｉngFullＵＲＬ,CＳｔringUｓerNａme，CStriｎgPaｓsword){ ｉｆ(ｆlag==-1）//类实例初始化时失败ﻩ{//重新设定strApｐNaｍe。ＬoadStrｉng（AFX＿IDＳ_APＰ_TITLE）；//获得应用程序的名字ﻩﻩpInteｒnetSession＝ｎewＣＩnｔernetSession（strAppNａmｅ，INTERNEＴ_OPEＮ＿TYＰE_PＲECONＦＩG);ﻩﻩiｆ（！pＩｎtｅrnｅｔSession)ﻩ {ﻩ AｆxMeｓsageBox(＂初始化会话失败！"）; ﻩﻩｆlag＝-１；//初始化失败设为—1ﻩ reｔurｎ0;ﻩ }ﻩ flaｇ=0; ｝ﻩ//flａｇ不等于—1时才会进行以下设置ﻩm＿ｓｔrUsｅrＮaｍe=UsｅｒＮame；／/用户名字 m_sｔrＰaｓswoｒd＝Paｓｓworｄ；／/用户密码ﻩm＿strＦuｌlURL=ＦｕlｌURL；//设置路径ｉf(m_strFullＵRL＝=＂"||ｍ_stｒＵsｅｒName=="")ﻩ{ﻩﻩｆｌａg=0;｝ eｌse {ﻩﻩif（m_strFullURL.Leｆt（6)！＝”ｆtp：//"）ﻩ ｛ m_ｓtrFullURＬ="fｔｐ://”+m_strFullＵRL; ﻩ} ﻩｆlag=１；ﻩﻩｒｅturn1； ｝rｅtｕrn0； }／／打开连接ｂoｏｌCFｔpＯperａｔe：：OpｅｎＣoｎneｃｔｉon（)｛ ｉf（fｌａg==２） ｛/／已连接了，先断开 ＣlosｅＣｏnnection（）;ﻩ flag=1; }ﻩｉf（fｌag!=1）ﻩ｛ AfxＭessａgｅＢox("未成功进行ｓet调用”）； ﻩreturn0；ﻩ} CＷaiｔCｕrｓorｃuｒsor;ﻩCStringｓtrＴeｍp;ﻩstrTemp="fｔp://”;ﻩ//解析URL iｆ(！ＡｆxParseURL(m_ｓtrＦuｌｌURＬ，dwServｉceTｙpe,m_sｔrServerNａme,strAppNaｍe,ｎPort)）ﻩ｛ﻩ CurrentTime=ＣTime::GetCuｒrenｔTime(）;strTｉｍe.Forｍat（”％d/%ｄ/％ｄ％d：％d：％d＂，CurｒｅｎtＴimｅ.GetYeａr(），ＣurrentＴｉme．GetMonth（）,CurreｎtTime．GetDay(),CurreｎtTｉme.GeｔＨour（),CｕrreｎtTime.ＧeｔＭinute（),CurｒentTime。GetSecond（））；strTｉme+="无法解析FTP服务器"+m_strFullURL+"＼ｒ＼ｎ"；ﻩﻩinｔnＬeｎgth=pEdｉMes-＞ＳenｄＭessａｇｅ（WM＿GＥTTＥXＴLＥNGＴH);pEdiＭes—＞SeｔSel(ｎLength,nＬenｇｔh）；ｐＥdｉMeｓ—＞ＲｅｐｌａｃeSel(stｒTｉmｅ）;ﻩﻩｆlag=0；ﻩ return0；ﻩ｝ﻩ／/提取pａthﻩｉnｔｎIndex=ｓtｒＴemｐ。GｅtLenｇth（）＋m_strSeｒverNaｍe．ＧeｔLenｇth（）;ﻩm_ｓtrFullPath=m_ｓtrFullURＬ.Righｔ（m_ｓtｒFｕlｌURL。ＧｅtＬｅngth()—ｎIndex）；//设置服务器当前路径名ﻩm＿ｓtrFuｌlPath+=’／＇;ﻩ/／解析成功后进行连接ﻩｔｒy ｛ﻩﻩＣurrｅntＴiｍe=ＣＴime：：GetCｕｒreｎtTiｍe（）;ﻩstrＴimｅ。Foｒmaｔ（"%d/％d/％d%d：％ｄ：％d”，CurｒeｎtＴime．GetYeａr（),ＣuｒｒenｔTime。GeｔMｏnth(），ﻩ CurreｎtTime。GｅｔDａｙ(）,ＣurrenｔTiｍｅ。GetＨoｕr(）,CｕrｒｅntTimｅ.ＧｅｔＭinute（）,CurrｅntTｉme。GetＳecond（)）；strTime＋=”准备连接FＴP服务器”+m＿ｓtｒＳerveｒName＋＂。．..．．。.\r\n"；ﻩ nLength=ｐＥｄｉMeｓ－＞SendMeｓsaｇe（WＭ_GＥTTＥXTLENGTH）；pＥdiMes-＞SetSeｌ（nLength，ｎLｅnｇｔh)；pEdiMeｓ—〉ＲｅplacｅSel(strTimｅ);ﻩﻩ//当选择匿名的时候，m_strUserName为anonyｍous，m_stｒPaｓsｗoｒｄ ﻩ//不使用匿名时为用户输入的用户名和密码ﻩﻩif（ｂＰasｓiｖe1==1）ﻩﻩ｛ﻩﻩﻩ//使用被动方式ﻩ ｐFtpConnｅcｔioｎ=pInｔｅrnｅｔSessiｏn—＞GeｔＦtｐＣonｎｅctｉoｎ（m＿stｒSerｖeｒName,m_strUｓeｒＮame，m＿strＰassword，ﻩﻩ ﻩmyPort，TRUＥ）；ﻩﻩ｝ﻩﻩelｓe ｛ ﻩﻩ/／使用主动方式 ﻩﻩpFtpCoｎneｃtｉoｎ=pInterｎeｔSession－>GetFtpCｏnnectiｏn（m_ｓtrＳervｅrＮame，m_strUserNaｍe，m_strPassword, ﻩﻩﻩmyPoｒt，ＦALSE); ﻩ}if(pＦtpCoｎnｅctioｎ==NULL) ｛ ﻩ CｕrrentTime=CTimｅ：:ＧeｔＣｕｒrenｔTime（）;ﻩ ｓｔrＴime。Format(＂％ｄ/％d/％d％d：%d：%d"，ＣurrenｔＴｉｍe。GetYear（)，CｕrreｎtＴiｍe．GetMonth()， CurrｅnｔTimｅ．GetDａｙ（）,CuｒrｅntＴiｍe．GetHoｕｒ（),ＣｕrreｎtTime．GetMiｎｕte(）, ﻩCurｒenｔTime.ＧｅｔSｅｃonｄ(））； ﻩ stｒTimｅ+=＂连接失败\r\n＂； ﻩ nＬength=ｐEｄiMes->ＳｅndMesｓaｇｅ(WM_ＧETTEXTＬＥNGＴH); ﻩ pEdiMes->ＳｅtSeｌ(ｎＬｅnｇｔh，ｎLength)；ﻩﻩ ｐEdiMｅs－>RepｌａcｅSel（stｒＴimｅ）； ﻩreｔｕrn0;}ﻩ CurreｎtTimｅ=CＴime::GetCurrｅntTｉｍe(）；sｔrTｉme．Fｏrmaｔ("%d/%ｄ/％d％ｄ:％d:%ｄ”，CuｒrentTime.GetＹear（）,CurｒentTime．ＧeｔMontｈ(），CｕrｒentTiｍe．ＧeｔDay（)，CｕrｒenｔTime。GeｔＨour（),CuｒｒｅnｔTime.GetＭｉnｕｔe(），CｕｒｒentTiｍe．GｅtＳecoｎd（）);stｒＴｉme+=”成功连接FTP服务器”+m_ｓtｒＳerverＮaｍｅ+＂＼r\n当前目录为：”+ｍ_strFuｌlPath+”\r＼ｎ”; nＬｅｎgth=pＥdiMes－＞ＳendMessaｇe(WＭ_GETTEＸTＬEＮＧＴH）;pＥdiMｅｓ－＞ＳetSｅｌ（ｎＬeｎgtｈ，nLｅngth);pEｄiMeｓ->ＲｅplaｃeSel(strTime）;ﻩ flag=2；//连接成功后设为2 ｝ caｔch(ＣInternetEｘcepｔiｏn*pＥx)ﻩ｛ TCHＡＲszEｒr[1０2４］；ﻩﻩpEｘ－〉ＧetErｒorMessａｇe（sｚＥrｒ，102４)； TRACＥ(szErｒ)； CｕrrｅｎtTｉｍe=ＣＴime::ＧetCurrｅnｔＴime（);strTiｍｅ.Ｆoｒmat(＂％d/％d／％d%d:％ｄ：％d”，CｕrrentＴime.ＧetYeａr（），ＣurｒｅntTime。GｅtMonｔh（）, CurreｎtTimｅ.GetＤａy（),ＣuｒrｅntTime。GetHｏｕr（),ＣｕrｒenｔTime.GｅtMinuｔｅ(),ＣｕrｒeｎtTime。GetSecoｎｄ(）);stｒTimｅ＝strＴime+"”＋sｚErr+"\r＼ｎ"； ﻩnLenｇth=pEdiMes->SenｄＭessage(ＷＭ_GETTＥＸTＬENGTH）；pEｄｉMes－>SｅtＳeｌ（nLength,nＬengｔh）;pEｄｉMｅs－>ReplaｃeSｅｌ(strTime）； pEｘ－＞Delete（); fｌag=0;／/连接失败ﻩﻩretｕrn0;ﻩ｝ rｅturｎ1；｝/／关闭连接bｏolＣＦtpOperate:：CｌosｅＣonｎｅctiｏｎ（)｛ if(ｐFtpConnｅction==ＮULＬ） {ﻩﻩｒeｔurｎ1；ﻩ｝ﻩtrｙﻩ｛ﻩ ｐＦtpConｎectiｏn—＞Closｅ()；ﻩ} catcｈ（。。.)ﻩ｛ ﻩreturn0;ﻩ} ｉf(pFtpCｏnnection！=ＮULL） ｛ ﻩｄｅｌｅteｐFtｐConneｃtｉon；ﻩ}ﻩCurrenｔTimｅ＝CＴime：:GｅtＣuｒrenｔＴiｍｅ（)；ﻩsｔrTime。Foｒｍａt（”％d/%d/%d%d:％d：％d",ＣurｒentＴimｅ。GeｔYｅar(),ＣｕrrｅntTｉｍe。GetMoｎth(），ﻩ ＣｕrreｎtTimｅ．ＧetDay（),CuｒｒentＴｉme.GｅtHｏur()，CurｒentTime．ＧetMiｎutｅ（)，ﻩ ﻩﻩﻩﻩCurrentＴiｍe．GｅｔＳｅcond(））； strＴimｅ+="－－－-－－——-—－—已关闭连接-——-－--－-\r\n”；ﻩnＬｅnｇth＝ｐEdｉMeｓ-〉ＳeｎdMessaｇｅ（ＷＭ_GETTEＸTLENGTH）;ﻩｐEdiＭｅｓ－＞SｅｔSel(nLengtｈ,nLｅngth）；ﻩｐEdiMes->ＲepｌaceSel(stｒTｉme）;flag=1；//关闭成功ﻩrｅｔurn1；}／/返回当前的状态intCFtpＯperate::ＲeStatｕs(）{ﻩｒetｕrnｆlａｇ；｝/／下载文件ｉntCFｔｐOpｅrate:：GetＦtpFilｅ(CStrinｇrｅmoｔｅ，CSｔrｉngloｃａｌ） ﻩﻩ {ﻩif(flａg！=2）ﻩ｛//连接未成功 ｒｅｔurｎ0； } ＣWaitＣursorcursor; ／/iｎiｔｓｏmevarﻩBＯOLgoodfｉle； intｘ＝0；ﻩＣurｒentTime=ＣＴｉme：：ＧetCuｒrｅntＴime（）； sｔrTiｍe．Ｆorｍaｔ（”%d/％d／％d％d:％d：%d”，ＣuｒreｎtTｉme.GｅtYｅａr(），CuｒrenｔTｉme。ＧetMontｈ(）,CurrｅntＴimｅ．GetDaｙ（)，CuｒrｅntＴｉｍe．GetＨour(）,CurrentＴime.GｅtMinute（）,ＣuｒreｎｔＴime.ＧeｔSeconｄ(））；sｔrTime+=”下载文件，请稍候:"＋remotｅ＋"。．。。．。。\r\n”；ﻩ nLengｔh=pEdiMeｓ—>SｅndMeｓsaｇｅ（WM_GＥTTＥXTLENGTH）;ｐＥdiＭes-〉ＳｅtSeｌ(nＬｅngth，nＬengtｈ）；pEｄiMeｓ－>RｅplａceSel(stｒTiｍe）;ﻩｐFtｐCｏnnｅctiｏｎ－〉SeｔCurrｅｎtＤｉｒectory(ｍ＿strＦｕllＰａtｈ）； iｆ（bBinarｙ1＝=1） {ﻩ /／二进制方式 gｏodfile＝pFtpＣonnｅction－〉ＧetFile（m_sｔrＦullＰａth+'/’＋remote，lｏｃal+remote， FAＬSE，FILE_ATTRＩBＵTE＿ＮＯRMAL，FTP＿ＴRAＮSFEＲ＿TYPＥ_BIＮARY); ｝ else ｛ﻩﻩｉｆ（bＢｉnarｙ1==0）ﻩ ｛／／AＳCII方式 ﻩｇoｏdｆｉlｅ＝pＦｔpＣoｎnectｉｏｎ->ＧetFｉｌｅ（m_ｓtrFuｌlPath+’/'＋ｒemｏte，ｌoｃaｌ+ｒemote,ﻩﻩﻩFALSE,FIＬE＿ＡTＴRＩBUTＥ＿ＮＯRMAＬ,ＦTP_TＲＡＮSFER＿ＴＹPE_ＡSCII）; }ﻩ elseｉｆ（bBiｎary1＝＝2）ﻩﻩ{goｏdfile＝ｐFtｐConnectiｏn-＞GｅtFile(m_strFullＰaｔh+'/'+reｍote，local+remｏte，ﻩ FAＬＳE，FILE_ATTRIBUTE_ＮORＭAL，FTP_ＴRANＳＦER_TＹPE_ＵNKNOＷN）; ﻩ} ﻩﻩ｝ if（！ｇoodｆiｌe） ｛ﻩ CuｒｒentTime=CＴime::ＧetＣurreｎｔＴime（）； strTime.Fｏrmat（＂％d/%d/％d％d：％ｄ：%d"，CurｒｅntＴiｍe.GeｔYｅaｒ(）,CurrenｔTime.GetＭoｎth()，ﻩ CurｒentTime．GetDａｙ（）,CｕrrｅntTｉme.GｅtHｏur(），CurrentTime.GetＭinｕte(),ﻩ ﻩCurreｎtＴimｅ。GｅtSecond(））；sｔrTime+=”下载出错，请重试\r\n"；ﻩﻩnLengｔｈ=pEdiＭes-〉SeｎｄMｅssaｇe(WM_GETTＥＸTLENGTH）；pEdiMes—〉SetSel（nＬｅngth，nLeｎgth)；pＥｄiMes—>RｅｐｌaceＳel（strTｉｍｅ）;ﻩﻩreturn0; } ｅlseﻩ{ ﻩＣｕrrｅntTimｅ＝ＣＴime::GetCｕrrentTime（）; ﻩｓtｒTime。Fｏｒmat(＂％d/%ｄ/％d％d：％d：%d＂，ＣurrentTｉｍe.GetYear（），CurreｎtTimｅ。ＧetMｏnth（), ﻩCurrentTime．GetDaｙ（),ＣｕrreｎtTime.ＧｅｔＨour（),CuｒｒentTiｍe.GetMｉnuｔｅ()，ﻩﻩ CurrenｔTiｍe.GetＳecond（））;ﻩﻩstrＴime+="下载文件成功，保存于:＂+ｌoｃal+rｅmｏｔe+"\r\n"；ﻩ nLengｔh＝pＥdiMes-〉ＳｅnｄMｅssage(WＭ_GETTEＸTLENGＴH）； pＥdiMes—〉SetSel(nLｅngth，nLengtｈ）； ﻩpEdiMes->ＲｅｐlａceSeｌ（strTimｅ); ｝ retｕrｎ1;}／/上传文件iｎｔCFｔpOpeｒatｅ：:ＰutFtpFile（CStｒiｎgｌｏcal,CStrｉｎgremoｔe）{ ｉｆ（flag!=2） ｛//连接未成功 ﻩreｔurn０; } CWaitCｕｒsoｒcursor；ﻩBＯOLgoｏdfｉlｅ； intx＝0； pFtpＣoｎnｅctiｏn－＞SｅtＣurrentＤireｃtory(m_sｔｒFullPａth); CuｒｒentTime＝CTｉme::ＧetCurrｅｎtTime(）;ﻩsｔrTｉｍe.Fｏrmaｔ("％d／％d/%ｄ%d：%d：％d＂,CurrentTime。GｅｔYｅaｒ()，ＣurrｅntTime。GｅtMｏｎth（)，ﻩﻩCｕrrｅnｔTｉｍe。GeｔDaｙ（)，CurreｎtTime。GetHoｕｒ（），CurrｅntＴiｍe.GetＭｉｎutｅ（)，ﻩﻩCｕrreｎtＴiｍe。ＧetSecｏｎd（））； stｒＴｉmｅ＋=＂上传文件，请稍候:＂+lｏcal+"\ｒ＼n"； nLengｔh=pEdiMeｓ->ＳendMessaｇｅ（WM_GETTEXTLENGTH）； ｐＥdiＭes—＞SeｔSｅl（nLength,nLenｇth); pEdiＭes->ＲeplaｃeSｅl(strTime）； if(bBinarｙ１==1) ｛//二进制方式ﻩﻩgoｏｄｆｉle＝ｐFtpＣonnｅcｔion－〉PuｔFile(locaｌ,ｍ＿stｒFuｌlＰath+remｏte，FTP_TＲＡＮSFEＲ_TＹPE_BＩＮARＹ)；ﻩ}ﻩeｌｓe ｛ﻩ iｆ（bBinａｒy1==０） {/／AＳＣII方式 goodｆｉle＝pFtpＣoｎnecｔion-＞ＰutFile（ｌｏｃal，m_strＦｕllＰａｔｈ＋remoｔe，ＦTP＿TＲＡNＳFER_TYPE_AＳCII)； } ﻩelseif（ｂBinarｙ1==２）ﻩﻩ｛/／自动方式ﻩﻩﻩgoodfilｅ＝pFｔpCoｎnection—〉PｕtＦile(ｌocａl，m_sｔrFullPａｔh＋rｅmｏte,ＦTＰ＿ＴRANSＦＥR_TYPＥ＿UNKＮOWN）； ｝ }ﻩiｆ（!gooｄｆile）ﻩ｛ﻩ CｕrrenｔTime=CTiｍe：:GｅtCｕrｒeｎtＴｉmｅ(); ﻩｓｔrTime．Fｏrmaｔ("％d／％d/％d%d:％d：％d”，ＣurｒeｎtTime．ＧetYear(）,CurrentＴiｍe.GetMonｔh（）， ﻩCurｒｅｎｔＴｉme.GetDay（),CurrenｔTime．ＧetＨour()，ＣｕｒｒeｎtTime。ＧeｔMinute（）,ﻩ ﻩＣurｒentTimｅ.GｅtSecond（)）； ﻩstrＴime＋＝”上传出错,请重试\r\ｎ”; ｎLength=ｐEｄiMｅｓ－〉SenｄMesｓage(WM＿GETＴEXTLＥNGTH）;ﻩ pEdｉMes->SetSel（nLength，ｎＬenｇth)； ｐEdiMｅs－〉ＲepｌａceSｅl（strＴime）； ﻩrｅturｎ0； ｝ elｓeﻩ{ﻩ CurrｅntTｉme＝CTiｍｅ：:GｅtCurrenｔＴｉme（）;ﻩﻩｓtｒTiｍe.Formaｔ（”％ｄ/%ｄ/％d％ｄ：％ｄ：％d”，CｕrrｅｎtTｉme。GetYｅar()，CurrentＴime.GetMoｎtｈ（）,ﻩﻩ CｕrrenｔTｉme．GｅtDay（），ＣuｒrｅntTime。GetＨour(），CｕrrｅntTiｍｅ．GetＭinｕte(），ﻩﻩ CurｒenｔTiｍe.GetSeconｄ(）); stｒTime＋=”文件：”+ｌocal+”上传成功”+＂\ｒ\n";ﻩﻩnLength=ｐＥdiMeｓ-〉SendMeｓsage（ＷM_GEＴTEXＴＬENGTH）; pEdiMｅs—>ＳｅtSel（nLｅngth，ｎLenｇth）； pＥdiMeｓ-＞ReｐlａceSｅｌ(ｓtrTimｅ)； ｝ reｔｕrｎ１;｝iｎtCFtpOperate:：ＧｅtMuｌtipleFileNａme（CSｔringArraｙ＊ｌｏcalNameArraｙ)／/locａlNamｅＡrray作为输出参数｛ﻩif（flａg!＝2） ｛／/连接未成功ﻩ reｔurｎ0； ｝ﻩＣWaitＣｕrsoｒcurｓor；ﻩBOOＬｇoodfｉle； intx=０；ﻩiｎｔnFｉleNuｍｂeｒ＝0；ﻩpFｔpＣoｎnｅctｉon—〉SetＣurrｅntＤｉｒectory(ｍ_strFuｌlPath）； CＦtpFileFindfFiles（pFtpＣonneｃtｉｏn）； goodfile=fＦiles.ＦindFiｌｅ（ｍ_sｔｒFullPath+＂＊”）；ﻩｉｆ（ｇooｄfｉlｅ=＝ＦAＬＳＥ） { ﻩfＦｉles.Clｏｓe(）； ﻩｒetuｒｎ0；ﻩ}ﻩCＳtｒｉngstr；ﻩｗhile（goodfile)ﻩ｛ goodfilｅ＝fFｉlｅs。FindNextFｉｌｅ（)；ﻩｓtr＝ｆＦiles.GetFｉlｅＮａmｅ();ﻩif(ｆＦｉles．ＩsDirｅctoｒy(）)ﻩﻩ｛ﻩ ﻩstr+=”＜DIR〉”; ｝ﻩﻩlocalNameArray->InseｒtＡｔ(x,sｔr)；ﻩ nＦileＮumbｅr＋+； ﻩｘ+＋； ｝fＦiles。Close(); ／/returnthenum