WEB开发网
开发学院WEB开发综合 利用Internet传输控件来使用FTP 阅读

利用Internet传输控件来使用FTP

 2006-02-27 11:53:04 来源:WEB开发网   
核心提示:现在是该设置控件属性的时候了:将URL属性设置为FTP服务器的URL,将用户名(Username)和密码(PassWord)的属性设置为合法的用户ID和密码,利用Internet传输控件来使用FTP,这也是FTP所要用到的,(如果你将这些属性留成空白,你可以使用对象浏览器(ObjectBrowser)或者在线帮助(On
现在是该设置控件属性的时候了:

将URL属性设置为FTP服务器的URL。
  将用户名(Username)和密码(PassWord)的属性设置为合法的用户ID和密码,这也是FTP所要用到的。(如果你将这些属性留成空白,那么用户名属性就会被设置为匿名(anonymous),而密码属性会被设置为一个缺省的密码。)
将协议(PRotocol)属性设置为icFTP,这是访问FTP所需要的。设置一下RequestTimeout,以防止在服务器没有相应的时候控件挂起。例如:
WithInet1
.URL="ftp://myftpserver"
.UserName="myusername"
.Password="mypassword"
.Protocol=icFTP
.RequestTimeout=120
EndWith

要进行GET或者PUT操作,就要调用Execute方法。第一个自变量是可选的,它允许你指定URL。第二个自变量能够让你指定要进行的操作。当GET操作被调用的时候,你必须传递被请求文件的名称和要创建的本地文件名。当PUT操作被调用的时候,要被上传的文件就会被指定,然后就在FTP服务器上创建这个文件。

CallInet1.Execute(,"GETftpfile.txtc:\temp\ftpfile.txt")
CallInet1.Execute(,"PUTc:\temp\ftpfile.txtftpfile2.txt")

Execute方法是异步工作的,所以你可以使用StateChanged事件来监控这项操作的进展情况。State自变量会是一个StateConstant。你可以使用对象浏览器(ObjectBrowser)或者在线帮助(OnlineHelp)来查看State所有合法的值。

PrivateSubInet1_StateChanged(ByValStateAsInteger)
Debug.PrintState
EndSub

如果State等于icError,那么你可以通过ResponseCode和ResponseInfo属性来获取错误信息。

Debug.PrintInet1.ResponseCode
Debug.PrintInet1.ResponseInfo

->

Tags:利用 Internet 传输

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接