Foxtable(狐表)用户栏目专家坐堂 → [求助]ftp目录的问题


  共有1719人关注过本帖树形打印复制链接

主题:[求助]ftp目录的问题

帅哥哟,离线,有人找我吗?
chnfo
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2243 积分:18477 威望:0 精华:0 注册:2011/11/26 20:21:00
[求助]ftp目录的问题  发帖心情 Post By:2024/6/21 10:19:00 [只看该作者]

需要使用ftp管理公共文件。
例如公司有多个项目,每个项目有多个订单。
希望创建一个项目时,在ftp增加一个项目名称目录(项目名称不会重复)
希望创建项目X下的订单时,在ftp的项目X下增加一个订单号的目录,然后这个订单的文件都放在该订单下面

而且每个订单有不同的列,可能这些列都需要上传各自的文件(或图片),如果每个列都去设置,就很不方便,有没有批量设置的方法(例如针对这个订单做设置,而不是针对每一列做设置)

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3217 积分:21371 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/6/21 10:22:00 [只看该作者]

上传时先判定项目名称目录是否存在,不存在就创建目录,存在就检查第二级目录,根据订单号检查,存在就直接上传,不存在就创建后上传。
[此贴子已经被作者于2024/6/21 10:21:48编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
chnfo
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2243 积分:18477 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By:2024/6/21 10:25:00 [只看该作者]

但是那个比如上传图片,在上传时是系统内置的界面啊,又不是自己定义一个上传界面来处理
[此贴子已经被作者于2024/6/21 10:25:40编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110885 积分:564381 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/6/21 10:31:00 [只看该作者]

内置的管理器改不了。只能自己设计窗口,自己编码处理各种上传下载功能:http://www.foxtable.com/webhelp/topics/1410.htm

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  5楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3217 积分:21371 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2024/6/21 10:37:00 [只看该作者]

做个上传按钮来弄啊,内置的改不了,创建目录只能一级一级创建,不能一次创建多级。
判断和创建目录大概思路:
Dim file = "/" & r("项目名称") & "/" & r("订单编号") & "/" & filesys.GetName(f)
If ftp.DirExists("/" & r("项目名称")) = False Then '如果不存在
    ftp.MakeDir("/" & r("项目名称")) '创建项目名称目录
Else
    If ftp.DirExists("/" & r("项目名称") & "/" & r("订单编号")) = False Then '如果不存在
        ftp.MakeDir("/" & r("项目名称") & "/ " & r("订单编号")) '创建订单编号目录
    End If
End if

对了,可以在表事件CellButtonClick里面写代码

[此贴子已经被作者于2024/6/21 10:59:04编辑过]

 回到顶部