begin process at 2012 02 09 02:04:29
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

VBScript

 > SCRIPT D'ANALYSE DE FICHIERS D'UN DISQUE

SCRIPT D'ANALYSE DE FICHIERS D'UN DISQUE


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
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é :5 020 / 653

Auteur : lostrailler

Ecrire un message privé
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

Les Membres Club peuvent 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

 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

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture LECTEUR DE CARTES VIRTUELLES par alcyde01
DIRLISTING - LISTER UN DOSSIER ET SES SOUS DOSSIERS TRES RAP... par santiago69
Source avec Zip Source avec une capture MUSICOTHEQUE : GESTION DE FICHIERS SONS (MP3, WAV, ETC) par notpa01
Source avec Zip Source avec une capture FILEVIEW ==> USERCONTROL POUR EXPLORER FICHIERS ET/OU DOSSIE... par violent_ken
Source avec Zip Source avec une capture SCANLIST V2.1 par pingouin84k

Commentaires et avis

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 ?

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

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
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 : 4,306 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales