Pratiquement toutes vos actions sont enregistrés sous Windows. Ouvrez un document texte avec Wordpad et vous le verrez ensuite apparaître dans le menu Démarrer \ Documents et dans les fichiers récents de Wordpad. Visionnez une image et bien sûr vous la trouverez dans "Documents" et dans les fichiers récents de Paint ou de votre logiciel d'image.
De la même manière lorsque vous recherchez un fichier par le biais du menu Démarrer \ Rechercher, il est "listé" et il est dès lors visible dans le menu déroulant de ce menu. La fonction "Exécuter" ( du menu Démarrer \ Exécuter ) fonctionne de la même manière. Les cookies présent sur votre disque dur contiennent également des informations confidentielles sur vous.
Voici un programme qui permet d'effacer toutes ces "traces" que vous laissez en utilisant un ordinateur. Après avoir téléchargé
Traces.vbs, double-cliquez dessus et personne ne pourra voir ensuite tous les documents que vous avez ouverts.
Ce programme est en réalité un vbscript. Il s'agit d'un langage de Microsoft orienté "objet". Cela veut dire qu'il est très facile d'intéragir avec l'environnement Windows. Par exemple, on peut créer des boîtes de dialogue avec la seule instruction MsgBox. C'est d'ailleurs la principale commande que nous allons utiliser. Voici le code source du programme ( accessible par un simple clic-droit sur le fichier traces.vbs et en choisissant "Edition" ou "Modifier") :
On Error Resume Next
'-- Déclarations de variables :
L_welcome_msgbox_message_text ="En cliquant sur OK vous effacerez :"&vbcrlf&vbcrlf&"- les DOCUMENTS RECENTS du menu Démarrer"& vbcrlf&"- les COOKIES"&vbcrlf&"- les listes déroulantes des menus EXECUTER et RECHERCHER"&vbcrlf&"- les fichiers récents des logiciels Wordpad, Paint et Imaging !"&vbcrlf&vbcrlf&"Sinon cliquez sur Annuler."
L_welcome_msgbox_title_text =" ZAPPE LE SPY --- par Nikko --- www.mon-pc.net "
'-- appel de la fonction "Welcome" :
call welcome()
sub welcome()
dim nico
nico = msgbox(L_welcome_msgbox_message_text, _
vbOKcancel + vbinformation, _
L_welcome_msgbox_title_text)
if nico = vbcancel then
WScript.Quit
End if
End sub
'-- Initialisations :
Set WshShell = CreateObject("Wscript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
set dirwin = fso.getSpecialFolder(0)
'-- efface les documents récents du menu Démarrer \ Documents :
fso.deleteFolder (dirwin&"\recent")
fso.createFolder (dirwin&"\recent")
'-- efface les cookies du menu cookies :
fso.deleteFile(dirwin&"\cookies\*.txt")
'-- efface les documents récents de Paint :
WshShell.RegDelete"HKEY_USERS \ .DEFAULT \ Software \ Microsoft \ Windows \ CurrentVersion \ Applets \ Paint \ Recent File List \"
WshShell.RegWrite"HKEY_USERS \ .DEFAULT \ Software \ Microsoft \ Windows \ CurrentVersion \ Applets \ Paint \ Recent File List \ File1",""
'-- clé des documents récents de Imaging :
WshShell.RegDelete"HKEY_CURRENT_USER \ Software \ Kodak \ Imaging \ Recent File List \"
WshShell.RegWrite"HKEY_CURRENT_USER \ Software \ Kodak \ Imaging \ Recent File List \ File1",""
'-- clé des documents récents de Wordpad :
WshShell.RegDelete"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Applets \ WordPad \ Recent File List \"
WshShell.RegWrite"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Applets \ WordPad \ Recent File List \ File1",""
'-- efface les documents récents du menu "Rechercher" :
WshShell.RegDelete"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Explorer \ Doc Find Spec MRU \"
WshShell.RegWrite"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Explorer \ Doc Find Spec MRU \ a",""
'-- clé des documents récents du menu "Exécuter" :
WshShell.RegDelete"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Explorer \ RunMRU \"
WshShell.RegWrite"HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ CurrentVersion \ Explorer \ RunMRU \ a",""
'-- petit message pour dire que le prog s'est exécuté :
wscript.echo" Modifications effectuées !"&vbcrlf&vbcrlf&"Remarque : la liste déroulante du menu EXECUTER sera effacée au prochain démarrage de Windows."
Vous voyez que l'on modifie le registre ( pour mieux comprendre, allez donc voir notre dossier consacrer à la
base de registre ). Il faut donc que les clés des programmes concordent avec celles de votre ordi. Voilà la version la plus simple du programme qui devrait fonctionner à peu près chez tout le monde mais si ça ne fonctionne pas chez vous, voici la méthode pour trouver soi-même la clé qui correspond aux documents récents d'un programme :
- ouvrez un fichier avec le programme souhaité ( ex: c:\monpc.doc ). Ouvrez la base de registre et faites une recherche de ce fichier. Vous trouverez sans doute l'emplacement des fichiers récents du premier coup ( souvent cette clé est appelée "Recent File List"). Donc si les clés du programme Traces.vbs ne vont pas, corrigez les de cette manière.
Mais vous pouvez surtout ajouter des programmes de votre choix en ajoutant, grâce à cette méthode, des instructions quasiment identiques à celles du programme. Par exemple pour rajouter le programme Excel 97 dans la liste de Traces.vbs, il faudra ajouter ces 3 lignes à la suite des autres dans le programme :
'-- efface les documents récents de Excel 97 :
WshShell.RegDelete"HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ 8.0 \ Excel \ Recent File List \"
WshShell.RegWrite"HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ 8.0 \ Excel \ Recent File List \ File1",""
Télécharger Traces.vbs ( 2 ko ) fonctionnant sous Windows
Voilà, vous pourrez désormais passer inaperçu sur un PC !
NIKKO
