以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]使用内置文件管理器如何动态设置根目录?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=43063)

--  作者:新福星
--  发布时间:2013/11/28 18:39:00
--  [求助]使用内置文件管理器如何动态设置根目录?

互联网应用的一个项目,在互联网下应用.一个表中"图纸文件"字段扩展类型为多文件,且设置参数如图.


图片点击可在新窗口打开查看此主题相关图片如下:q1.jpg
图片点击可在新窗口打开查看

 

在"图纸文件"字段中文件或图片放在不同的目录下,在读取这些文件时出错,如下图.

图片点击可在新窗口打开查看此主题相关图片如下:q2.jpg
图片点击可在新窗口打开查看

 

问题:如何动态设置这个目录呢?这个问题如何解决呢?谢谢


--  作者:有点甜
--  发布时间:2013/11/28 19:31:00
--  
 你说的是动态设置根目录么?直接设置列的FTPClient

 Dim ftp1 As New FtpClient = DataTables("xxx").datacols("xxx").FTPClient


--  作者:新福星
--  发布时间:2013/11/28 22:07:00
--  
问题 使用内置文件管理器不知道放到哪个事件中;还有每条记录中这一列中有多个文件,目录可能都不太一样,在哪个地方设呢?
--  作者:有点甜
--  发布时间:2013/11/28 22:14:00
--  
 文件路径可以不一样,因为文件名就是路径了。

 只要你对应路径下有文件,就可以随便操作下载查看的。

--  作者:新福星
--  发布时间:2013/11/29 8:58:00
--  
一个窗口个有一个表控件和一个表(销售合同)关联,是主表。
这个表中有一列(图纸文件)设为多文件,并对列属性做了设置,见上图1;
打开这个窗口时利用    Tables("销售合同").Cols("图纸文件").OpenWindow() 打开了内置文件管理器;

远程根目录为/图纸文件;但是销售合同表中的图纸文件内容是多行且都是/图纸文件下属目录,见上图二;
现在打开这个窗口,出现了内置文件管理器,打开文件时出错,见上图二;怎么解决啊!谢谢
前期做过的工作是在这个窗口打开事件中做了如下设置:

Dim fm1 As WinForm.FileManager =  Tables("销售合同").Cols("图纸文件").FileManager 
fm1.DeleteCommand.Enabled = False
fm1.ClearCommand.Enabled = False


Dim ftp As New FTPClient
ftp.Host="kennt.vicp.cc"
ftp.Account = "XXXXX"
ftp.password = "XXXXXXXXXXX"
Dim mlm As String="/图纸文件/" 


If ftp.DirExists(mlm)=False Then  ftp.MakeDir(mlm) \'则创建Data目录
ftp.DeleteEnabled =False \'禁用删除文件按钮
ftp.RenameEnabled = False \'禁用重命名文件按钮
ftp.MakerDirEnabled=False

ftp.RootDir = mlm \'设置根目录
fm1.FTPclient = ftp

取消或者加上都出错!

--  作者:Bin
--  发布时间:2013/11/29 9:01:00
--  
上例子吧.
--  作者:新福星
--  发布时间:2013/11/29 9:24:00
--  
一个在线运营的系统 做例子有难度啊?能不能远程看下?
--  作者:Bin
--  发布时间:2013/11/29 9:31:00
--  
腾出一块FTP控件,放几个文件做例子.有什么难度?
--  作者:新福星
--  发布时间:2013/11/29 9:45:00
--  
实际是远程SQL数据库的。做个例子就要改,条件和情况都发生了变化。
--  作者:Bin
--  发布时间:2013/11/29 9:46:00
--  
你管那些做什么,就核心问题做个例子即可.