Kā automātiski izveidot sistēmas atjaunošanas punktu dienas pirmajā palaišanas reizē?
Ievads
Izmantojot Windows pārvaldības instrumentus, varat pārvaldīt sistēmas atjaunošanu. lietderība efektīvi. Šajā rakstā tiks paskaidrots, kā automātiski izveidot a. Sistēmas atjaunošanas punkts dienas pirmajā sāknēšanas reizē.
Katru dienu izveidojiet atjaunošanas punktu, izmantojot šo skriptu
Tālāk sniegtais skripts pārbaudīs, vai ir sistēmas atjaunošanas punkti. jau izveidota šai dienai. Ja nepastāv sistēmas atjaunošanas punkts. pašreizējā dienā skripts izveido sistēmas atjaunošanas punktu.
Lai izveidotu atjaunošanas punktu dienas pirmajā palaišanas reizē, kopējiet šīs rindas Notepad dokumentā un saglabājiet kā failu. ar .VBS paplašinājumu (CreateRP.VBS). Tad vieta. skripts uz Uzsākt mapi, lai tā darbotos pieteikšanās laikā.
Izveido SR punktu dienas pirmajā palaišanas reizē
2005. gada 18. decembris
Operētājsistēmai Windows XP
2005 Ramesh Srinivasan
' Tīmekļa vietne: https://www.winhelponline.com/xp
Izteikta opcija
Dim SRP, CSRP, objWMI, clsPoint
Dim RPDate, D1, D2, dtmInstallDate, DMatch
DMatch = 0
Iestatīt SRP = getobject ("winmgmts:\\.\root\default: SystemRestore")
Set dtmInstallDate = CreateObject("WbemScripting. SWbemDateTime")
Iestatiet objWMI = getobject(_
"winmgmts:\\.\root\default").InstancesOf ("sistēmas atjaunošana")
Katram clsPoint In objWMI
RPDate = getmytime (clsPoint.creationtime)
D1 = mēnesis (RPDate) & "/" & diena (RPDate) & "/" & gads (RPDate)
D2 = mēnesis (datums) & "/" & Diena (datums) un "/" un gads (datums)
Ja D1 = D2, tad DMatch = 1
Nākamais
Funkcija getmytime (wmitime)
dtmInstallDate. Vērtība = wmitime
getmytime = dtmInstallDate. GetVarDate
beigu funkcija
Ja DMatch = 0, tad
CSRP = SRP.createrestorepoint ("Dienas atjaunošanas punkts", 0, 100)
Beigas Ja