Le problème: Nous avons des applications Cobol qui s'exécutent à partir de nombreux serveurs (principalement le serveur 2003) sur notre réseau. Beaucoup sinon toutes ces applications utilisent des variables d'environnement pour le réglage.Obtenir les variables d'environnement des serveurs distants
La question: D'un poste de travail pouvez-vous rassembler la liste complète des variables d'environnement à partir d'une liste de serveurs connus à distance? Idéalement, je voudrais le faire dans Batch, VBS ou Powershell.
La réponse: VBS
GetEnvironment("[RemoteServersName]")
Function GetEnvironment(ServerName)
strComputer = ServerName
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer _
(strComputer, "root\cimv2", "[ValidLogonName]", "[PasswordForLogonName]")
objSWbemServices.Security_.ImpersonationLevel = 3
Set colVar = objSWbemServices.ExecQuery(_
"Select * from Win32_Environment")
For Each objVar in colVar
WScript.StdOut.Write("Server Name: " & ServerName & VBNewLine)
WScript.StdOut.Write("Description: " & objVar.Description & VBNewLine)
WScript.StdOut.Write("Name: " & objVar.Name & VBNewLine)
WScript.StdOut.Write("System Variable: " & objVar.SystemVariable & VBNewLine)
WScript.StdOut.Write("User Name: " & objVar.UserName & VBNewLine)
WScript.StdOut.Write("Variable Value: " & objVar.VariableValue & VBNewLine & VBNewLine)
Next
End Function
avait cette page ainsi http://msdn.microsoft.com/en- us/library/aa389290 (VS.85) .aspx mais merci! –
bon à savoir. :) – ghostdog74