Заменить & ldquo;. & Rdquo; с & ldquo; _ & rdquo; кроме расширения с VBScript

Не изменяйте списки, которые вы итерируете!

Вместо этого сделайте что-то вроде:

for square in squares[:]:

, чтобы вы повторяли копию списка, пока все еще изменяя оригинал.

0
задан Ansgar Wiechers 25 February 2019 в 16:16
поделиться

1 ответ

Замените точки только базовым именем файла, а не полным именем, затем добавьте расширение и переименуйте.

sName = Replace(fso.GetBaseName(fil.Name), ".", "_")
fil.Name = sName & "." & fso.GetExtensionName(fil.Name)
0
ответ дан Ansgar Wiechers 25 February 2019 в 16:16
поделиться
Другие вопросы по тегам:

Похожие вопросы: