VBScript: 1 Klik Herstelpunt

Angel_ · 1 januari 2010, 19:25

Dit VBScript kan je gebruiken,
om met één klik een Herstelpunt te maken.
Je kan dit bestandje ook in de map Opstarten plaatsen.
Zo wordt er een Herstelpunt gemaakt,
iedere keer dat je zal inloggen op je Account.
Het is ook handig, waneer je snel een Herstelpunt wilt maken.

Rechtsklik op een leeg gedeelte van het bureaublad.
Kies voor Nieuw en klik op Tekstdocument
Druk tweemaal op Enter.
Markeer en kopieer nu de volgende (Vetgedrukte) tekst,
en plak deze in het tekstdocument (Kladblok).
_______________________________________________________

Set sr = getobject("winmgmts:\\.\root\default:Systemrestore")
If (sr.createrestorepoint("Nieuw herstelpunt", 0, 100)) = 0 Then
CreateObject("WScript.Shell").Popup "Opgeslagen als : Nieuw herstelpunt", 12," Herstelpunt met succes voltooid"
Else
MsgBox "Herstelpunt mislukt"
End If

_______________________________________________________

Klik op Bestand en vervolgens op Opslaan als...
Typ in het tekstvak achter Bestandsnaam:
de naam die je aan het bestand wilt geven en
eindig met .vbs
Bijvoorbeeld: 1 Klik Herstelpunt.vbs
Klik op Opslaan

Angel

Voor wie het nog niet weet...
Hoe plaats je het bestand 1 Klik Herstelpunt.vbs in de map Opstarten:

Open het menu Start.
Klik op Alle programma's
Zoek in de lijst naar de map Opstarten
Rechtsklik op de map, en kies voor Openen
Rechtsklik nu op het bestand 1 Klik Herstelpunt.vbs
en kies voor Knippen of Kopiëren
naargelang je het bestand respectievelijk wilt verplaatsen,
of er een kopie van maakt.
Rechtsklik vervolgens op een leeg gedeelte in de map Opstarten,
en kies voor Plakken
Sluit de map Opstarten.
Zoals reeds gezegd wordt nu iedere keer een Herstelpunt gecreëerd,
als je op je Account zal inloggen.

Hoe je een snelkoppeling, in het snelstart gedeelte van je taakbalk plaatst,
kan je lezen als je op de onderstaande link klikt.

VBScript: Eject-Lade