如何分割出文件路径，然后复制文件到另一个文件夹中压...

784570816

如何分割出文件路径，然后复制文件到另一个文件夹中压缩保存(可选是否添加压缩包密码)

过程如下：

“某某预算算量 - [招标管理 - xx小区-xx工程 - C:/Users/Administrator/Desktop/文件名称.GBQ6]”

“某某结算算量 - [投标管理 - xx小区xx工程 - D:/文件/Administrator/Desktop/71(8).GBQ6]”

“某某审核 - [其他 - xx小区-xx工程-xx项目 - E:/文件#1/存储/@$/工作#%【1】号.GBQ6]”




①获得了如上引号内文本:(路径不固定，文件名不固定，需排除干扰)

②提取出需要的路径:
C:/Users/Administrator/Desktop/文件名称.GBQ6

D:/文件/Administrator/Desktop/71(8).GBQ6

E:/文件#1/存储/@$/工作#%【1】号.GBQ6

③复制此文件到指定的文件夹，并完成带有日期时间的压缩
D：/自动备份/文件名称-2022-06-14-15:25.zip

D：/自动备份/71(8)-2022-06-14-15:33.GBQ6

D：/自动备份/工作#%【1】号-2022-06-14-15:35.GBQ6

湘伦

  

变量名	类 型	静态	数组	备 注
分割	文本型		0
路径	文本型

分割 ＝ 分割文本 (“某某审核 - [其他 - xx小区-xx工程-xx项目 - E:/文件#1/存储/@$/工作#%【1】号.GBQ6]”, “-”, )
路径 ＝ 分割 [取数组成员数 (分割)]
路径 ＝ 文本_替换 (路径, , , , “]”, “”, , , , , , , , )
路径 ＝ 文本_删首尾空 (路径)
调试输出 (路径)
rar_初始化 (, )
rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 路径, 文本型<br /> <br /> 分割 ＝ 分割文本 (“某某审核 - [其他 - xx小区-xx工程-xx项目 - E:/文件#1/存储/@$/工作#%【1】号.GBQ6]”, “-”, )<br /> 路径 ＝ 分割 [取数组成员数 (分割)]<br /> 路径 ＝ 文本_替换 (路径, , , , “]”, “”, , , , , , , , )<br /> 路径 ＝ 文本_删首尾空 (路径)<br /> 调试输出 (路径)<br /> rar_初始化 (, )<br /> rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )

补充内容 (2022-6-14 16:39):
@kingtt 会变又不影响，再读读代码

湘伦

湘伦 发表于 2022-6-14 16:32

  

[/quote]
最后一句掉了一个-，要用精易模块
[e=1]rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ “-” ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec</blockquote></div><br /> 最后一句掉了一个-，要用精易模块<br /> <br /> [e=1]rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ “-” ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )

湘伦

  

变量名	类 型	静态	数组	备 注
分割	文本型		0
路径	文本型

分割 ＝ 分割文本 (“某某审核 - [其他 - xx小区-xx工程-xx项目 - E:/文件#1/存储/@$/工作#%【1】号.GBQ6]”, “-”, )
路径 ＝ 分割 [取数组成员数 (分割)]
路径 ＝ 文本_替换 (路径, , , , “]”, “”, , , , , , , , )
路径 ＝ 文本_删首尾空 (路径)
调试输出 (路径)
rar_初始化 (, )
rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ “-” ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 路径, 文本型<br /> <br /> 分割 ＝ 分割文本 (“某某审核 - [其他 - xx小区-xx工程-xx项目 - E:/文件#1/存储/@$/工作#%【1】号.GBQ6]”, “-”, )<br /> 路径 ＝ 分割 [取数组成员数 (分割)]<br /> 路径 ＝ 文本_替换 (路径, , , , “]”, “”, , , , , , , , )<br /> 路径 ＝ 文本_删首尾空 (路径)<br /> 调试输出 (路径)<br /> rar_初始化 (, )<br /> rar_压缩 (路径, “D：/自动备份/” ＋ 文件_取文件名 (路径, 假) ＋ “-” ＋ 时间_到文本 (取现行时间 (), 1, 1, 2) ＋ “.rar”, , , , , )