vbs之自動(dòng)安裝驅(qū)動(dòng)程序
更新時(shí)間:2008年07月21日 18:44:49 作者:
目前各類萬(wàn)能驅(qū)動(dòng)程序包在網(wǎng)絡(luò)上屢見發(fā)布,在使用這些程序包的同時(shí),我們不僅會(huì)問:為什么這些程序包中的驅(qū)動(dòng)程序可以在安裝新硬件之后自動(dòng)安裝呢?
其實(shí),很簡(jiǎn)單,只要將這些驅(qū)動(dòng)程序的inf文件所在的文件夾注冊(cè)到注冊(cè)表中。
比如:
我們把自己電腦上的驅(qū)動(dòng)程序,通過 驅(qū)動(dòng)精靈 之類的軟件從系統(tǒng)中分離出來(lái)以后,如果想在下一次安裝系統(tǒng)的時(shí)候,自動(dòng)安裝這些驅(qū)動(dòng)程序。我們可以把這些分離出來(lái)的驅(qū)動(dòng)程序?qū)?yīng)的文件夾寫入注冊(cè)表,然后重新啟動(dòng)電腦,電腦會(huì)自動(dòng)搜索硬件并安裝驅(qū)動(dòng)程序。這是不是很爽?這里我使用winrar+vbs實(shí)現(xiàn)。
比如我們現(xiàn)在有如下幾個(gè)驅(qū)動(dòng)程序及其inf文件對(duì)應(yīng)的文件夾:
主板------maincard
顯示卡---vga
聲卡------sound
將maincard、vga、sound文件夾 一起壓縮到一個(gè)可執(zhí)行文件中,并設(shè)置為無(wú)交互界面/自解壓路徑為c:\device
壓縮文件取名為d.exe 然后編輯如下內(nèi)容的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,"釋放驅(qū)動(dòng)程序")
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 "驅(qū)動(dòng)程序釋放完畢,請(qǐng)?jiān)谠O(shè)備管理器中刷新硬件列表或重新啟動(dòng)電腦!"
比如:
我們把自己電腦上的驅(qū)動(dòng)程序,通過 驅(qū)動(dòng)精靈 之類的軟件從系統(tǒng)中分離出來(lái)以后,如果想在下一次安裝系統(tǒng)的時(shí)候,自動(dòng)安裝這些驅(qū)動(dòng)程序。我們可以把這些分離出來(lái)的驅(qū)動(dòng)程序?qū)?yīng)的文件夾寫入注冊(cè)表,然后重新啟動(dòng)電腦,電腦會(huì)自動(dòng)搜索硬件并安裝驅(qū)動(dòng)程序。這是不是很爽?這里我使用winrar+vbs實(shí)現(xiàn)。
比如我們現(xiàn)在有如下幾個(gè)驅(qū)動(dòng)程序及其inf文件對(duì)應(yīng)的文件夾:
主板------maincard
顯示卡---vga
聲卡------sound
將maincard、vga、sound文件夾 一起壓縮到一個(gè)可執(zhí)行文件中,并設(shè)置為無(wú)交互界面/自解壓路徑為c:\device
壓縮文件取名為d.exe 然后編輯如下內(nèi)容的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,"釋放驅(qū)動(dòng)程序")
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 "驅(qū)動(dòng)程序釋放完畢,請(qǐng)?jiān)谠O(shè)備管理器中刷新硬件列表或重新啟動(dòng)電腦!"
相關(guān)文章
定時(shí)自動(dòng)備份IIS的WWW日志的vbs腳本
定時(shí)自動(dòng)備份IIS的WWW日志的vbs腳本...2007-07-07用vbs實(shí)現(xiàn)重新啟動(dòng) Internet Explorer
用vbs實(shí)現(xiàn)重新啟動(dòng) Internet Explorer...2007-03-03用vbscript實(shí)現(xiàn)從文本文件中刪除所有重復(fù)行的代碼
這篇文章主要為大家介紹了關(guān)于從文本文件中刪除重復(fù)名字的類似問題,需要的朋友可以參考一下2007-04-04VBS實(shí)現(xiàn)GB2312,UTF-8,Unicode,BIG5編碼轉(zhuǎn)換工具
VBS寫的GB2312,UTF-8,Unicode,BIG5編碼轉(zhuǎn)換工具,轉(zhuǎn)換工具下載:GB2Ue.vbs (3.34 kb)2010-06-06vbscript,jscript腳本編程教學(xué)(1)
vbscript,jscript腳本編程教學(xué)(1)...2007-03-03