FTP操作模块
'文件下载示例:
Private Sub Form_Load()
Dim FTP As FTP
Set FTP = New FTP
Call FTP.Connect("127.0.0.1", 21, "username", "password")
Call FTP.GetFile("/wwwroot/index.asp", "c:\abcd.asp")
Set FTP = Nothing
End Sub
下载东西时要通过web服务器下载地址栏里指定地址的文件你需要先研究一下http协议的相关内容
这里有篇简单的内容供你参考...
http://hi.baidu.com/sdfiyon/blog/item/25ba0ec7e0e53ad8d0006036.html
如果你想自己写个程序相互传文件比较简单,如果你想让你的程序支持浏览器的下载,就比较复杂了,呵呵
欢迎分享,转载请注明来源:夏雨云
评论列表(0条)