vb上传下载控件Inet-FTP使用大全
2013-06-04 17:57
369 查看
http://blog.sina.com.cn/s/blog_7a44d60901012m8j.html
1、利用Inet控件上传文件
格式:inet1.execute , "put 本地文件 远程文件"
范例:
'初始化Inet控件
Inet1.Protocol = icFTP
Inet1.URL = "ftp://u0501901.k1.13939.org"
Inet1.RemotePort = 21
Inet1.UserName = "u0501901"
Inet1.Password = "xxx"
Label3.Caption = "正在上传....."
'先关闭当前的数据库存连接
cn.Close
Inet1.Execute , "put" & " " & App.Path & "\vbhelp.mdb" & " " & "/vbhelp/vbhelp.mdb"
Do While Inet1.StillExecuting
DoEvents
Loop
Label3.Caption = "上传成功"
'重新连接数据库
dbconnect
2、利用Inet控件下载文件
格式: inet1.execute , "get 远程文件 本地文件",注意空格
'初始化INET1控件
Inet1.Protocol = icFTP
Inet1.URL = "ftp://u0501901.k1.13939.org"
Inet1.RemotePort = 21
Inet1.UserName = "u0501901"
Inet1.Password = "xxx"
Label3.Caption = "正在下载...."
'格式: inet1.execute , "get 远程文件 本地文件",注意空格
Inet1.Cancel
Inet1.Execute , "GET /vbhelp/vbhelp.mdb c:\temp\vbhelp.mdb"
Do While Inet1.StillExecuting
DoEvents
Loop
label3.caption="下载成功"
3、利用INET控件建立远程的文件夹
Inet1.AccessType = icUseDefault
Inet1.RemotePort = 21
Inet1.Protocol = icFTP
Inet1.URL = "u0711084.k1.13939.org"
Inet1.UserName = "u0711084"
Inet1.Password = "xxx"
Inet1.Execute , "mkdir vbtest"
Do While Inet1.StillExecuting
DoEvents
Loop
Inet1.Execute , "close"
Inet1.Execute , "quit"
MsgBox "成功建立文件夹"
4、利用INET控件删除远程文件夹
方法跟建立文件夹一样,删除命令为rmdir,但只能删除空目录,删除文件用delete
(本文章出自:http://www.pyxsj.com)
1、利用Inet控件上传文件
格式:inet1.execute , "put 本地文件 远程文件"
范例:
'初始化Inet控件
Inet1.Protocol = icFTP
Inet1.URL = "ftp://u0501901.k1.13939.org"
Inet1.RemotePort = 21
Inet1.UserName = "u0501901"
Inet1.Password = "xxx"
Label3.Caption = "正在上传....."
'先关闭当前的数据库存连接
cn.Close
Inet1.Execute , "put" & " " & App.Path & "\vbhelp.mdb" & " " & "/vbhelp/vbhelp.mdb"
Do While Inet1.StillExecuting
DoEvents
Loop
Label3.Caption = "上传成功"
'重新连接数据库
dbconnect
2、利用Inet控件下载文件
格式: inet1.execute , "get 远程文件 本地文件",注意空格
'初始化INET1控件
Inet1.Protocol = icFTP
Inet1.URL = "ftp://u0501901.k1.13939.org"
Inet1.RemotePort = 21
Inet1.UserName = "u0501901"
Inet1.Password = "xxx"
Label3.Caption = "正在下载...."
'格式: inet1.execute , "get 远程文件 本地文件",注意空格
Inet1.Cancel
Inet1.Execute , "GET /vbhelp/vbhelp.mdb c:\temp\vbhelp.mdb"
Do While Inet1.StillExecuting
DoEvents
Loop
label3.caption="下载成功"
3、利用INET控件建立远程的文件夹
Inet1.AccessType = icUseDefault
Inet1.RemotePort = 21
Inet1.Protocol = icFTP
Inet1.URL = "u0711084.k1.13939.org"
Inet1.UserName = "u0711084"
Inet1.Password = "xxx"
Inet1.Execute , "mkdir vbtest"
Do While Inet1.StillExecuting
DoEvents
Loop
Inet1.Execute , "close"
Inet1.Execute , "quit"
MsgBox "成功建立文件夹"
4、利用INET控件删除远程文件夹
方法跟建立文件夹一样,删除命令为rmdir,但只能删除空目录,删除文件用delete
(本文章出自:http://www.pyxsj.com)
相关文章推荐
- cURL 学习笔记与总结(4)使用 cURL 从 ftp 上下载文件与上传文件到 ftp
- 详解JAVA中使用FTPClient工具类上传下载
- 使用Ftp上传下载文件-Java版
- Linux使用Shell脚本实现ftp的自动上传下载
- VB.Net 使用FTPWebRequest下载进度条
- 如何使用DOS命令通过FTP进行上传和下载
- JAVA中使用FTPClient实现文件上传下载
- Python在使用FTP下载上传文件时遇到中文名称和路径时的解决办法
- ProxySG 使用FTP代理模式上传下载大文件缓慢
- Linux使用Shell脚本实现ftp的自动上传下载(转)
- JAVA中使用FTPClient实现文件上传下载实例代码
- VB.NET中使用FTP下载文件的两种方法。
- 使用FTPClient文件上传下载遇到的问题
- VB.NET中使用FTP下载文件的两种方法
- Linux使用Shell脚本实现ftp的自动上传下载
- Linux使用Shell脚本实现ftp的自动上传下载
- Linux使用Shell脚本实现ftp的自动上传下载
- JAVA中使用FTPClient工具类上传下载
- Java中使用FTPClient上传下载
- 使用edtftpj进行ftp文件上传和下载