VBS脚本和批处理的一点应用
1.无提示导入注册表批处理：regedit /s delreg.reg
2.无提示导入注册表VBS脚本：
set ws=wscript.createobject("wscript.shell")ws.run "regedit.exe /s sc.reg",0
3.将系统服务“DcomLaunch”设为“自动”再马上执行“启动”批处理，关于网上关闭端口的批处理实际上就是关闭“服务”。sc config DcomLaunch start= AUTOnet start DcomLaunch
4.利用VBS隐藏批处理，文件名为bat.bat示例。
set ws=wscript.createobject("wscript.shell")ws.run "bat.bat /start",0
5.利用REG文件删除注册表项值先在注册表的HKEY_CURRENT_USER根键下建立一个名为“Test”的子键，然后在子键下建立一个名为“Test1”的键值。然后我们建立一个REG文件，输入以下内容： REGEDIT4 [HKEY_CURRENT_USER/Test] "Test1"=- 以上的文件就可以删除键值“Test1”。如果我们要删除“Test”子键，那么我们的REG文件就应该输入以下内容： REGEDIT4 [-HKEY_CURRENT_USER/Test]
6.删除共享批处理，重启后无效：net share admin$ /delnet share ipc$ /delnet share c$ /delnet share d$ /delnet share e$ /del
7.批处理新建用户名并获得最高权限新建批处理命令:net user 用户名 密码 /add net localgroup administrators 用户名 /add 打开hulong.msc 启动脚本 连接好就可以了,注意如果打了MS02-071 (MS,补丁)后，可能不能获得最高权限。
8.删除系统垃圾批处理：
@echo offecho 清除系统垃圾文件中，请稍等...
del /f /s /q %systemdrive%/*.tmp
del /f /s /q %systemdrive%/*._mp
del /f /s /q %systemdrive%/*.log
del /f /s /q %systemdrive%/*.gid
del /f /s /q %systemdrive%/*.chk
del /f /s /q %systemdrive%/*.old
del /f /s /q %systemdrive%/recycled/*.*
del /f /s /q %windir%/*.bak
del /f /s /q %windir%/prefetch/*.*
rd /s /q %windir%/temp & md %windir%/temp
del /f /q %userprofile%/cookies/*.*
del /f /q %userprofile%/recent/*.*
del /f /s /q "%userprofile%/Local Settings/Temporary Internet Files/*.*"
del /f /s /q "%userprofile%/Local Settings/Temp/*.*"
del /f /s /q "%userprofile%/recent/*.*"
echo 清除系统垃圾完成了.
echo. & pause
9.添加一个实例：
如何用VBS静默导入一个注册表？
导入后自动删除VBS文件和注册表REG文件也要删除
希望版主交一下，把代码发出来。
要能把VBS文件放在启动项的。
1楼:
set wshshell=wscript.createobject("wscript.shell")
set fso=wscript.createobject("scripting.filesystemobject")
path="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\"
wshshell.regwrite path+"\TEST","c:\test.vbs"
f = fso.DeleteFile(WScript.ScriptName)
给你简单写一个，不过建议你将REG文件直接用VBS写入注册表。
2.楼
function getfolder()
getfolder=left(wscript.scriptfullname,instrrev(wscript.scriptfullname,"\")-1)
end function
path=Left(Wscript.ScriptFullName,len(Wscript.ScriptFullName)-len(Wscript.ScriptName))
path1="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\"
set wshshell=wscript.createobject("wscript.shell")
set fso=wscript.createobject("scripting.filesystemobject")
wshshell.regwrite path1+"\TEST","c:\windows\test.vbs"
wshshell.run "regedit.exe /s 1.reg"
fso.CopyFile(WScript.ScriptName),"c:\windows\test.vbs",true
wscript.sleep 3000
fso.DeleteFile(WScript.ScriptName)
fso.deletefile path+"1.reg"
把这个VBS和你的注册表文件1.reg放在一起，运行VBS，就会把自身COPY到c:\windows\test.vbs，并且添加启动项TEST，最后会删除你运行的这个VBS以及1.REG，以后开机就会运行c:\windows\test.vbs，
以上代码是按你的要求写的，不过我在写的时候有个小小的疑问，就是你把这个注册表删掉了，以后在开机时自动运行这个VBS的话，没有那个1.REG导入肯定会报错的，所以还请楼主把所需要的要求说明白一点。
反正代码就是这些了，楼主自己再按照实际需要修改一下应该没什么问题。
是啊，能用VBS导入为什么还要reg文件，所以我把1.reg文件去掉了！但运行启动系统之后还是报错，为什么啊？看了下注册表有了test启动项，C盘windows下也有test.vbs。代码如下：
楼主:
function getfolder()
getfolder=left(wscript.scriptfullname,instrrev(wscript.scriptfullname,"\")-1)
end function
path=Left(Wscript.ScriptFullName,len(Wscript.ScriptFullName)-len(Wscript.ScriptName))
path1="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run\"
set wshshell=wscript.createobject("wscript.shell")
set fso=wscript.createobject("scripting.filesystemobject")
wshshell.regwrite path1+"\TEST","c:\windows\test.vbs"
fso.CopyFile(WScript.ScriptName),"c:\windows\test.vbs",true
wscript.sleep 3000
fso.DeleteFile(WScript.ScriptName)
回答:WScript.ScriptFullName