StdRegProv类所属方法的使用(之五)

最新推荐文章于 2022-07-22 17:53:47 发布
最新推荐文章于 2022-07-22 17:53:47 发布
阅读量810 收藏
点赞数
分类专栏： Silverlight 文章标签： string vbscript windows

（10）        SetDWordValue
为指定键值名称的键值设置键值类型为REG_DWORD的键值数值。

uint32 SetDWORDValue(
  [in]  uint32 hDefKey = 2147483650,
  [in]  string sSubKeyName,
  [in]  string sValueName,
  [in]  uint32 uValue
);

例1：为键值名称为DWordValue的键值赋予类型为REG_DWORD的键值数值11（0x0000000b）。该键值属于HKEY_LOCAL_MACHINE\SOFTWARE\MyCompany子键。本例中该值被设置为一个十进制整数，但可以使用任何能被VBScript识别的其他类型的基数（如16进制数）。

Const HKEY_LOCAL_MACHINE = &H80000002
strComputer        = "."
sMethod                = "SetDWordValue"

Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                strComputer & "/root/default:StdRegProv")

Set oMethod        = oRegistry.Methods_(sMethod)
Set oInParam        = oMethod.inParameters.SpawnInstance_()

oInParam.hDefKey = HKEY_LOCAL_MACHINE
oInParam.sSubKeyName = "SOFTWARE\MyCompany"
oInParam.sValueName = "DWordValue"
oInParam.uValue = 11

Set oOutParam = oRegistry.ExecMethod_(sMethod, oInParam)
If (oOutParam.ReturnValue = 0) And (Err.Number = 0) Then
    Wscript.Echo "DWord value added successfully"
Else
    Wscript.Echo "An error occurred"
End If


例2：本例直接调用SetDWordValue。
Const HKEY_LOCAL_MACHINE = &H80000002
sComputer        = "."
Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                sComputer & "/root/default:StdRegProv")

hDefKey                = HKEY_LOCAL_MACHINE
sSubKeyName        = "SOFTWARE\MyCompany"
sValueName        = "DWordValue"
uValue                = 11

oOutParam = oRegistry.SetDWordValue(hDefKey, sSubKeyName, sValueName, uValue)
If (oOutParam = 0) And (Err.Number = 0) Then
    Wscript.Echo "DWord value added successfully"
Else
    Wscript.Echo "An error occurred"
End If


例3：相应的PS程序。
$HKEY_LOCAL_MACHINE = "&H80000002"
$computer = "."
$namespace = "root\default"

$oRegistry = get-wmiobject -list -namespace $namespace -ComputerName $computer | where-object { $_.name -eq "StdRegProv" }

$hDefKey = $HKEY_LOCAL_MACHINE
$sSubKeyName = "SOFTWARE\MyCompany"
$sValueName = "DWordValue"
$uValue = 11

$oOutParam = $oRegistry.SetDWordValue($hDefKey, $sSubKeyName, $sValueName, $uValue)
"Retrun Colde is : " + $oOutParam.ReturnValue


（11）        SetExpandedStringValue
为指定键值名称的键值设置键值类型为REG_EXPAND_SZ的键值数值
uint32 SetExpandedStringValue(
  [in, optional]  uint32 hDefKey = 2147483650,
  [in]            string sSubKeyName,
  [in]            string sValueName,
  [in]            string sValue
);

例1：为键值名称为ExpandedStringValue的键值赋予类型为REG_EXPAND_SZ的键值数据“%SystemRoot%\MyCompany”该键值属于HKEY_LOCAL_MACHINE\SOFTWARE\MyCompany子键。
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer        = "."
sMethod                = "SetExpandedStringValue"

Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                strComputer & "/root/default:StdRegProv")

Set oMethod        = oRegistry.Methods_(sMethod)
Set oInParam        = oMethod.inParameters.SpawnInstance_()
oInParam.hDefKey = HKEY_LOCAL_MACHINE
oInParam.sSubKeyName = "SOFTWARE\MyCompany"
oInParam.sValueName = "ExpandedStringValue"
oInParam.sValue = "%SystemRoot%\MyCompany"

Set oOutParam = oRegistry.ExecMethod_(sMethod, oInParam)

If (oOutParam.ReturnValue = 0) And (Err.Number = 0) Then
    Wscript.Echo "Expanded String value added successfully"
Else
    Wscript.Echo "An error occurred"
End If

例2：本例直接调用SetExpandedStringValue。
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer        = "."

Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                strComputer & "/root/default:StdRegProv")

hDefKey = HKEY_LOCAL_MACHINE
sSubKeyName = "SOFTWARE\MyCompany"
sValueName = "ExpandedStringValue"
sValue = "%SystemRoot%\MyCompany"

oOutParam = oRegistry.SetExpandedStringValue(hDefKey,sSubKeyName, _
sValueName,sValue)
WScript.Echo "The return code is : " & oOutParam


例3：相应的PS程序
$HKEY_LOCAL_MACHINE = "&H80000002"
$computer = "."
$namespace = "root\default"

$oRegistry = get-wmiobject -list -namespace $namespace -ComputerName $computer | where-object { $_.name -eq "StdRegProv" }

$hDefKey = $HKEY_LOCAL_MACHINE
$sSubKeyName = "SOFTWARE\MyCompany"
$sValueName = "ExpandedStringValue"
$sValue = "%SystemRoot%\MyCompany"

$oOutParam = $oRegistry.SetExpandedStringValue($hDefKey, $sSubKeyName, $sValueName, $sValue)
"Retrun Colde is : " + $oOutParam.ReturnValue


（12）        SetMultiStringValue
为指定键值名称的键值设置键值类型为REG_MULTI_SZ的键值数值，该数值是一个多个字符串的数组。注意，在Windows 2000上如果使用REGEDT32命令来查看，每个字符串将以单行显示；如果使用REGEDIT来查看，将显示一个连续的字符串。
uint32 SetMultiStringValue(
  [in]  uint32 hDefKey = 2147483650,
  [in]  string sSubKeyName,
  [in]  string sValueName,
  [in]  Variant sValue[]
);

例1：为键值名称为MultiStringValue的键值赋予类型为REG_MULTI_SZ的键值数据（"www","swynk","com" ），该键值数据是一个由多个字符串组成的数组，该键值属于HKEY_LOCAL_MACHINE\SOFTWARE\MyCompany子键。
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer        = "."
sMethod                = "SetMultiStringValue"

Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                strComputer & "/root/default:StdRegProv")

Set oMethod        = oRegistry.Methods_(sMethod)
Set oInParam        = oMethod.inParameters.SpawnInstance_()
oInParam.hDefKey = HKEY_LOCAL_MACHINE
oInParam.sSubKeyName = "SOFTWARE\MyCompany"
oInParam.sValueName = "MultiStringValue"
oInParam.sValue = Array("www","swynk","com")

Set oOutParam = oRegistry.ExecMethod_(sMethod, oInParam)
If (oOutParam.ReturnValue = 0) And (Err.Number = 0) Then
    Wscript.Echo "MultiString value added successfully"
Else
    Wscript.Echo "An error occurred"
End If


例2：本例直接调用SetMultiStringValue。
Const HKEY_LOCAL_MACHINE = &H80000002
sComputer        = "."

hDefKey                = HKEY_LOCAL_MACHINE
sSubKeyName                = "SOFTWARE\MyCompany"
sValueName        = "MultiStringValue"
sValue                = Array("www","swynk","com")

Set oRegistry        = GetObject("winmgmts:{impersonationLevel=impersonate}//" & _
                sComputer & "/root/default:StdRegProv")

oOutParam = oRegistry.SetMultiStringValue(hDefKey,sSubKeyName,sValueName,sValue)
WScript.Echo "The return code is : " & oOutParam


例3：相应的PS程序。
$HKEY_LOCAL_MACHINE = "&H80000002"
$computer = "."
$namespace = "root\default"

$oRegistry = get-wmiobject -list -namespace $namespace -ComputerName $computer | where-object { $_.name -eq "StdRegProv" }

$hDefKey = $HKEY_LOCAL_MACHINE
$sSubKeyName = "SOFTWARE\MyCompany"
$sValueName = "MultiStringValue"
$sValue        = ("www","swynk","com")

$oOutParam = $oRegistry.SetMultiStringValue($hDefKey, $sSubKeyName, $sValueName, $sValue)
"Retrun Colde is : " + $oOutParam.ReturnValue

 

本文转载自 http://bbs.winos.cn/viewthread.php?tid=71078

leixf2016
关注
专栏目录
StdRegProv类所属方法的使用(之二)
leixf
08-15 1165
（02）        EnumValues 列举给定子键的键值名称和键值类型。如果没有改变过，总是返回子键的默认键值，如果数据是空则返回空串("")。 uint32 EnumValues( [in, optional] uint32 hDefKey = 2147483
转：StdRegProv类所属方法的使用
demonzsmj12315的博客
06-25 230
在root\default命名空间中的StdRegProv类（标准注册表提供程序）提供了下面16种方法，我们将陆续介绍这些方法的使用规则，并给出分别用WBscript和Powershell编写的例子。GetBinaryValue – 读取BINARY 类型的键值数据GetDWORDValue – 读取DWORD 类型的键值数据GetExpandedStringValue – 读取...
StdRegProv
Burgess_Liu的专栏
03-21 1310
The StdRegProv class contains methods that manipulate system registry keys and values. To check all the methods that are available from the class StdRegProv: $Reg = [WMIClass]"root\default:stdRegPro
WMI 注册表 StdRegProv
weixin_33836223的博客
05-26 255
StdRegProv 是 WMI 的名称空间 root\DEFAULT 中的一个子类，有16个方法。 　　StdRegProv 类包含与系统注册表有关的方法。可用这些方法来: 　　验证用户的访问权 　　创建、枚举、和删除注册表项 　　创建、枚举、和删除键值 　　读取、修改、和删除数据 参数 　　各方法都有的参数 hDefKey 　　指定含有 sSubKeyN...
stdregprov write
最新发布
05-27
"stdregprov" is a WMI (Windows Management Instrumentation) class that allows you to access and manipulate the Windows Registry using WMI. The "write" method of the "stdregprov" class is used to create...
VBS读取注册表的两种方法
09-05
在读取注册表方面，可以使用WMI中的StdRegProv类的EnumKey方法。以下是使用WMI读取注册表的示例代码： ```vbscript Const HKLM = &H*** strPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Desktop\...
StdRegProv类所属方法的使用(之一)
leixf
08-15 1949
在root\default命名空间中的StdRegProv类（标准注册表提供程序）提供了下面16种方法，我们将陆续介绍这些方法的使用规则，并给出分别用WBscript和Powershell编写的例子。 GetBinaryValue – 读取BINARY 类型的键值数据
StdRegProv类所属方法的使用(之三)
leixf
08-15 1193
（04）        GetBinaryValue 返回键值类型为REG_BINARY的指定键值名称的键值数值。         uint32 GetBinaryValue(   [in, optional]  uint32 hDefKey = 2147483650,
StdRegProv类所属方法的使用(之六)
leixf
08-15 1199
13）        SetStringValue 为指定键值名称的键值设置键值类型为REG_SZ的键值数值。这种方法是最简单最常用的方法。 uint32 SetStringValue(   [in]  uint32 hDefKey = 2147483650,   [
StdRegProv类所属方法的使用(之四)
leixf
08-15 886
（07）        GetMultiStringValue 返回键值类型为REG_MULTI_SZ的指定键值名称的键值数值 uint32 GetMultiStringValue(   [in, optional]  uint32 hDefKey = 2147483650
利用GetObject("WinMgmts:")获取系统信息
编程资料大全
10-10 273
用WMI对象列出系统所有进程:----Instance.vbs---- 程序代码 DimWMI,objsSetWMI=GetObject("WinMgmts:")Setobjs=WMI.InstancesOf("Win32_Process")ForEachobjInobjsEnum1=Enum1+obj.Description+Chr(13)+Chr(10)NextmsgboxEnum1 ...
WMI 中 root/DEFAULT/StdRegProv 的使用例程
z_wenqian的专栏
04-28 2035
StdRegProv的读写注册表时的使用方法。(纯粹自己看自己用)
XTU 1055 整数分类
m0_69729778的博客
07-22 608
XTU OJ
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值