|
发表于 2023-12-7 13:14:23
|
显示全部楼层
& J2 \9 m, y9 z
目的是把当前文件直接改名到"物料描述"
7 ?# X7 f3 O9 h$ U* K8 v* n g/ c" k9 V8 K( C5 i; q
/ z, }& c$ K+ U! u. r这个没办法直接实现的,可以换个方法代替。& x: l C+ _4 G, o
8 F- G% }% k7 W
利用新名称另存文件,然后再在使用此文件的地方执行替换。/ x) e) R6 `; D1 q
3 T' m. e8 _. R S# a/ C( b
* o7 v5 K& m5 }9 `, J" q( f
如果这样可行的话:
3 E C3 \" K; z, Q; q+ k& a' zsFileName = iProperties.Value("Custom", "物料描述") & ".ipt"
1 _8 }. Z# d) ~$ H" ~; L5 Q5 r$ c# d3 s- T9 I9 p3 @1 ~* ?2 B4 `
sFileDirectory = ThisDoc.WorkspacePath() & "\"# a' J4 [# d# G4 u2 L9 j! `, j/ i
ThisDoc.Document.SaveAs(sFileDirectory & sFileName, True)% G+ M7 R2 x. H* N- }
|
|