[..] Code pour effacer historique,cookies...

[TILK]

Hello tout le monde,

J'ai créer un navigateur dans mon programme et dedans j'ai mis un bouton qui permet d'effacer ses traces.
Le problème est que une fois le code executé, derrière ccleaner trouve encore et efface l'historique, cookies, les fichiers tempos dans internet explorer.

Si quelqu'un a un code qui fonctionne bien sachant que c'est obligatoirement internet explorer (enfin une partie de celui-ci) qui est utilisé dans mon script

[TopXm]

Hello

Via une simple recherche sur le forum je tombe sur ceci : http://www.autoitscript.fr/forum/viewto ... he+#p20368

proposé par le boss

[TILK]

Merci, je vais essayer.

Moi j'avais ça comme code mais il ne fonctionne pas :

Code : Tout sélectionner

Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $History )
Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $Cookies )
Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $Temporary_Internet_Files )
Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $Form_Data_Only )
Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $Everything )
 

[TILK]

arf la fonction du boss ne fonctionne pas... j'ai des erreurs lors de la compilation :

(320,1) : ERROR: missing EndSwitch.
Func
^
(232,14) : REF: missing EndSwitch.
Switch $nMsg
~~~~~~~~~~~~~^
(320,1) : ERROR: missing Wend.
Func
^
(230,1) : REF: missing Wend.
While
^
(382,3) : ERROR: syntax error
Case
~~^
D:\XXXXXX.au3 - 3 error(s), 0 warning(s)

[mikell]

Vu qu'y a pas de Switch dans la fonction de Tlem, l'erreur ne vient pas de là
Conseil : vérifier le script (et s'il n'y a pas eu une cagade de copier-coller, genre EndFunc qui manque, etc)

[TILK]

Non, si j'enlève le code, je n'ai plus aucune erreur

[mikell]

Alors c'est un souci d'intégration du code dans le script
J'ai pas essayé le code du boss, mais c'est un maniaque et il a dû soigneusement le tester avant de le poster
Et tes erreurs ça m'évoque furieusement un EndIf manquant ou déplacé ou une autre connerie du même tonneau

[Tlem]

Je confirme le bon fonctionnement de la fonction et du code d'exemple.

C'est indubitablement une erreur d'intégration de la fonction au sein du code de TILK ...

[TILK]

Tlem, arriverais-tu à m'envoyer le script fonctionnel avec le code de nettoyage d'IE (avec un simple bouton)
J'arriverais peut-être à voir d'où vient le problème comme cela.

[Tlem]

Les fonctions sont dans le lien fournit par TopXm.

Il vous suffit de copier le code à partir de la ligne

Code : Tout sélectionner

Func _EmptyIEHistory()

jusqu'à la ligne

Code : Tout sélectionner

EndFunc   ;==>_FileAndDirectoryDelete

Ce qui vous donne 3 fonctions. Copiez ce code à la fin de votre script puis, dans votre code sur l'action du bouton, rajoutez les deux commandes suivantes :

Code : Tout sélectionner

_EmptyIEHistory()
_EmptyIECache()

Voilà !

[TILK]

Merci

Mon erreur était de mettre les 3 fonctions entre le EndSwitch

[Tlem]

N'oubliez pas la balise [R] dans le titre de votre premier message si votre sujet est résolu.

[leoueb]

Bonjour,

Pour ma part, j'ai trouvé beaucoup plus simple pour réécrire ces fonctions et c'est natif dans Windows.

Exemple :

Code : Tout sélectionner

Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8",@WindowsDir,@SW_HIDE)

Le Chiffre 8 est changeable en fonction de le fonction désirée :

1 => Efface l'Histroique
2 => Efface les Cokies
8 => Efface les Fichiers internet Temporaire
16 => Efface les données des Formulaires
32 => Efface les mots de Passe sauvegardés
255 => Efface Tout
4351 => Celui la je ne le connaissais pas, je l'ai trouvé en recherchant sur notre ami Google => Delete All w/Clear Add-ons Settings (je ne sais pas trop ce que ça fait)

Rien n'empêche effectivement d'utiliser des Fonctions, car c'est plus pratique pour les éxecutions multiples, mais je les trouve un peu lourde avec les lectures de clés de registre.

[Tlem]

Magnifique. Si je trouve un peu de temps, je regarderais à mettre ça sous forme de fonction.

[Anthony]

Magnifique. Si je trouve un peu de temps, je regarderais à mettre ça sous forme de fonction.

Bonjour Tlem

Gros déterrage de sujet je le sais mais cette fonction existe maintenant, pour me virer cette fenêtre disgracieuse ?
En effet

Code: [Tout sélectionner] [Déplier/Replier]

@SW_HIDE

GeSHi © Extension Codebox Plus

n'à aucun effet je suis sur Zindows 10 x64 Pro

Code: [Tout sélectionner] [Déplier/Replier]

$ClearID = "8"
Run("RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess " & $ClearID, @WindowsDir, @SW_HIDE)

GeSHi © Extension Codebox Plus

Bon coding

[Tlem]

Effectivement, déterrage d'un sujet de 10 ans, c'est pas mal ...

[Anthony]

Magnifique. Si je trouve un peu de temps, je regarderais à mettre ça sous forme de fonction.

Bonjour Tlem,

Oui vieux mais je me demandais si cette fonction existait aujourd'hui, ce qui ferait avancer la science