Raccourci Créer un point de restauration (Script)

[spiralien]

Bonjour,
2 possibilités :

- Soit les extensions de fichier sont cachés et ton nom de fichier se termine par .txt au lieu de .vbs.
Pour afficher les extensions de fichiers : http://www.forum-seven.com/afficher-les ... -se7en-108

- Soit il y a un défaut au niveau des associations de fichier ( Démarrer --> Panneau de configuration --> Programmes par défaut --> Associer un type de fichier ..... )
Pour les fichiers vbs, tu devrais avoir :

[McKOK2A]

Slt Spiralien , ça me dit pas grand chose ,
--quelle nom pourrait avoir cette extension de fichier ???
--Faut il "corriger" cette extension de fichier ou bien la "supprimer" ???

--Autre chose ???
Ne pourrait on pas ajouter une petit ligne de prog qui confirmerait la fin de l'exécution de la création du RestorePoint ???

If WScript.Arguments.Count = 0 Then
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "wscript.exe", Chr(34) & WScript.ScriptFullName & Chr(34) & " Run", , "runas", 1
Else
NomPtRestauration="Point de restauration au "&day(now) &"-" &month(now) &"-" &year(now)
GetObject("winmgmts:\\.\root\default:Systemrestore").CreateRestorePoint NomPtRestauration, 0, 100
Msgbox(« Point de restauration créé! »)
End If


Un truc dans ce genre ???

[spiralien]

Bonjour,
Voila le fichier modifié ( avec message à la fin de l'exécution ).
Le fichier contenant le script a l'extension .vbs

Comme on ne peut pas attacher des fichiers VBS, j'ai été obligé de l'inclure dans le fichier ZIP ci-dessous.

PointRestauration.zip

(418 Octets) Téléchargé 362 fois

[McKOK2A]

Merci Spiralien , mais je sais pas ou le chercher ???
Si je fais une restauration , ça corrige quelque chose ??