国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

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 "驅動程序釋放完畢,請在設備管理器中刷新硬件列表或重新啟動電腦!"
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 新余市| 宜城市| 阳谷县| 阳曲县| 酉阳| 新巴尔虎右旗| 元阳县| 奉贤区| 吕梁市| 东阳市| 嘉禾县| 石嘴山市| 辰溪县| 南阳市| 塔河县| 安新县| 且末县| 平果县| 定远县| 平利县| 满洲里市| 长宁县| 黄骅市| 上犹县| 吉隆县| 美姑县| 正阳县| 鹰潭市| 洪雅县| 道孚县| 新和县| 陵水| 民乐县| 西吉县| 杭锦后旗| 绥德县| 柳林县| 江城| 泾阳县| 观塘区| 南和县|