[求助]远程下载的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]远程下载的问题

共有6256人关注过本帖树形打印复制链接主题：[求助]远程下载的问题

Bin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 9:09:00 [显示全部帖子]

FTPClient的GetFileList 可以获得指定目录下的所有文件。你把你需要下载的文件传到该目录。然后使用该方法获取所有文件名即可。

既然获得了文件名你喜欢以任何方式展现都可以。

Bin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 9:13:00 [显示全部帖子]

Dim ftp1 As new ftpclient
ftp1.host="128.169.143.96"
ftp1.Account = "foxuser"
ftp1.password = "136137138"
dim fileList as List(of String)= ftp1.GetFileList("file\")

Bin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 10:03:00 [显示全部帖子]

上面代码已经给得很清楚了。还不会的话真的需要多啃下帮助。多动下脑子里了。你喜欢放在按钮上也行，放在窗口的加载事件上也行。哪里都行。按照你需求、喜好而定。

Bin

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 10:29:00 [显示全部帖子]

以下是引用唐尸三摆手在2013-4-10 10:15:00的发言：

'举个例子给你

'窗口1有控件listbox1

'窗口的afterload事件先要生成即将显示给用户的文件

For Each File As String In FileSys.GetFiles("C:\")

Dim TmpFile As New System.IO.FileInfo(File)

e.form.controls("listbox1").items.add(TmpFile.Name)
Next

'控件listbox1的双击事件

messagebox.show("你选择的是C:\" & e.sender.SelectedValue）

根据你自己的要求再自行更改，编程要多动手多动脑才行。

如果不是本地。而是FTP服务器什么的。FileSys.GetFiles是无法获取得。

Bin

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2013/4/10 10:32:00 [显示全部帖子]

以下是引用唐尸三摆手在2013-4-10 10:31:00的发言：
哈，举例而已，用户根据情况自行修改代码。如果是FTP，当然就得按FTp的原则了。

既然是下载文件。再本机了。还下载个啥- -

下一主题 >> << 上一主题

主题：[求助]远程下载的问题