Afficher les éléments d'un dossier dans un label

Résolu
Sinsitrus Messages postés 855 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015 - 19 janv. 2010 à 13:28
Sinsitrus Messages postés 855 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015 - 19 janv. 2010 à 14:29
Salut !

Comment je peux avoir le contenu d'un dossier précis (récupéré par App.Path pour un label1) dans un Label2 ?

Merci

----------
OS : Windows XP SP3 et Vista 32
Platforme : VB 6.0 + SP6
Ok VB6.0 c'est pas net !

5 réponses

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
19 janv. 2010 à 13:47
le contenu d'un dossier dans un label ?

tu veux dire la liste des dossiers et fichiers de ce repértoire ?

curieux d'utiliser un Label...
mais tu peux faire une boucle bâtie autour de l'instruction Dir$

Dim sName As String
    sName = Dir$(App.Path)
    Do While LenB(sName)
        Label1.Caption = Label1.Caption & sName & vbNewLine
        sName = Dir$
    Loop


Renfield - Admin CodeS-SourceS - MVP Visual Basic
3
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
19 janv. 2010 à 14:05
yep, manque un "" a la fin de App.Path ^^

Renfield - Admin CodeS-SourceS - MVP Visual Basic
0
Sinsitrus Messages postés 855 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
19 janv. 2010 à 14:22
Pourquoi il le refuse à la fin de sName = Dir$(App.Path) & ""
Dsl...
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
19 janv. 2010 à 14:24
utilises plutot :

sName = Dir$(App.Path & "")


Renfield - Admin CodeS-SourceS - MVP Visual Basic
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Sinsitrus Messages postés 855 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
19 janv. 2010 à 14:29
C'est résolu merci ^^
Les deux fonctionnent :
sName = Dir$(App.Path & "")
sName = Dir$((App.Path) & "")
0
Rejoignez-nous