Partager via


Méthode Project.MakeServerURLTrusted (Project)

Ajoute l’URL spécifiée dans la propriété ServerURL à la zone Sites de confiance sous l’onglet Sécurité de la boîte de dialogue Options Internet dans Internet Explorer.

Syntaxe

expression. MakeServerURLTrusted

Expression Variable qui représente un objet Project .

Remarques

Si aucune URL Project Server n’est spécifiée pour le projet, Project Professionnel affiche un message d’erreur indiquant : « Une URL Project Server n’a pas été spécifiée. Spécifiez une URL de serveur Project Server dans l’onglet Collaborer de la boîte de dialogue Options (menu Outils).

Exemple

L’exemple suivant ajoute l’URL spécifiée dans Options de collaboration (menu Collaborer ) à la liste des sites approuvés dans Internet Explorer. Après confirmation, Project bascule vers un affichage Feuille de ressources et affiche la boîte de dialogue *Build Team for <Project Name>* lorsqu’il est connecté à 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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.