Доступ к Sharepoint из Project Professional 2007 с использованием VBA

Question

У меня есть много Microsoft Project Server, и я написал Руководство по проекту, которое я хотел бы использовать для каждого из них. Поскольку я хочу, чтобы пользователи только одного сервера имели доступ только к своему серверу, а не другие, мне нужно хранить Руководство по проекту на SharePoint каждого сервера. В Project Professional 2003 есть способ узнать URL-адрес в VBA (возможно, объект) на своем собственном сервере, на котором он установлен.

Это пример того, что я пытаюсь сделать:

Sub Currently()
  OptionsInterfaceEx ProjectGuideContent:="https://example.com/SERVER_NAME/Shared%20Documents/Project%20Guide/xmlschemas.xml"
End Sub

Sub What_I_Would_Like()
  OptionsInterfaceEx ProjectGuideContent:=Application.ServerAddress & "Shared%20Documents/Project%20Guide/xmlschemas.xml"
End Sub

Я делаю это, поэтому мне не нужно редактировать URL для каждого имеющегося у нас сервера.

Любые вопросы, пожалуйста, задавайте,

Andrew

Answer 1

Подход, который мы использовали для решения аналогичной проблемы, заключался в том, чтобы реализовать простое "кто я?"веб-сервис, который вы размещаете на данном сервере.Из прочтения StackOverflow выглядит, как будто можно делать вызовы веб-сервисов из VBA.Веб-служба просто возвращает IP-адрес или имя хоста, с которого поступает запрос, и вы используете его для создания своего URL.