第7章Internet程序开发.ppt

第7章Internet程序开发 7.1 FTP编程 7.2 Web服务器端程序开发（略） 7.3 Socket编程 ?本章小结 ?练习 7.1 FTP编程 FTP 协议 NMFTP组件 操作实例 FTP 协议 FTP是Internet最广泛的应用之一。它用于文件传输的Internet的标准。要使用FTP，就需要有登录服务器的注册帐号，或者通过允许匿名的FTP服务器来使用。 FTP控制连接通常以客户/服务器方式建立。服务器以被动方式打开21号端口（默认方式）等待客户的连接，客户则以主动方式打开21号端口（默认方式）来建立连接。控制连接始终等待客户与服务器之间的通信，该连接命令从客户传给服务器，并传回服务器的应答。每当一个文件在客户与服务器之间传输时，就创建一个数据连接。由于该连接用于传输目的，所以该数据连接的服务特点就是“最大限度地提高吞吐量”。 NMFTP组件 TNMFTP组件位于组件面板的FastNet标签页上。利用该组件可以完成大多数的FTP客户端的功能，轻松地完成文件的上传和下载，TNMFTP组件甚至可以让我们直接把命令发送到FTP服务器上，另外TNMFTP组件也支持代理服务器的功能。下面将介绍该控件的属性、方法、和事件。 TNMFTP组件的主要属性 TNMFTP组件主要方法 TNMFTP组件主要事件 TNMFTP组件的主要属性 BytesRecvd属性 该属性返回已经收到的字节数。与BytesTotal属性配合使用可以显示文件下载的进度。程序示例如下： procedure TForm1.NMHTTP1PacketRecvd(Sender: TObject); begin StatusBar1.SimpleText := IntToStr(NMHTTP1.BytesRecvd) + bytes out of +IntToStr(NMHTTP1.BytesTotal)+ transferred; end; BytesSent属性 该属性返回已经发出的字节数。与BytesTotal属性配合使用可以显示文件上传的进度。程序示例如下： procedure TForm1.NMSMTP1PacketSent(Sender: TObject); begin StatusBar1.SimpleText := IntToStr(NMSMTP1.BytesSent)+ bytes out of +IntToStr(NMSMTP1.BytesTotal)+ transferred; end; TNMFTP组件的主要属性（续1） BytesTotal属性 该属性返回此次下载或上传总共要传输的字节数。与BytesSent属性或BytesRecvd属性配合使用可以显示文件传输的进度。 CurrentDir属性 该属性返回FTP服务器上的当前目录。 FTPDirectoryList属性 TFTPDirectoryListType是一个类类型，该属性返回FTP服务器上的当前目录的信息。 Host属性 该属性指定FTP服务器的地址或主机名。 LocalIP属性 该属性返回本地计算机的IP地址。如果本地计算机的IP地址有多个，则该特性返回其中的第一个。 TNMFTP组件的主要属性（续2） ParseList属性 该属性如果设为TRUE，就可以从FTPDirectoryList属性中得到文件的详细资料（包括文件名、文件大小、文件类型、文件最后修改日期）。 Password属性 在登录到FTP服务器时需要给出用户名和口令。该特性用于给出口令。匿名登录时客户端软件也可以随便指定一个包含“@”的邮件地址。 Port属性 指定FTP服务器的端口号，默认值是21。 Proxy属性 指定代理服务器的主机名或者是IP地址。在不需要代理服务器的情况下，该数值为空值。 ProxyPort属性 指定代理服务器的端口号。在不需要代理服务器的情况下，该数值为空值。 TNMFTP组件的主要属性（续3） RemoteIP属性 返回FTP服务器的IP地址。 ReplyNumber属性 返回FTP服务器响应客户请求的应答代码。 ReportLevel 属性 指定状态信息的详细程度，有如下值： Status_None = 0 Status_Informational = 1 Status_Basic = 2 Status_Routines = 4 Status_Debug = 8 Status_Trace = 16 Status属性 返回当前连接FTP服务器的状态信息。 TNMFTP组件的主要属性（续4） TimeOut属性 超时设定，指定一个毫秒数值，