這篇文章主要介紹了vbscript如何書寫注冊表腳本，具有一定借鑒價值，感興趣的朋友可以參考下，希望大家閱讀完這篇文章之后大有收獲，下面讓小編帶著大家一起了解一下。

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領域值得信任、有價值的長期合作伙伴，公司提供的服務項目有：主機域名、網絡空間、營銷軟件、網站建設、前進網站維護、網站推廣。

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"
'===============================================================================
'創(chuàng)建項的位置
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
'啟動創(chuàng)建項目的類型
'=====================================1'REG_SZ 字符串值==========================================
strValueName = "SysExplr"
'創(chuàng)建字符串的名稱
strValue = "d:\\Herosoft\\HeroV8\\SYSEXPLR.EXE"
'創(chuàng)建字符串的數據
oReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
'所創(chuàng)建的類型字符串
'=====================================2.REG_DWORD DWORD值===========================================
strValueName = "DWORD Value Name"
'創(chuàng)建DWORD名稱
dwValue = 82
'創(chuàng)建DWORD數據
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,dwValue
'所創(chuàng)建類型DWORD
'=======================================3.REG_EXPAND_SZ 可擴充字符串值=========================================
strValueName = "Expanded String Value Name"
'創(chuàng)建擴充字符串名稱
strValue = "%PATHEXT%"
'字符串數據
oReg.SetExpandedStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
'所創(chuàng)建類型為擴充字符串
'========================================4.REG_MULTI_SZ 多字符串值=========================================
strValueName = "Multi String Value Name"
'創(chuàng)建多字符串名稱
arrStringValues = Array("first string", "second string","third string", "fourth string")
'創(chuàng)建多字符串值
oReg.SetMultiStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,arrStringValues
'所創(chuàng)建類型為多字符串值
'======================================================================================
oReg.DeleteKey HKEY_LOCAL_MACHINE, strKeyPath

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

感謝你能夠認真閱讀完這篇文章，希望小編分享的“vbscript如何書寫注冊表腳本”這篇文章對大家有幫助，同時也希望大家多多支持創(chuàng)新互聯(lián)網站建設公司，，關注創(chuàng)新互聯(lián)行業(yè)資訊頻道，更多相關知識等著你來學習!

文章標題：vbscript如何書寫注冊表腳本-創(chuàng)新互聯(lián)
地址分享：http://weahome.cn/article/ddijoh.html