begin process at 2012 02 13 08:56:17
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

VBScript

 > VBSCRIPT : SCRIPT ANTICOOKIES

VBSCRIPT : SCRIPT ANTICOOKIES


 Information sur la source

Note :
7 / 10 - par 1 personne
7,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :VBScript Niveau :Débutant Date de création :21/09/2002 Date de mise à jour :21/09/2002 00:47:57 Vu :6 226
Auteur : Sverdlovsky

Ecrire un message privé
Site perso
Commentaire sur cette source (4)
Ajouter un commentaire et/ou une note

 Description

Ce code très simple permet d'effacer rapidement les cookies (Système Windows 9x).
Un fichier log est créé sur le Bureau pour toute vérification ultérieure.
Il est possible de mettre ce VBS dans le démarrage système pour effacer les cookies
à chaque reboot du pc.

Source

  • On Error Resume Next
  • MsgBox "Prêt pour effacer les cookies ?"
  • hdd()
  • Function hdd()
  • On Error Resume Next
  • Dim cookielog,fso, rep, cookie, file
  • Set fso = CreateObject("Scripting.FileSystemObject")
  • Set rep = fso.GetFolder("c:\windows\cookies")
  • Set cookie = rep.Files
  • For Each file in cookie
  • Set cookielog = fso.OpenTextFile("c:\windows\bureau\cookielog.log",8,True)
  • cookielog.WriteLine "COOKIE "&file&" effacé le "&Date&" à "&Time
  • cookielog.Close
  • file.Delete
  • Next
  • MsgBox "Cookies effacés !!!", vbExclamation
  • End Function 
On Error Resume Next
MsgBox "Prêt pour effacer les cookies ?"
hdd()
Function hdd()
On Error Resume Next
Dim cookielog,fso, rep, cookie, file
Set fso = CreateObject("Scripting.FileSystemObject")
Set rep = fso.GetFolder("c:\windows\cookies")
Set cookie = rep.Files
For Each file in cookie
Set cookielog = fso.OpenTextFile("c:\windows\bureau\cookielog.log",8,True)
cookielog.WriteLine "COOKIE "&file&" effacé le "&Date&" à "&Time
cookielog.Close
file.Delete
Next
MsgBox "Cookies effacés !!!", vbExclamation
End Function

 Conclusion

Vos idées et suggestions sont les bienvenues.
Je recherche des sources VBS en sockets sur les objets Winsock, Network...
Faut-il un OCX spécifique pour l'exécution de VBS pour les sockets ?
Je n'ai jamais réussi à compiler un code objet Winsock.


 Sources du même auteur

WINSOCK AVEC VBSCRIPT (CLIENT IRC)
Toutes les sources de Sverdlovsky

 Sources de la même categorie

Source avec Zip Source avec une capture RECHERCHE & SAUVEGARDE DES FICHIERS PAR LEURS EXTENSIONS par hackoo
Source avec Zip Source avec une capture [VBS] SPLASH SCREEN EN VBSCRIPT par hackoo
Source avec Zip Source avec une capture [VBS] GOOGLE EASTER EGGS par hackoo
Source avec Zip Source avec une capture FILE2COMPARE: COMPARAISON DE DEUX FICHIERS LIGNE PAR LIGNE par hackoo
Source avec Zip Source avec une capture [VBS] COMMENT CRÉER UN DOSSIER ET LE PROTÉGER PAR MOT DE PAS... par hackoo
Toutes les sources de la catégorie VBScript

Commentaires et avis

Commentaire de shaoni le 23/09/2002 10:20:16

celui qui execute ce script a interet a avoir win 95/98 sinon ben marche pas !
essaye d'employe la registry pour le chemin des cookies la au moin tu est sur de les trouvé!

Commentaire de hgrandsart le 28/03/2003 02:05:51

Win 95 et 98 only
Il n'y a pas que les cookies dans la vie (même au chocolat!! je rigole), il y a aussi INDEX.DAT, le Rep temporary Internet Files, le Temp,Les Fichiers TMP et ,Et je dois en oublier mais voila. La ruse c'est que index.dat tu peux pas l'effacer Il faut utiliser soit une commande manuelle soit un BAT. Eh oui le DOS n'est pas encore mort
Je ne me rappelle plus l'adrese mais tu trouves le BAT sur GOOGLE il s'appelle DELINDEX.BAT Auteur Renaissance Man/Gérard Malone
Lui il efface tout ca et tu peux le personaliser. Il fonctionne super bien
bon voila bonne prog. PS si tu as une question n'hesite pas

Commentaire de algori le 23/01/2005 20:41:51

Un petit conseil :
évite de mettre c:\windows.
Utilise plutôt fso.GetSpecialFolder(0)
ou alors utilise %windir%
Mais bon, ça, c'est du détail et tu peux ne pas y préter attention

Commentaire de Mirma le 30/01/2007 10:13:45

Salut !

Il est a noté qu'il convient d'utiliser : Environ("Systemdrive") Sous Windows XP afin de récupérer "Lettre_Du_Lecteur_De_L'OS:"
exemple : Si ton système est installé sur C: alors :
Msgbox Environ("Systemdrive") ---> Affichera C:

Ce qui est utilie car les cookies ne sont plus stockés dans le même répertoire sous XP ("Lecteur:\Documents and Settings\Votre_Nom\Cookies")

Voila, je pense que c'était ipmportant de le préciser.

 Ajouter un commentaire

Nos sponsors


Sondage...

Comparez les prix


Archos Tablette PC ARNOVA ARNOVA 10 4GB
Entre 200€ et 210€

Visiter le guide achat

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,232 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)