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

首頁 > 編程 > VBScript > 正文

利用VBS腳本修改聯想筆記本BIOS密碼的代碼分享

2020-06-26 18:34:33
字體:
來源:轉載
供稿:網友
這篇文章主要介紹了利用VBS腳本修改聯想筆記本BIOS密碼的實現代碼,感覺這不科學!無意中找到的一些資料,喜歡的朋友可以試試
 

這不科學!無意中找到的一些資料:

利用VBS腳本修改聯想筆記本BIOS密碼的代碼分享
vbs 代碼:

復制代碼代碼如下:

strComputer = "." 
Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/WMI") 
' Obtain an instance of the the class 
' using a key property value. 
Set objShare = objWMIService.Get("Lenovo_SetBiosPassword.InstanceName='ACPI/PNP0C14/1_0'") 

' Obtain an InParameters object specific 
' to the method. 
Set objInParam = objShare.Methods_("SetBiosPassword"). _ 
inParameters.SpawnInstance_() 

' Add the input parameters. 
objInParam.Properties_.Item("Parameter") = "test" 

' Execute the method and obtain the return status. 
' The OutParameters object in objOutParams 
' is created by the provider. 
Set objOutParams = objWMIService.ExecMethod("Lenovo_SetBiosPassword.InstanceName='ACPI/PNP0C14/1_0'", "SetBiosPassword", objInParam) 

' List OutParams 
Wscript.Echo "Out Parameters: " 
Wscript.echo "Return: " & objOutParams.Return 


 

利用VBS腳本修改聯想筆記本BIOS密碼的代碼分享
 


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 噶尔县| 合作市| 内丘县| 揭东县| 桃源县| 磐石市| 三原县| 莱芜市| 岳阳县| 苍山县| 乌兰浩特市| 瑞昌市| 湾仔区| 凭祥市| 延吉市| 宁阳县| 拜城县| 葵青区| 民县| 三穗县| 静安区| 边坝县| 阜城县| 瓦房店市| 车致| 宁陕县| 义乌市| 贵港市| 都匀市| 宜州市| 韶关市| 怀化市| 安溪县| 兰西县| 深州市| 高要市| 盐亭县| 阳朔县| 渭源县| 杭锦后旗| 东宁县|