Dossier - sous dossier

Dossier - sous dossier - VB/VBA/VBS - Programmation

Marsh Posté le 07-08-2007 à 15:57:00    

Bonjour,
 
 
Actuellement je bloque sur un programme en vb6. Je dois sélectionner mon dossier, puis je dois afficher tous les noms de mes sous dossiers dans une textbox.
 
Comment faire?
 
Merci de votre aide

Reply

Marsh Posté le 07-08-2007 à 15:57:00   

Reply

Marsh Posté le 07-08-2007 à 17:56:04    

Voir http://forum.hardware.fr/hfr/Progr [...] 0232_1.htm c'est du VBA mais transcriptible en VB6 sans gros problemes

Reply

Marsh Posté le 07-08-2007 à 17:59:25    

Tiens:

Code :
  1. Set objFSO = CreateObject("Scripting.FileSystemObject" )
  3. Set objDossier = objFSO.GetFolder(chemin)
  5. For Each dossier In objDossier.SubFolders
  6.    
  7.    msgbox dossierDoc.Name
  9. Next

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed