Подключение к серверу проекта при открытии MS Project
У меня есть VBScript, который проверяет, если MS Project открыт. Если он уже открыт, он запускает макрос, если нет, он должен открыть Project, а затем запустить макрос. Работает нормально, если проект уже открыт. Если проект не открыт, скрипт успешно открывается и запускает макрос, но завершается неудачей на полпути. В основном это не удается, потому что вызываемый макрос открывает файлы с сервера проекта. даже если для моей учетной записи по умолчанию задан URL-адрес сервера Project, а для параметра «при запуске» установлено значение «выбрать мою учетную запись по умолчанию», это все равно не удается.
VBScript, чтобы открыть и запустить макрос:
dim pjApp
on error resume next
set pjApp = GetObject(, "MSProject.Application")
if err.Number = 0 then
pjApp.Visible = True
pjApp.macro "testsave"
else
Set pjApp = CreateObject("MSProject.Application")
pjApp.Visible = True
pjApp.macro "testsave"
end if
Set pjApp = Nothing
Есть ли способ заставить его подключиться к сайту сервера проекта при открытии Project?