vbs之自动安装驱动程序
(编辑:jimmy 日期: 2024/12/23 浏览:3 次 )
其实,很简单,只要将这些驱动程序的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 "驱动程序释放完毕,请在设备管理器中刷新硬件列表或重新启动电脑!"
比如:
我们把自己电脑上的驱动程序,通过 驱动精灵 之类的软件从系统中分离出来以后,如果想在下一次安装系统的时候,自动安装这些驱动程序。我们可以把这些分离出来的驱动程序对应的文件夹写入注册表,然后重新启动电脑,电脑会自动搜索硬件并安装驱动程序。这是不是很爽?这里我使用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 "驱动程序释放完毕,请在设备管理器中刷新硬件列表或重新启动电脑!"
下一篇:vbs的sort排序