Método Project.MakeServerURLTrusted (Project)

Adiciona a URL especificada na propriedade ServerURL à zona sites confiáveis na guia segurança da caixa de diálogo Opções da Internet no Internet Explorer.

Sintaxe

expression. MakeServerURLTrusted

Expressão Uma variável que representa um objeto Project .

Comentários

Se nenhum URL do Project Server for especificado para o projeto, o Project Professional exibe a mensagem de erro: "URL do Project Server não foi especificado. Para especificar uma URL, no menu Ferramentas, clique em Opções e, em seguida, clique na guia colaboração."

Exemplo

O exemplo a seguir adiciona a URL especificada em Opções de Colaboração (menu Colaborar ) à lista de sites confiáveis no Internet Explorer. Após a confirmação, o Project alterna para uma exibição da Folha de Recursos e exibe a caixa de diálogo *Build Team for <Project Name>* quando conectado ao Project Server .

Sub MakeURLTrusted() 
   If Projects.Count = 0 Then 
      MsgBox "You must have at least one active project open." 
      Exit Sub 
   End If 
 
   If ActiveProject.ServerURL = "" Then 
      MsgBox "A Project Server URL has not been " _ 
         & "specified." & Chr(13) & "Click OK, and then " _
         & "specify a valid URL in the Project Server Accounts dialog box." 
   Else 
      ActiveProject.MakeServerURLTrusted 
      ViewApply Name:="Resource Sheet" 
      Application.AddResourcesFromProjectServer 
   End If 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.