¿Ayuda : Como ver los nombres de carpetas en un listbox o cualquier otra cosa?

[Brian1511]

Hola a todos como ya les explique en el titulo no logro encontrar en ninguna parte este codigo :

Lo que quiero es que el programa al iniciar me presente los nombres de unas carpetas que tengo guardadas en otra carpetas , es parte de un inicio de sesion que estoy creando ya pronto les mostrare el resultado porfavo espero que me puedan ayudar

[Danyfirex]

Sera esto lo que quieres:

Código (vb) [Seleccionar] Expandir

Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
lParam As Any) As Long

Private Const LB_DIR = &H18D

Private Const DDL_DIRECTORY = &H10
Private Const DDL_ARCHIVE = &H20
Private Const DDL_EXCLUSIVE = &H8000

Private Sub Command1_Click()
    List1.Clear
    SendMessage List1.hwnd, LB_DIR, DDL_EXCLUSIVE Or DDL_DIRECTORY, ByVal "C:\*.*"
End Sub




Saludos

[Brian1511]

Si AMIGO algo como esto necesitaba pero no logro entenderlo podrias porfavor explicarme un poco este code te lo agradeceria bastante Haaaa y Gracias  por ayudarme!!

[Arconte]

tambien puedes  usar la funcion DIR() de vb6 para obtener uno a uno las carpetas y archivos y agregarlos mediante List1.addItem, es sencillo. pero lo que pusieron anterior es mas rapido.

[Danyfirex]

Si AMIGO algo como esto necesitaba pero no logro entenderlo podrias porfavor explicarme un poco este code te lo agradeceria bastante Haaaa y Gracias  por ayudarme!!

La explicación
http://www-user.tu-chemnitz.de/~heha/petzold/ch09g.htm

saludos