亲宝软件园·资讯

展开

vbscript 注册表 vbscript 注册表脚本书写

人气:0
想了解vbscript 注册表脚本书写的相关内容吗,在本文为您仔细讲解vbscript 注册表的相关知识和一些Code实例,欢迎阅读和指正,我们先划重点:vbscript,注册表,下面大家一起来学习吧。
WScript.Echo "Enabling Kerberos Logging..."
const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set StdOut = WScript.StdOut
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_ 
strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
'===============================================================================
'创建项的位置
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
'启动创建项目的类型
'=====================================1'REG_SZ 字符串值==========================================
strValueName = "SysExplr"
'创建字符串的名称
strValue = "d:\\Herosoft\\HeroV8\\SYSEXPLR.EXE"
'创建字符串的数据
oReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
'所创建的类型字符串
'=====================================2.REG_DWORD DWORD值===========================================
strValueName = "DWORD Value Name"
'创建DWORD名称
dwValue = 82
'创建DWORD数据
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
'所创建类型DWORD
'=======================================3.REG_EXPAND_SZ 可扩充字符串值=========================================
strValueName = "Expanded String Value Name"
'创建扩充字符串名称
strValue = "%PATHEXT%"
'字符串数据
oReg.SetExpandedStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
'所创建类型为扩充字符串
'========================================4.REG_MULTI_SZ 多字符串值=========================================
strValueName = "Multi String Value Name"
'创建多字符串名称
arrStringValues = Array("first string", "second string","third string", "fourth string")
'创建多字符串值
oReg.SetMultiStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,arrStringValues
'所创建类型为多字符串值
'======================================================================================
oReg.DeleteKey HKEY_LOCAL_MACHINE, strKeyPath

strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Run"
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
WScript.Echo "-=[Complete!]=-"

加载全部内容

相关教程
猜你喜欢
用户评论