Instancier l'objet qui met en place la sécurité. Pour utiliser le réseau, cet objet est nécessaire pour fournir les informations d'identification utilisateur.
Set credentials = CreateObject ("WbemScripting.SWbemLocator")
Créer les pouvoirs et les affecter à un objet de connexion.
Réglez con = credentials.ConnectServer ("ApplicationServer", "apps installannuaire", "domaine adminUsername", "myPass",, "Kerberos: ApplicationServer")
con.Security.ImpersonationLevel = wbemImpersonationLevelDelegate
Instancier la classe d'installation. Réglez l'appel installer à une variable d'erreur. La variable d'erreur vous avertit de toutes les installations qui ont échoué sur le réseau.
Set inst = con.Get ("Win32_Product")
MyErr = inst.Install ("\ Serveur installe myInstall.msi",, True)
Enregistrez ce fichier avec une extension .vbs. Placez ce fichier dans le client "Commencez" dossier sur le disque dur. Vous pouvez également pousser ces fichiers à l'aide de scripts de connexion sur le serveur.