VIDER LE CACHE INTERNET
Utilisateur anonyme
-
20 févr. 2006 à 00:28
OneHacker Messages postés 1447 Date d'inscription jeudi 2 novembre 2000 Statut Membre Dernière intervention 23 septembre 2007 - 30 juin 2007 à 15:45
OneHacker Messages postés 1447 Date d'inscription jeudi 2 novembre 2000 Statut Membre Dernière intervention 23 septembre 2007 - 30 juin 2007 à 15:45
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/36142-vider-le-cache-internet
https://codes-sources.commentcamarche.net/source/36142-vider-le-cache-internet
30 juin 2007 à 15:45
Euh est-ce que je le transforme en VB.Net 2 (2005) ?
30 juin 2007 à 15:04
11 juin 2007 à 22:41
2 janv. 2007 à 09:52
30 déc. 2006 à 15:14
29 déc. 2006 à 10:54
21 févr. 2006 à 11:21
Redman
21 févr. 2006 à 11:15
je viens de mettre mon nouveau code (en espérant un meilleur retour... svp ;)
http://www.vbfrance.com/code.aspx?ID=36167
21 févr. 2006 à 10:32
je tien quand meme a dire que ces bout de code n'éffacerons jamais la totalités des fichiers, il restera toujours entre 3 Mo et 5 Mo qui ne peuvent pas etre effacé comme ça ! du au fichier index.DAT, c'est la meme chose avec tout les dossiers qui renferme des fichiers temporaires, mais bon de nos jour c'est quoi 3 Mo quand on a éffacé 300 Mo de fichier temporaires. :)
21 févr. 2006 à 10:13
Vu les critiques que vous m'avez faites je me suis servi de ton code pour faire beaucoup plus court en allant plus loins.. : faire ça pour tous les utilisateurs d'un même serveur afin de récupérer de l'espace disque...
20 févr. 2006 à 17:17
20 févr. 2006 à 15:24
________________________________________________
Dim IETemps() As String
IETemps = Directory.GetFiles(GetFolderPath(SpecialFolder.InternetCache), "*", SearchOption.AllDirectories)
For i As Integer = 0 To UBound(IETemps)
On Error Resume Next
If File.GetAttributes(IETemps(i)) <> FileAttributes.Normal Then
File.SetAttributes(IETemps(i), FileAttributes.Normal)
File.Delete(IETemps(i))
Else
File.Delete(IETemps(i))
End If
Next
___________________________________________
http://www.troxsa.info/
20 févr. 2006 à 14:49
@+
http://www.troxsa.info/
20 févr. 2006 à 01:05
Redman
20 févr. 2006 à 00:28
www.troxsa.info