Доступ к Sharepoint из Project Professional 2007 с помощью VBA

У меня много серверов Microsoft Project, и я написал руководство по проекту, которое хочу использовать на каждом из них. Поскольку я хочу, чтобы пользователи определенного сервера имели доступ только к своему серверу, а не к другим, мне нужно хранить руководство по проекту в 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 для каждого сервера, который у нас есть.

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

Андрей


person Andrew    schedule 13.01.2011    source источник


Ответы (1)


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

person Jon Iles    schedule 01.07.2011