[CDR X5-X8] Не выводит имя открытого документа

[NemoSUN]

Пишу скрипт в Кореле (X6, 64bit):
Sub DocName()
MsgBox ActiveDocument.Name
End Sub

В окошке выводит Untitled-1, хотя у меня открыт документ с другим именем.

Пробую так:
Sub DocName()
MsgBox CreateObject("Scripting.FileSystemObject").GetBaseName(ActiveDocument.Name)
End Sub

Всё равно выводит Untitled

 

[_MBK_]

Пишу скрипт в Кореле

Макрос

В окошке выводит Untitled-1, хотя у меня открыт документ с другим именем.

Очень странно. Сейчас проверил, у меня все работает правильно. Какое имя выводит? Документ точно активен?

Пробую так:

Это совсем дичь

 

[NemoSUN]

Всё заработало. Оказывается, что имя не бралось, потому что кореловский файл лежал в папке "D:\!!! Distr\Temp". Как только файл оттуда перенёс в другой директорий сразу всё заработало. Что за ерунда непонимаю.

 

[_MBK_]

Чертовски странно, я повторить данный баг не могу

 

[NemoSUN]

Оказывается сама программа правильно отрабатывает. Просто когда я переношу файл в "D:\!!! Distr\Temp" название файла начинает показыватся как Untitled-1 вне зависимости от названия файла. Ну собссно вопрос выяснен. Теперь буду разбираться с данным каталогом.

 

[_MBK_]

Теперь буду разбираться с данным каталогом.

Ну видимо именно с вашим каталогом что-то не так, потому что, как видите, на моем компьютере этот путь отрабатывает нормально

 

[NemoSUN]

Ну видимо именно с вашим каталогом что-то не так, потому что, как видите, на моем компьютере этот путь отрабатывает нормально

Спасибо ОГРОМНОЕ за оперативность и желание помочь начинающему прогписателю )

 

[_MBK_]

Спасибо ОГРОМНОЕ за оперативность и желание помочь начинающему прогписателю )

Советы и рекомендации новичкам на форуме