AccueilCodesTutorielsForumsEmploiLivresConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 01 08 08:28:38
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

SCRIPT D'ANALYSE DE FICHIERS D'UN DISQUE


Information sur la source

Catégorie :VBScript Classé sous : shellapplication, filesystemobject, adodbrecordset, adodbconnection, browseforfolder Niveau : Débutant Date de création : 15/11/2006 Date de mise à jour : 15/11/2006 15:36:25 Vu / téléchargé: 3 947 / 565
Auteur : lostrailler Ecrire un message privé
Note :
9 / 10 - par 1 personne
9,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

Description

Ce script stock les informations des fichiers contenus dans un répertoire (ou dans un disque donné) dans un fichier texte ou dans une base de données Access.

Utile pour savoir si vous avez des fichiers inutilisés depuis un moment ou bien faire des statistiques sur vos fichiers. Il y a déjà quelques requêtes SQL de faites sur la base.

Les informations stockées sont : le nom du fichier, son chemin complet, son son répertoire, sa date de création, sa date de dernier accès, sa date de dernière modification, sa taille et le type de fichier.  

Le code est bien entendu commenté ;-)
 

Conclusion

Juste un merci à JMO et jrivet qui m'ont aidé sur le forum.

J'ai essayé un moment mais je n'ai pas réussi à récupérer le propriétaire du fichier. J'ai laissé cette partie dans le code mais en commentaire.

Le fichier texte qui est créé est enregistré sur le bureau. Il est importable dans divers applications (Excel par exemple) et le séparateur est "|".

La base de données est par défaut à mettre au même endroit que le script mais vous pouvez changez le chemin d'accès à la ligne 83.
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !
  • fichiers.mdbTélécharger ce fichier [Réservé aux membres club]417 792 octets
  • recup.vbsTélécharger ce fichier [Réservé aux membres club]Voir ce fichier9 266 octets

Télécharger le zip

Historique

15 novembre 2006 15:36:16 :
Meilleure explication du script
15 novembre 2006 15:36:26 :
Meilleure explication du script

Commentaires et avis

signaler à un administrateur
Commentaire de leSaleGauSS le 16/11/2006 22:51:18

Il a l'air bien, mais une question, liste.txt n'apparait pas sur mon bureau
c'est normal ?

signaler à un administrateur
Commentaire de leSaleGauSS le 17/11/2006 03:10:05

heu désolé j'ai retrouvé liste.txt en fesant un refresh
honte sur moi :(

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

centrer la fenêtre browseforfolder [ par Garou ] j'ai créer une fenêtre avec la fonction API SHBrowseForFolder et je cherche à centrer cette fenêtre. Utilisation de FileSystemObject ... [ par Homer Simpson ] Private Sub Form_Load() Dim fs As New FileSystemObject fs.copyfile "c:\windows\bureau\aaa.txt", "c:\windows\bureau\bbb.txt"End SubPourquoi ça ne FileSystemObject [ par PEB ] Lorsque j'utilise le FSO j'ai un problème avec la méthode CopyFolder qui me renvoie le message d'erreur suivant :Expected: =Mon code est le suivant : !! FileSystemObject et Package VB ... !! [ par guiguimac ] Bonjour à tous !il semble que les FileSystemObject et la ref associée ne passent pas super quand un fait un package de son exe ...qq'1 a une solution FileSystemObject [ par florian42 ] Alors voila ,j'ais pomper une source de manip de fichier(DirList/FileList/FichierList), je l'ais modifier dans un projet bien a par.Puis quand ça été BrowseForFolder [ par Linkman ] Voilà je voudré faire cela mais en VB normalcopié le script suivant ds notepad et enregistré sous vbsMerci !!!Set WSHShell = WScript.CreateObject("WSc alerte IE sur objet "FileSystemObject" [ par citte ] J'ai une page html qui lit, à partir d'un script vbs, une liste de fichiers contenus dans un dossier réseau pour les afficher sous forme de liens. Lor Les fonctions de FileSystemObject. [ par fagol ] Salut,J'aimerai connaitre les fonctions associés a la classe :FileSystemObject, ainsi que leurs actions.(Je n'ai pas d'aide en ligne...).merci. Les fonctions de FileSystemObject. [ par fagol ] bonjour,Voici ce que je ve faire : Dim fs, f, f1, s, sf Dim nbREP, nbFICHIER_courant As Integer Dim tampon As String Set fs = Cre Pour les stars du Textstream et du FileSystemObject uniquement !!! [ par kuss ] J'ai trouvé une partie de code sur VBfrance qui me permet d'ouvrir un texte et de le mettre dans un buffer.Mais apres je voudrais pouvoir le lire lign


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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
Temps d'éxécution de la page : 0,390 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.