Ανοίξτε το Wordpad. Αυτό το πρόγραμμα κειμένου θα δημιουργήσει ένα κενό έγγραφο.
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο έγγραφο. Μην προσθέσετε επιπλέον κενά. Αυτός ο WMI κώδικας πρώτα φορτώνει τις τρέχουσες πληροφορίες BIOS, μετά τρέχει την αναβάθμιση:
strComputer = "."
Set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMI.ExecQuery("SELECT * FROM Win32_BIOS")
For Each itm In colItems
strBIOSVersion = Join(itm.BIOSVersion, ",")
WScript.Echo "BIOSVersion: " & strBIOSVersion
WScript.Echo "BuildNumber: " & itm.BuildNumber
WScript.Echo "SMBIOSBIOSVersion: " & itm.SMBIOSBIOSVersion
WScript.Echo "SMBIOSMajorVersion: " & itm.SMBIOSMajorVersion
WScript.Echo "SMBIOSMinorVersion: " & itm.SMBIOSMinorVersion
WScript.Echo "Version: " & itm.Version
Next
const HKEY_LOCAL_MACHINE = &H80000002
strKeyPath = "SOFTWARE\NewKey"
strComputer = "."
iValues = Array(&H01,&Ha2,&H10)
Set oReg=GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\" & _
strComputer & "\root\default:StdRegProv")
oReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath
strKeyPath = "SOFTWARE\NewKey"
BinaryValueName = "Example Binary Value"
oReg.SetBinaryValue HKEY_LOCAL_MACHINE,strKeyPath,_
BinaryValueName,iValues
Αποθηκεύστε το αρχείο ως «XXXX.vbs». Το όνομα (το «XXXX») δεν έχει σημασία· απλά βεβαιωθείτε να προσθέσετε την κατάληξη vbs.
Επιλέξτε «No» αν το Wordpad ρωτήσει για προσθήκη κατάληξης «txt».
Κλείστε το Wordpad.
Κάντε κλικ στο μενού Start του υπολογιστή.
Γράψτε «cmd.exe» (χωρίς εισαγωγικά) στη γραμμή αναζήτησης.
Κάντε κλικ στο «cmd.exe».
Γράψτε «cscript XXXX.vbs» (χωρίς εισαγωγικά) στο παράθυρο που εμφανίζεται. Αντικαταστήστε «XXXX» με ό,τι ονομάσατε το αρχείο στο βήμα 3. Αυτό θα τρέξει την ενημέρωση και θα επανεκκινήσει τον υπολογιστή.
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα διατηρούνται.