vbs之自動安裝驅動程序
2020-07-26 11:55:54
供稿:網友
 
						其實,很簡單,只要將這些驅動程序的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 "驅動程序釋放完畢,請在設備管理器中刷新硬件列表或重新啟動電腦!"