标题: VBS可以直接对注册表进行添加吗? [打印本页]
作者: 313885174 时间: 2008-4-8 16:14 标题: VBS可以直接对注册表进行添加吗?
VBS可以直接对注册表进行添加吗?
作者: BWSkyer 时间: 2008-4-8 16:50
可以的~~~
http://www.cn-dos.net/forum/view ... 8%E5%86%8C%E8%A1%A8
作者: HAT 时间: 2008-4-9 08:08
'注册表读取
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\ccApp")
WScript.Echo MyRun
'注册表添加
MyPath="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MyTest"
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegWrite(MyPath,"C:\test.bat")
'注册表删除
MyPath="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MyTest"
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegDelete(MyPath)
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\ccApp")
WScript.Echo MyRun
'注册表添加
MyPath="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MyTest"
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegWrite(MyPath,"C:\test.bat")
'注册表删除
MyPath="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\MyTest"
Set MyReg=WScript.CreateObject("WScript.Shell")
MyRun=MyReg.RegDelete(MyPath)