- 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=162430)
-- 发布时间：2021/4/14 16:09:00
-- 关于ftp
设置表A的“图片1”列扩展为图片列，希望打开服务器ftp管理器，在项目Initialize事件写代码
DataTables("表A").DataCols("图片1").ExtendType = ExtendTypeEnum.images
DataTables("表A").DataCols("图片1").FTPClient.Host = "123.215.144.99"
DataTables("表A").DataCols("图片1").FTPClient.Account = "ftp"
DataTables("表A").DataCols("图片1").FTPClient.Password = "nnn"
DataTables("表A").DataCols("图片1").FTPClient.OpenManager
有何不妥？
[此贴子已经被作者于2021/4/14 16:12:27编辑过]
-- 发布时间：2021/4/14 16:18:00
--
代码放到afteropenproject事件
如果要打开列窗口
DataTables("表A").DataCols("图片1").FTPClient.OpenManager
改为
Tables("表A").Cols("图片1").OpenWindow
-- 发布时间：2021/4/15 9:04:00
--
代码放到afteropenproject事件 后，保存报错：
此主题相关图片如下：ftp失败1.png
感觉代码中缺少点东西：
此主题相关图片如下：ftp错误2.png
-- 发布时间：2021/4/15 9:15:00
--
http://www.foxtable.com/webhelp/topics/2040.htm
-- 发布时间：2021/4/15 11:49:00
--
谢谢，成功
现在将代码用于打开窗口事件中，表加载了，但是扩展图片列不成功。
Dim SQL As String = "select * fr om{商品表}"
Dim T1 As Table = e.Fo rm.Controls("Table1").Table
T1.Fill(SQL,"GSJCC",False)
T1.DataTable.DataCols("图片").ExtendType = ExtendTypeEnum.images
差在哪？
-- 发布时间：2021/4/15 12:03:00
--
如果是ftp一样像一楼那样设置
-- 发布时间：2021/4/15 12:11:00
--
代码写在哪？
-- 发布时间：2021/4/15 13:30:00
--
放到5楼代码后面
-- 发布时间：2021/4/15 15:14:00
--
为什么下列几行代码不起作用？
T1.DataTable.DataCols("图片").FTPClient.DeleteEnabled =False \'禁用删除文件按钮
T1.DataTable.DataCols("图片").FTPClient.RenameEnabled = False \'禁用重命名文件按钮
T1.DataTable.DataCols("图片").FTPClient.UploadEnabled = False \'禁用上传按钮
T1.DataTable.DataCols("图片").FTPClient.DownloadEnabled = False \'禁用下载按钮
T1.DataTable.DataCols("图片").FTPClient.DeleteEnabled = False \'禁用删除按钮
-- 发布时间：2021/4/15 15:29:00
--
这个功能仅对主表列窗口有效