用vbs实现更改计算机的说明的代码
问: 复制代码 代码如下: ConstHKEY_LOCAL_MACHINE=&H80000002 strComputer="." SetobjRegistry=GetObject_ ("winmgmts:\\"&strComputer&"\root\default:StdRegProv") strKeyPath="System\CurrentControlSet\Services\lanmanserver\parameters" strValueName="srvcomment" strDescription="Descriptionchangedprogrammatically" objRegistry.SetStringValueHKEY_LOCAL_MACHINE,strKeyPath,strValueName,strDescription 接下来,我们为三个变量赋值: strKeyPath="System\CurrentControlSet\Services\lanmanserver\parameters" strValueName="srvcomment" strDescription="Descriptionchangedprogrammtically" 变量strKeyPath表示注册表HKEY_LOCAL_MACHINE部分内的路径;strValueName表示要更改的注册表值(srvcomment);还有strDescription,没错:strDescription表示新的计算机说明。您的观察力很敏锐。 注意:我们想要说的是,你们在这方面要比我们强得多,但我们不想让经理对此有任何了解。的确如此:对于一位Microsoft经理来说,了解情况将是最为重要的! 现在我们所要做的就是调用SetStringValue方法,同时将HKEY_LOCAL_MACHINE和我们的三个变量作为方法参数进行传递: objRegistry.SetStringValueHKEY_LOCAL_MACHINE,strKeyPath,strValueName,strDescription 像这样的脚本真的确实会使生活变得有意义,不是吗? 注意:请注意,即使是在注册表中进行此更改,新说明可能仍要在计算机重新启动后才会生效。这只不过是一个需要注意的地方。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢! |