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 !

ATTRIBUT FICHIER


Information sur la source

Catégorie :Fichier / Disque Classé sous : fichier, attribut, accés, disque Niveau : Débutant Date de création : 07/11/2006 Date de mise à jour : 08/11/2006 13:21:59 Vu / téléchargé: 4 899 / 741

Note :
8,33 / 10 - par 3 personnes
8,33 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (12)
Ajouter un commentaire et/ou une note


Description

Donne des informations sur un fichier que l'utilisateur à sélectionner.
Petit prog pour les débutants comme moi.
 

Source

  • Les administrateurs >>>Si vous juger ce code inutile, prière SVP de le désactiver, merci.
  • Exploreur
Les administrateurs >>>Si vous juger ce code inutile, prière SVP de le désactiver, merci.
Exploreur

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 !

Télécharger le zip

Historique

08 novembre 2006 09:28:06 :
Modifications + finitions suite aux conseils de DRALUORG et GALAIN
08 novembre 2006 11:30:05 :
J'ai encore rajouter quelques label! lol
08 novembre 2006 13:21:59 :
J'ai rajouter un bouton pour pouvoir enregistrer dans un fichier text, les informations recueillies.

Commentaires et avis

signaler à un administrateur
Commentaire de draluorg le 07/11/2006 23:59:55

Salut,

J'ai jetté un oeil vite fait...

Quand tu fais:

Set fso = CreateObject("Scripting.FileSystemObject")
a = fso.GetFile(retourcmddouvrir).DateCreated  
b = fso.GetFile(retourcmddouvrir).DateLastAccessed
c = fso.GetFile(retourcmddouvrir).DateLastModified
etc...

Tu crée a chaque fois un objet File c'est donc pas très élégant
Il faut déclarer un objet File ce qui permetra de ne faire qu'un appel a Fso.GetFile

Exemple:

Dim Fichier As file
Set fso = CreateObject("Scripting.FileSystemObject")
Set Fichier = fso.GetFile(retourcmddouvrir)

a = Fichier.DateCreated
b = Fichier.DateLastAccessed
c = Fichier.DateLastModified
d = Fichier.Name

Aussi, utilise des variable plus explicite que des a b c etc...

Bonne continuation
++

signaler à un administrateur
Commentaire de Galain le 08/11/2006 00:03:36

D'accord avec les remarques précédentes
Penses à indenter ton code
Un 8/10 pour t'encourager

signaler à un administrateur
Commentaire de Exploreur le 08/11/2006 07:45:45

Salut,
Merci pour vos encouragements, motivation et la note que vous me donnez.
Je vais suivre vos conseils et faire les modifications ce-soir
Merci encore.
A+
Exploreur

signaler à un administrateur
Commentaire de Exploreur le 08/11/2006 09:29:06

Finalement je n'ai pas attendus ce soir pour faire les modifications, merci encore pour les conseils.
A+
Exploreur

signaler à un administrateur
Commentaire de gnieark le 09/11/2006 21:03:25

cool... il y a des trucs que je ne savais pas faire ;) ... ça va me servir tres bientot en plus pour controler avec les dates de modifications des fichiers que certaines requetes quotidiennes sur la base FACDIS sont bien effectuées

signaler à un administrateur
Commentaire de Exploreur le 09/11/2006 21:11:44

Salut Gnieark,

Tu peux peut-être(toi seul le sais), t'en servir dans ton prog : Logiciel Consultation Documentaire ?
A+
Bonne Prog et continuation
Exploreur

signaler à un administrateur
Commentaire de gnieark le 09/11/2006 22:54:16

oui je pense que je vais m'en vais m'en servir pour ça. La raison est que je souhaite (enfin le grand chef me demande)de "bloquer" avec une liste déroulante la saisie du patient/résident "victime" dans le formulaire de déclaration des anomalies et des incidents. Dans le but de pouvoir ressortir toutes les fiches correspondant à un patient/résident sans avoir à tenter toutes les orthographes possibles. Donc il me faut la liste à jour des patients pour mon programme. L'informaticien du site m'aide à programmer la requete (il préfère le java lui j'y comprend rien ;))dans la base de données du logiciel de gestion administratif (je me refuse à sortir des infos du dossier patient). Le programme faisant cette requête, on le mettra sur un des rares PC ayant le driver spécifique (et soumis à license) de la base de donnée, en tache planifiée au démarrage (le pc de l'accueil)...

Bref ton code me permettra de créer une alerte "panne de la mise à jour auto" si ça fait longtemps que la mise à jour ne s'est pas faite en vérifiant la date de dernière modif.

signaler à un administrateur
Commentaire de Exploreur le 09/11/2006 22:59:16

Cool que cela puisse te servir..
A+
Exploreur

signaler à un administrateur
Commentaire de Exploreur le 10/11/2006 15:03:50

Merci les administrateurs, pour la correction.
A+
Exploreur

signaler à un administrateur
Commentaire de Bidou le 11/11/2006 10:37:03 administrateur CS

You're welcome ;-)

signaler à un administrateur
Commentaire de infodragon le 28/09/2008 12:16:08

moi j'obtiens l'erreur n°70 acces denied
quoi faire ?

signaler à un administrateur
Commentaire de Exploreur le 28/09/2008 13:26:02

Salut,

C'est que ton fichier n'est pas accesible par toi(accés refusé)...peut-être une question de droit administrateur....cela te le fait à chaque fois ?

A+
Exploreur

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Box pour choisir un fichier texte sur le disque dur [ par bimone78 ] Bonjour,je souhaiterai pouvroir créer une dialogbox qui me permettrait de choisir le fichier sur le disque dur comme si l'on passait par poste de trav Recherche chemin d'accés réseau d'un fichier excel [ par lotypedu31 ] Bonjour,Je souhaiterai créer une formule excel qui retrouve le chemin d'accès du fichier en cours.J'ai déjà utilisé Curdir il lui faut un disque et me [VBS] supprimmer un fichier sans connaitre son emplacement exact [ par zatox ] Bonjour à tous, j'espère ue je suis au bon endroit pour poser cette question. j'aimerai savoir s'il est possible en avec un script vbs de supprimmer Message pour olivier [ par franck ] Merci, pour ton programme concernant le fichier à accés direct. j'ai finalisé un répertoire utilisant un fichier à accés sequentiel, je vais le refair Je souhaite rechercher des fichier d'une extention sur tout mon disque[urgent] [ par soldat ] J'ai besion d'aide a propos de Freelib. voila jai vb6 et je souhaite faire une recherhcer sur tout un disque de tout les fichiers ".txt" quil contient Recherche d'un fichier sur tout le disque [ par Cesar ] Bonjour, je voudrais savoir comment rechercher un fichier sur tout le disque et pas seulement dans un repertoire et d'obtenir son chemin d'acces et au imprimer liste des fichier du disque [ par kut ] je voudrai imprimer la liste des fichier du disque tout en en imprimant le schema d'arborescence comme ceciracine |------rep1 | |- fichier1 Copier un fichier du disque dur Sur un lecteur réseau [ par Blasfem ] Bonjour à tous,Je cherche à copier un fichier (n'importe quelle nature, n'importante quelle taille) sur un lecteur réseau .La fonction FileCop Recherche sur le disque dur [ par ciberrique ] Salut !!Voila, je voudrais avoir le commande en vb pour faire un recherche sur tous les disques dur, car en faite je c faire une recherche de fichier attribut [ par jannoman ] Salut à tous.En voulant supprimer un fichier, je rencontre une erreur et je m'apercois que le fichier est en lecture seule.Comment faire pour mettre c


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



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
Temps d'éxécution de la page : 0,421 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é.