windows – 获取远程服务器环境变量
发布时间:2020-12-14 02:08:49 所属栏目:Windows 来源:网络整理
导读:问题:我们的Cobol应用程序运行在我们网络上的许多服务器(主要是服务器2003)上.许多(如果不是全部)这些应用程序使用环境变量进行设置. 问题:从一个工作站,您可以从远程已知服务器列表中收集环境变量的完整列表吗?最好我想在Batch,VBS或Powershell中这样做.
问题:我们的Cobol应用程序运行在我们网络上的许多服务器(主要是服务器2003)上.许多(如果不是全部)这些应用程序使用环境变量进行设置.
问题:从一个工作站,您可以从远程已知服务器列表中收集环境变量的完整列表吗?最好我想在Batch,VBS或Powershell中这样做. 答案:在VBS中 GetEnvironment("[RemoteServersName]") Function GetEnvironment(ServerName) strComputer = ServerName Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator") Set objSWbemServices = objSWbemLocator.ConnectServer _ (strComputer,"rootcimv2","[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 解决方法
没有试过,但你可以检查
this.示例是vbscript,将strComputer更改为您的遥控器的IP地址,看看它是如何进行的.对于许多远程主机,请使用for循环.
(编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |