Hvordan opretter man automatisk et systemgendannelsespunkt ved dagens første opstart?
Introduktion
Ved hjælp af Windows Management Instrumentation kan du administrere systemgendannelsen. nytte effektivt. Denne artikel vil forklare, hvordan du automatisk opretter en. Systemgendannelsespunkt ved dagens første opstart.
Opret et gendannelsespunkt dagligt ved hjælp af dette script
Scriptet nedenfor vil kontrollere, om der er nogen systemgendannelsespunkter. allerede oprettet for den aktuelle dag. Hvis der ikke findes et systemgendannelsespunkt for. nuværende dag opretter scriptet et systemgendannelsespunkt.
For at oprette et gendannelsespunkt under dagens første opstart skal du kopiere følgende linjer til et Notesblok-dokument og gemme som en fil. med .VBS-udvidelse (CreateRP.VBS). Så placer. manuskriptet til Start op mappe, så den kører under logon.
' Opretter et SR-punkt under dagens første opstart
18. december 2005
' Til Windows XP
' 2005 Ramesh Srinivasan
' Internet side: https://www.winhelponline.com/xp
Mulighed Eksplicit
Dim SRP, CSRP, objWMI, clsPoint
Dim RPDate, D1, D2, dtmInstallDate, DMatch
DMatch = 0
Indstil SRP = getobject("winmgmts:\\.\root\default: Systemgendannelse")
Indstil dtmInstallDate = CreateObject("WbemScripting. SWbemDateTime")
Indstil objWMI = getobjekt( _
"winmgmts:\\.\root\default").InstancesOf ("systemgendannelse")
For hvert clsPoint I objWMI
RPDate = getmytime (clsPoint.creationtime)
D1 = Måned (RPDate) & "/" & Dag (RPDate) & "/" & År (RPDate)
D2 = Måned (dato) & "/" & Dag (dato) & "/" & år (dato)
Hvis D1 = D2, så er DMatch = 1
Næste
Funktion getmytime (wmitime)
dtmInstallationsdato. Værdi = wmitime
getmytime = dtmInstallationsdato. GetVarDate
afslutte funktion
Hvis DMatch = 0 Så
CSRP = SRP.createrestorepoint ("Dagligt gendannelsespunkt", 0, 100)
Afslut Hvis