需要使用ftp管理公共文件。
例如公司有多个项目,每个项目有多个订单。
希望创建一个项目时,在ftp增加一个项目名称目录(项目名称不会重复)
希望创建项目X下的订单时,在ftp的项目X下增加一个订单号的目录,然后这个订单的文件都放在该订单下面
而且每个订单有不同的列,可能这些列都需要上传各自的文件(或图片),如果每个列都去设置,就很不方便,有没有批量设置的方法(例如针对这个订单做设置,而不是针对每一列做设置)
上传时先判定项目名称目录是否存在,不存在就创建目录,存在就检查第二级目录,根据订单号检查,存在就直接上传,不存在就创建后上传。
[此贴子已经被作者于2024/6/21 10:21:48编辑过]
但是那个比如上传图片,在上传时是系统内置的界面啊,又不是自己定义一个上传界面来处理
[此贴子已经被作者于2024/6/21 10:25:40编辑过]
做个上传按钮来弄啊,内置的改不了,创建目录只能一级一级创建,不能一次创建多级。判断和创建目录大概思路:
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编辑过]