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 d’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 le message d’erreur suivant : « Aucune URL Project Server n’a é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 les options de collaboration (menu Collaborer) à la liste des sites de confiance dans Internet Explorer. Lors de la confirmation, Project bascule en mode Feuille de ressources et affiche la boîte de dialogue *Créer une équipe pour <le nom> du projet* 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.