Не могу открыть документ с пробелом в имени файла - VB
Формулировка задачи:
При открытии документа, содержащего в имени пробел, программа (во время активации) выдает ошибку 4160 и пишет: "неправильное имя файла". Вот код процедуры:
Константин
Решение задачи: «Не могу открыть документ с пробелом в имени файла»
textual
Листинг программы
<font color="blue">Private</font> <font color="blue">Function</font> ActivateWord() <font color="blue">As</font> <font color="blue">Boolean</font>
<font color="blue">On</font> <font color="blue">Error</font> <font color="blue">GoTo</font> labGetObj
<font color="blue">Set</font> WordObj = GetObject(, <font color="teal">"Word.Application"</font>)
<font color="blue">If</font> WordObj <font color="blue">Is</font> <font color="blue">Nothing</font> <font color="blue">Then</font>
ActivateWord = False
<font color="blue">Exit</font> <font color="blue">Function</font>
<font color="blue">Else</font>
ActivateWord = True
<font color="blue">Exit</font> <font color="blue">Function</font>
<font color="blue">End</font> <font color="blue">If</font>
labGetObj:
<font color="blue">Set</font> WordObj = CreateObject(<font color="teal">"Word.Application"</font>)
<font color="blue">Resume</font> <font color="blue">Next</font>
<font color="blue">End</font> <font color="blue">Function</font>