以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]在互联网下如何批量设置附件列的ftp属性  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=49061)

--  作者:loongtai
--  发布时间:2014/4/11 15:36:00
--  [求助]在互联网下如何批量设置附件列的ftp属性
在帮助里关于远程文件管理提到的是:在列属性下的扩展里进行设置

图片点击可在新窗口打开查看此主题相关图片如下:ftp.jpg
图片点击可在新窗口打开查看
但是项目中的扩展类型列较多,如果服务器地址改后,再一一进行修改,非常麻烦。
能不能统一进行设置。如果更改的话,只在某个位置(如全局代码中)更改一次即可。

--  作者:Bin
--  发布时间:2014/4/11 15:37:00
--  
只能一个个设置哦
--  作者:loongtai
--  发布时间:2014/4/11 16:29:00
--  
在帮助里找到这此内容:

Remote

逻辑型,对于扩展类型为文件、多文件、图片的列,是否采用远程FTP管理文件。

示例

DataTables("合同").DataCols("文档").ExtendType = ExtendTypeEnum.FILES
DataTables(
"合同").DataCols("文档").Remote = True
DataTables(
"合同").DataCols("文档").FTPClient.Host ="192.168.1.202"
DataTables(
"合同").DataCols("文档").FTPClient.Account = "foxtable"
DataTables(
"合同").DataCols("文档").FTPClient.password = 
"foxtable"

参照帮助,我在命令窗口试了下以下代码:

Dim dt As DataTable=DataTables("员工信息表")
For Each dc As DataCol In dt.DataCols
    If dc.ExtendType=ExtendTypeEnum.images OrElse dc.ExtendType=ExtendTypeEnum.file OrElse dc.ExtendType=ExtendTypeEnum.files Then
        MessageBox.show("dc=" & dc.name)
        dc.Remote = True
        dc.FTPClient.Host ="192.168.0.96"
        dc.FTPClient.Account ="ftpuser"
        dc.FTPClient.password = "1234"
    End If
Next
运行后只有dc.remote的设置在列属性里是true,其它的都没设上。

--  作者:Bin
--  发布时间:2014/4/11 16:47:00
--  
代码设置后,并不会显示在列属性里.

但是会有效果的

--  作者:loongtai
--  发布时间:2014/4/11 17:05:00
--  
那么这样设置是不是等同于在列属性里的设置效果呢?
--  作者:Bin
--  发布时间:2014/4/11 17:06:00
--  
是的