Question

我想在reg路径中更改源文件服务器路径位置每个客户端计算机的HKEY_CLASSES_ROOT\Installer\Products\Product GUID\SourceList\Net\1，

因为我们已经删除了现有的应用程序服务器...我们能够使用vbscript中的“替换”功能将旧的服务器路径更改为新的服务器路径。

Set objWS = CreateObject("WScript.Shell") 

strKeyValue = objWS.RegRead("HKEY_CLASSES_ROOT\Installer\Products\A7C4EB2D0BDDF2A43BDD35A498E12655\SourceList\Net\1")  

newstrKeyValue = Replace(strKeyValue,"\\INADCSRV11" ,"\\INADCSRV12")

newstrKeyValue2 = Replace (newstrKeyValue ,"SMSPKGC$" ,"SMSPKGP$")


     Const HKEY_CLASSES_ROOT = &H80000000
     strComputer = "."

     Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _ 
                                            strComputer & "\root\default:StdRegProv")

     strKeyPath = "Installer\Products\A7C4EB2D0BDDF2A43BDD35A498E12655\SourceList\Net\"
      strValueName = "1"
     strValue = newstrKeyValue2

      oReg.SetExpandedStringValue HKEY_CLASSES_ROOT,strKeyPath,strValueName,strValue

但是我们一直在阅读reg值.... 产品GUID是一个变量。首先我们必须阅读该路径，然后在阅读一个GUID之后，我们必须再次阅读完整路径 HKEY_CLASSES_ROOT\Installer\Products\Product GUID\SourceList\Net\1然后更改服务器名称

请让我知道有人遇到过这种情况。

Answer 1

假设我没有弄错，并且您想要枚举某个键中的所有子键，则来自另一个问题的this answer会显示执行此操作的代码。

用于读取注册表项及其子项的vbscript

1 个答案: