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

VBScript
VBS教程:VBScript 基础-VBScript 运算符
VBS教程:VBScript 基础-VBScript 常数
VBS教程:VBScript 基础-VBScript 变量
VBS教程:VBScript 基础-VBScript 数据类型
Wscript.Shell 对象详细介绍!!特好的东西
利用vbscript脚本修改文件内容,此适用于自动化的操作中
批量替换快捷方式目的路径的VBS脚本
VBS常用脚本 好东西
Vbscript写注册表的方法
[vbs]每一行的最后一个字符转换成_
bytes2BSTR
vbs/js脚本编程教学(1)
vbs/js脚本编程教学(2)
脚本编程3 关于文件的读写
脚本编程 4 驱动器
利用WSH里的MapNetworkDrive方法脚本蠕虫的传播方式
VBS脚本病毒原理分析与防范
ipclear.vbs源代码
whoami.vbs源代码
RCLS.vbs使用帮助

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 113 ::
收藏到网摘: 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 "驱动程序释放完毕,请在设备管理器中刷新硬件列表或重新启动电脑!"