怎样用代码实现filemanager中的文件？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎样用代码实现filemanager中的文件？

共有2644人关注过本帖树形打印复制链接主题：怎样用代码实现filemanager中的文件？

新航程小何

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

加好友

发短信

等级：三尾狐帖子：629 积分：4786 威望：0 精华：0 注册：2014/9/17 11:34:00

怎样用代码实现filemanager中的文件？ 发帖心情

Post By：2015/5/22 10:57:00 [只看该作者]

各位老师，请问我想实现截图的功能，但被怎样用代码实现filemanager中的文件卡住了？请老师指点

1、点击上传的时候添加文件到filemange1中，代码如下

Dim dlg As New OpenFileDialog

Dim flm As WinForm.FileManager = e.Form.Controls("FileManager1")

dlg.Filter= "影像文件|*.*"

If dlg.ShowDialog = DialogResult.OK Then

flm.AddFile(dlg.FileName)

End If

2、点击删除，移除filemanager中文件，代码如下

Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")

Dim fl As String = fm.SelectedItem

If fl > "" Then

fm.DeleteFile(fl)

Else

messagebox.show("对不起,没有影像可删除!","提示")

End If

3、点击保存，将filemanger1中文件上传到服务器（比如：186.153.89.68,用户名：foxtable.密码：52foxb）,这个不会

Bin

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

加好友

发短信

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

Post By：2015/5/22 11:04:00 [只看该作者]

FTP搭建的服务器吗?

Dim fm As WinForm.FileManager = e.Form.Controls("FileManager1")

fm.FTPclient ' 控件有个 FTPclient 属性 http://www.foxtable.com/help/topics/1898.htm

取的是一个FTP控制类,参考帮助可以编码完成所有控制功能 http://www.foxtable.com/help/topics/1410.htm

新航程小何

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

加好友

发短信

等级：三尾狐帖子：629 积分：4786 威望：0 精华：0 注册：2014/9/17 11:34:00

Post By：2015/5/22 11:13:00 [只看该作者]

（界面如下）我用的是云服务器，在云服务器上搭建了ftp,想着是把图片视频类的放在云上，我找了ftpclient,我没找到我想要的，我现在的想法是:通过代码读取filemanager1中的文件，保存的时候，链接到ftp,把问题上传到云服务器。但是我的问题是：1.怎么样能够获取filemanager1中文件？2、怎样使这些文件上传到云主机

[此贴子已经被作者于2015/5/22 11:12:52编辑过]