windows 获取远程服务器环境变量

Get remote servers environment variables

提问by Random Developer

The problem:We have Cobol applications that run from many servers (mostly server 2003) on our network. Many if not all of these applications use environment variables for there setting.

问题：我们有从网络上的许多服务器（主要是服务器 2003）运行的 Cobol 应用程序。许多（如果不是全部）这些应用程序都使用环境变量进行设置。

The Question:From one workstation can you gather the full list of environment variables from a list of known servers remote? Optimally i would like to do this in Batch, VBS, or the Powershell.

问题：您能否从一台工作站收集来自远程已知服务器列表的完整环境变量列表？最理想的是，我想在 Batch、VBS 或 Powershell 中执行此操作。

The Answer:In VBS

答案：在 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

采纳答案by ghostdog74

Have not tried it, but you can check thisout. the examples is vbscript, change strComputer to the IP address of your remote and see how it goes. For many remote hosts, use a for loop.

没试过，但你可以看看这个。示例是 vbscript，将 strComputer 更改为远程的 IP 地址，然后看看它是如何进行的。对于许多远程主机，请使用 for 循环。

回答by Miguel

Here is the powershell command:

这是powershell命令：

gwmi win32_environment -computername dc1.acme.com

And if you want a condensed version:

如果你想要一个精简版：

gwmi win32_environment -computername dc1.acme.com |select name,variablevalue |ft -auto