Programación General > Visual Basic 6.0 e inferiores

 Seleccionar Una Carpeta

<< < (2/3) > >>

Bopo:

--- Cita de: "QliX=D!" --- Si tambien podes usar un form con un dirlistbox, hacer que la seleccione ahí poner un boton que diga aceptar, en el cual pone el path en una variable (global por ejemplo) y cierra la ventana.
--- Fin de la cita ---
No les entiendo nada :(

Bopo:

--- Cita de: "QliX=D!" --- Si tambien podes usar un form con un dirlistbox, hacer que la seleccione ahí poner un boton que diga aceptar, en el cual pone el path en una variable (global por ejemplo) y cierra la ventana.
--- Fin de la cita ---
Y donde devuelve ese valor? :P

QliX=D!:
El ejemplo mas sencillo es:
Pones unavariable global en un modulo:
Public directorioSeleccionado as string.

dps haces un formulario con un dirlistbox y dos botones uno que dice aceptar y otro cancelar.
Supongamos que tenes el boton aceptar se llama cmdAceptar y el de cancerlar cmdCancelar, y el dirlistbox se llama dir1, entonces:

--- Código: Text --- sub cmdAceptar_click()     if (dir1.path &#60;&#62; &#34;&#34;) then           directorioSeleccionado = dir1.path     else           directorioSeleccionado = &#34;&#34;     end if     unload meend sub sub cmdCancelar_click()    unload meend sub  Y listo entonces en el formulario "principal", pones:

     frmSeleccionarDirectorio.show

Y cuando necesites usar el directorio seleccionado se encotrara en la variable directorioSeleccionado.

Esperi qeu este mas claro...
slds.

Bopo:

--- Cita de: "QliX=D!" --- El ejemplo mas sencillo es:
Pones unavariable global en un modulo:
Public directorioSeleccionado as string.

dps haces un formulario con un dirlistbox y dos botones uno que dice aceptar y otro cancelar.
Supongamos que tenes el boton aceptar se llama cmdAceptar y el de cancerlar cmdCancelar, y el dirlistbox se llama dir1, entonces:

--- Código: Text --- sub cmdAceptar_click()     if (dir1.path &#60;&#62; &#34;&#34;) then           directorioSeleccionado = dir1.path     else           directorioSeleccionado = &#34;&#34;     end if     unload meend sub sub cmdCancelar_click()    unload meend sub  Y listo entonces en el formulario "principal", pones:

     frmSeleccionarDirectorio.show

Y cuando necesites usar el directorio seleccionado se encotrara en la variable directorioSeleccionado.

Esperi qeu este mas claro...
slds.
--- Fin de la cita ---
Gracias ;) , em funciono, ahora... como hago para el el el dirbox o como se llame no aparesca solo el Disco C: :huh:

Bopo:

--- Cita de: "Bopo" --- Y que me de la ruta en una variable :P

¿Cómo se hace?
--- Fin de la cita ---
ya lo hice B)


--- Código: Text ---Private Sub Drive1_Change()Dir1.Path = Drive1End Sub  

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

[*] Página Anterior