专栏首页VB小源码vb6.0 FTP文件下载

vb6.0 FTP文件下载

vb6.0 FTP文件下载

Private Sub Command1_Click()

Inet1.AccessType = icUseDefault '设置与Internet连接的类型,默认值

Inet1.Protocol = icFTP

Inet1.RemotePort = 21

Inet1.Execute txtURL.Text, "GET " & txtFile.Text & " " & txtSave.Text

End Sub

Private Sub Inet1_StateChanged(ByVal State As Integer)

Select Case State

Case icError

MsgBox "错误:" & Inet1.ResponseInfo, vbCritical

Case icResponseCompleted

MsgBox "下载成功!", vbInformation

End Select

End Sub


度盘链接:链接:https://pan.删baidu.com/s/1N除rFUOb1u39nHdPkIQ5FFTQ

密码:30ul

本文分享自微信公众号 - VB小源码(vb_xym),作者:巴西_prince

原文出处及转载信息见文内详细说明,如有侵权,请联系 yunjia_community@tencent.com 删除。

原始发表时间:2018-10-02

本文参与腾讯云自媒体分享计划,欢迎正在阅读的你也加入,一起分享。

我来说两句

0 条评论
登录 后参与评论

相关文章

  • VB.NET 服务端源码

    Imports System.Net Imports System.Net.Sockets Imports System.Threading Imports S...

    巴西_prince
  • vb.net 结合MySQL数据库制作登录界面

    1、先用.net自带ping类ping通主机则进行数据库链接,否则提示用户服务器链接失败,并禁止用户输入,点击确定登录按钮!这是为了防止应用长时间无响应!

    巴西_prince
  • Basic4Android(B4A)-->安卓仿微信扫一扫的条码,二维码,PDF417码等扫码工具及制作过程

    Basic4android 是一个简单但功能强大的 Android 应用开发环境。Basic4android 语言跟 Visual Basic 语言类似,支持更...

    巴西_prince
  • 爬虫之selenium

    selenium最初是一个自动化测试工具,而爬虫中使用它主要是为了解决requests无法直接执行JavaScript代码的问题 selenium本质是通过驱...

    GH
  • 免费IP地址查询API接口

    咻一咻
  • 如何为.NETCore安装汉化包智能感知

    具体不记得是在群里还是什么地方有人问过,.NETCore有没有汉化包,答案是有,目前微软已经为我们提供了.NETCore多种语言的语言包。下面看看如何安装与使用...

    HueiFeng
  • “蹲坑神器”与它背后男人们不得不说的故事

    比如在你心急如焚赶着开会想去卫生间时,里面那位可能在美滋滋卷头发、抹口红;你快下班想要去卫生间时,他可能坐在马桶上借上厕所之名狂打游戏。

    昱良
  • 【小家Spring】聊聊Spring中的格式化:Formatter、AnnotationFormatterFactory、DateFormatter以及@DateTimeFormat...

    Converter只完成了数据类型的转换,却不负责输入输出数据的格式化工作,日期时间、货币等虽都以字符串形式存在,却有不同的格式。

    YourBatman
  • D12-Android自定义控件之--二分搜索树

    张风捷特烈
  • 使用 febootstrap 制作自定义基础镜像

    版权声明:本文为博主原创文章,未经博主允许不得转载。 ...

    哎_小羊

扫码关注云+社区

领取腾讯云代金券