分享一个FTP上传下载控件。前几天看到有吧友在问FTP上传下
vb吧
全部回复
仅看楼主
level 13
xuqiancun3 楼主
分享一个FTP上传下载控件。
前几天看到有吧友在问FTP上传下载的帖子,但是没时间弄,今天终于休息了,带着浓厚的兴趣写了这个控件,现在分享给吧友们,希望大家能够多多顶贴,多多点赞支持。
纯代码编写,没有用 inet 控件、winsock控件,有参考借鉴网上的源码 。
控件采用了分包上传和下载的方式,测试了最大200M的上传,再大的就没测试了。传输期间不会出现卡住、无响应的情况。
上传和下载都有详细的信息显示,如总大小,已传输,未传输,剩余大小,已用时间,剩余时间,传输百分比,以及进度条显示。
使用界面:
应用示例:
2019年06月30日 06点06分 1
level 13
xuqiancun3 楼主
控件功能说明:
****************************************************************************************
方法:
1、CnnServer----连接FTP服务器
参数:
aServerAddress---ftp地址
aUser---登录名
aPsw----密码
aPort--端口
[aSiteName]---连接命名,可选参数。
[aConnType]---连接模式,可选参数。"0"--主动模式;"1"--被动模式,更稳定。默认为"1"
返回:执行结果。"0"--操作失败;"1"--操作成功
2、DisCnnServer---断开服务器连接
参数:无
返回:执行结果。"0"--操作失败;"1"--操作成功
3、Upload----上传文件。本方法调用之前,需要调用 CnnServer 方法和服务器建立连接
参数:
aLocalFile---本地文件全路径
aServerFileName---上传至服务器保存路径。如:"Test/123.zip"
返回:执行结果。"0"--操作失败;"1"--操作成功
4、Download----下载文件。本方法调用之前,需要调用 CnnServer 方法和服务器建立连接
参数:
aServerFileName---上传至服务器保存路径。如:"Test/123.zip"
aLocalFile---本地文件全路径
返回:执行结果。"0"--操作失败;"1"--操作成功
5、GetVersion---获取控件版本
参数:无
返回:版本号。
****************************************************************************************
2019年06月30日 06点06分 2
level 13
xuqiancun3 楼主
事件:
1、UpLoadDone(ByVal aFileSize As String, ByVal aTime As String)
---上传完毕。aFileSize--传递文件大小;aTime--传递耗费时间,单位为秒。
2、DownLoadDone(ByVal aFileSize As String, ByVal aTime As String)
---下载完毕。aFileSize--传递文件大小;aTime--传递耗费时间,单位为秒。
****************************************************************************************
属性:
1、BackColor---设置控件的背景色
2、BordColor---设置控件和滚动条的边框色
3、TopColor----设置滚动条的颜色
4、ForeColor---设置字体颜色
5、RoundRC-----设置控件和滚动条的圆角大小,默认为5
6、ShowBord----设置是否显示控件边框
7、ShowDetail-----设置默认是否显示详细信息
****************************************************************************************
应用响应:
1、运行时,鼠标单击界面【详细】左侧的 "+" "-" 图标,可以 "折叠"或者"展开" 详细信息
****************************************************************
2019年06月30日 06点06分 3
level 13
xuqiancun3 楼主
发个帖子真难,搞了一个小时。在电脑上编辑好了,点发送竟然失败,提示未知错误,1100003,没办法,只有手机重新编辑发,真是无语啊
2019年06月30日 07点06分 5
没用winsock
2019年06月30日 07点06分
怎么连接的ftp
2019年06月30日 07点06分
是本地的ftp还是?
2019年06月30日 07点06分
@五代十国情仇🎓 是的,没用winsock控件和inet控件,用的api实现的
2019年06月30日 10点06分
吧务
level 14
分享的没看到[滑稽]是不是被吞了
2019年06月30日 09点06分 6
有啊,在第四楼
2019年06月30日 10点06分
@xuqiancun3 可能因为你是楼主[滑稽]只有你看得到
2019年06月30日 12点06分
@xuqiancun3 留个qq
2019年06月30日 13点06分
@五代十国情仇🎓 675512238,加的时候注明vb吧
2019年06月30日 13点06分
level 13
xuqiancun3 楼主
下载链接在4楼
2019年06月30日 10点06分 7
4楼真的被吞了
2019年06月30日 10点06分
@贴吧用户_0DbNVKU 不会吧,我这里看得到啊,手机上,电脑上都能看到。我再发一遍
2019年06月30日 10点06分
@xuqiancun3 加我个qq兄弟
2019年06月30日 11点06分
level 11
被吞了[乖][乖],链接上加几个表情、删掉http试试
2019年06月30日 12点06分 10
level 13
xuqiancun3 楼主
那几个定义另外一个树控件控件的绘图模块,我做这个绘图的时候直接拷过来,忘记去掉了,不过不影响。进度条开始是隐藏的,生成的时候想着不如一起分享给大家,就又改成public了
2019年06月30日 13点06分 17
@贴吧用户_0DbNVKU 提取码05bv,不能提取吗?我自己电脑可以下载
2019年06月30日 14点06分
@xuqiancun3 忘了[泪]被抽了
2019年06月30日 14点06分
兄弟,你那个让输入姓名
2019年06月30日 14点06分
目前找不到一个ftp服务器
2019年07月05日 02点07分
level 13
xuqiancun3 楼主
贴吧这真是太抽了,自己的网盘地址都吃
2019年06月30日 13点06分 19
我的也被吃了
2019年06月30日 14点06分
level 8
楼主求链接呀
2019年06月30日 16点06分 20
🔗抽得厉害,我的base64没抽
2019年06月30日 16点06分
level 2
求链接地址
2019年07月01日 03点07分 21
吧务
level 14
贴吧最近吞链吞图特厉害,估计是度娘那边又有谁家里人s了
2019年07月01日 04点07分 22
@xuqiancun3 帖子被删除了
2019年07月01日 09点07分
level 11
可以考虑扩展下功能啊[哈哈],获取目录列表、创建删除这些
2019年07月01日 13点07分 23
如果能获取桌面就好了
2019年07月02日 02点07分
@五代十国情仇🎓 那是远程控制了,不是一个概念
2019年10月15日 00点10分
吧务
level 12
支持[吐舌]
2019年07月01日 15点07分 24
level 5
可以上传下载文件夹吗?
2019年07月02日 07点07分 25
你不可以把文件夹压缩成一个【RAR】或【ZIP】文件吗?
2019年07月05日 06点07分
@Luosen56 好的,谢谢
2019年07月05日 06点07分
1 2 3 尾页