AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • 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 07 06 08:19:50
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 !

Sujet : Tester s'il s'agit d'un dossier [ ] (PierreAd)

jeudi 3 février 2005 à 14:04:59 | Tester s'il s'agit d'un dossier

PierreAd

Membre Club
Salut à tous !!!!

Voilà mon problème : en fait, je suis en train de me faire un petit log pour récupérer le contenu de mes cd-mp3... enfin bref, voila, je voudrais simplement récupérer les noms des répertoires présents sur ces CD :

===============================================
Private Sub Lister_Click()
Dim strLecteur As String
Dim strFichier As String
   
    'on récupère le nom du lecteur sélectionné
    strLecteur = drvLecteur.Drive
   
    'on récupère les dossiers à la racine
    strFichier = Dir(strLecteur, vbDirectory)
    While Len(strFichier) > 0
        If (GetAttr(strLecteur & "\" & strFichier)) = vbDirectory Then
            MsgBox "Dossier: " & strFichier
        End If
        strFichier = Dir
    Wend
       
End Sub
===============================================

Or j'ai un petit soucis, le test if(getattr(....)) fonctionne bien s'il s'agit d'un fichier (par exemple "f:\chanson.mp3"), mais lorsqu'il s'agit d'un répertoire, j'ai une erreur 52  (nom ou numéro de fichier incorrect)

Si quelqu'un pouvait m'aider, c'est surement pas très compliqué mais je ne vois pas ce qui cloche... merci d'avance pour votre aide, ciao @tous !!!


PierreAd



Cette discussion est classé dans : dossier, tester, agit, strfichier, strlecteur

Répondre à ce message

Sujets en rapport avec ce message

Tester s'il s'agit d'un dossier [ par PierreAd ] Salut à tous !!! Voila mon probleme : en fait je suis en train de me faire un petit tester l'existance d'un dossier [ par neocam ] Bonjour,    J'écrit un script en VBS, qui devra fair plusieur traitement sur les fichier d'un dossier.Aprés avoir parcouru les tuto et forum j'ai réus VBS : tester si un dossier a un "parent" [ par SkyZoO ] Bonjour,Je suis super débutant et j'ai un gros soucy.J'ai trouvé comment faire une boite de dialogue pour la recherche de dossiers (VBS) mais j'ai un tester la présence d'un fichier dans un dossier changeant [ par smarties38 ] bonjour tout le monde,j'aimerais tester grâce à une macro excel  la présence d'un fichier ppt dans un dossier. Je sais vous allez me dire que j'ai qu' Tester nom de fichier [ par aurelien2723 ] Salut!!Projet en Visual Basic 6Je scanne un dossier pour placer tous les noms des fichiers de ce dossier dansun tableau. Cependant, j'aimerais vérifie tester l'existence d'un dossier dans la base de registre [ par billy21121 ] Bonjour, je voudrais savoir comment tester si un sous répertoire existe dans la base de registre en vb6? (je ne voudrais pas tester la clé)Mercibilly2 tester si un dossier est vide ???? [ par youkizouki ] Tout d'abord bonjour. <SPAN lang=FR Renommer dossier apres recherche avec * [ par pykerdreux ] Bonjour, j'ai beau chercher, je ne trouve pas donc je crée une nouvelle question... Voila mon probleme : j'ai un répertoire qui contie Tester le type d'une objet [ par adrienbayer ] Bonjour,Je réalise une application sur la base de la programmation orientée objet en vb.net.Etant plus spécialisé dans le Delphi mais ayant la contrai tester ftp [ par culie3 ] bonsoir, je voudrais savoir comment je dois faire pour voir si mon ftp est valide?en fait j'ai mis un control inet: inet1je pense savoir que c'est ave


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


ARCHOS 5 (120 Go)
Entre 327€ et 360€


Visiter le guide achat

Photothèque Nouveau !

Photo friends at the beach.Photo Cockpit Airbus A320
Photo femme, plage, bien être, soleil, vacances, été, détente, reposPhoto accident de la route

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