Overblog
Editer l'article Suivre ce blog Administration + Créer mon blog

HP Tools to Enable TPM Device in Bios

Publié le par damcuvelier

 

Dim gethomepath, oWsh
Dim iRetVal1,iRetVal2
Dim sCmd1,sCmd2


Set oWsh = CreateObject("WScript.Shell")

gethomepath=left(WScript.ScriptFullName,len(WScript.ScriptFullName)-len(WScript.ScriptName)-1)
sCmd1 = "cmd /c "& gethomepath &"\BIOSConfigUtility /SetConfig:"& gethomepath &"\TPMEnable.REPSET /NewAdminPassword:"&chr(34)&"passw0rd!"&chr(34)
sCmd2 = "cmd /c "& gethomepath &"\BIOSConfigUtility /cspwd:"&chr(34)&"passw0rd!"&chr(34)&" /NewAdminPassword:"&chr(34)&chr(34)


iRetVal1 = oWsh.Run(sCmd1, 0, true)
iRetVal2 = oWsh.Run(sCmd2, 0, true)

Commenter cet article

Retour à l'accueil