|
9#
發(fā)表于 2023-12-7 13:14:23
|
只看該作者
: W, e# i D0 S+ w0 w# I, {
目的是把當前文件直接改名到"物料描述"/ x6 z1 l! ~9 x0 d- p0 g/ N, J
( v H) z$ A3 D& A
8 N! x9 m6 A+ {
這個沒辦法直接實現的,可以換個方法代替。0 D/ K, s0 i k: x' i% [4 F Q
) g8 Y( X; g9 a1 A利用新名稱另存文件,然后再在使用此文件的地方執(zhí)行替換。4 J+ Y. J" y3 p/ ~9 o9 d
# C! Z# r. S* x; d3 m. [0 c3 d' G3 Z/ q6 L5 R1 C1 F
如果這樣可行的話:, ?- o$ I7 S. ^0 N
sFileName = iProperties.Value("Custom", "物料描述") & ".ipt"8 L2 g5 l/ X9 |$ O! x
) r0 t5 n) \- C5 C7 i8 u$ @sFileDirectory = ThisDoc.WorkspacePath() & "\"% Q* L+ W* }9 }1 q% W
ThisDoc.Document.SaveAs(sFileDirectory & sFileName, True) ]( }: K% T7 ?7 E
|
|