当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > vbs之自动安装驱动程序

VBScript
查看SQL状态的vbs
vbs 字符统计功能模块
重新安装ie的一个vbs
中文姓名笔画计算(VBS脚本版)
VBS 数字转英文代码
清除垃圾的VBS文件 自动查找多个盘
math.vbs 自然数n的n次方的的和或积的级数
encrypt.vbs 内容加密vbs实现代码
一段病毒常用的VBS代码
VBS相册生成脚本[
VBS教程:运算符-连接运算符 (&)
黑客必须要知道的几个vbs文件代码
用vbs实现虚拟主机和域名查循的脚本
reg2vbs.vbs 将Reg文件转换为VBS文件保存 IT学习网修正版本
vbscript语句中“&H”专用于16进制数表示
按键精灵 脚本-学习VBS的一个不错的教程
reg2vbs.vbs 将Reg文件转换为VBS文件保存修正版本
一个可以删除指定天数文件的vbs脚本
CreateWeb.vbs 代码
N年前的两个脚本%5c暴库

VBScript 中的 vbs之自动安装驱动程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 95 ::
收藏到网摘: n/a

其实,很简单,只要将这些驱动程序的inf文件所在的文件夹注册到注册表中。
比如:
我们把自己电脑上的驱动程序,通过 驱动精灵 之类的软件从系统中分离出来以后,如果想在下一次安装系统的时候,自动安装这些驱动程序。我们可以把这些分离出来的驱动程序对应的文件夹写入注册表,然后重新启动电脑,电脑会自动搜索硬件并安装驱动程序。这是不是很爽?这里我使用winrar+vbs实现。
比如我们现在有如下几个驱动程序及其inf文件对应的文件夹:
主板------maincard
显示卡---vga
声卡------sound
将maincard、vga、sound文件夹 一起压缩到一个可执行文件中,并设置为无交互界面/自解压路径为c:\device
压缩文件取名为d.exe 然后编辑如下内容的vbs脚本device.vbs
-----------------------------------------------------------
ON ERROR RESUME NEXT
SET OS=CreateObject("wscript.shell")
Set filesystem=CreateObject("scripting.filesystemobject")
pathy=filesystem.GetFile(WScript.scriptFullName).ParentFolder
path1="c:\drivers\"
yn=msgbox("-------------->"&chr(10)& _
path1,1,"释放驱动程序")
if yn=2 then wscript.quit
device1=os.regread("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\DevicePath")
device2= _
path1&"and" &_
";"&path1&"maincard" &_
";"&path1&"sound" &_
";"&path1&"vga" &_
";"&device1
os.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\DevicePath",device2
os.run pathy & "\d.exe /s",1,true
msgbox "驱动程序释放完毕,请在设备管理器中刷新硬件列表或重新启动电脑!"