Programación General > Power Builder

 Capturar Carpetas, No Archivos

(1/2) > >>

aloalo:
Hola:

En mi aplicaciòn necesito que el usuario elija un directorio al cual enviar sus archivos generados. He encontrado que PB tiene una funcion para seleccionar archivos del disco duro, pero lo que ,me interesa es que se puedan seleccionar carpetas (directorios) del disco duro.

Alguien sabe como hacer esto por favor...

OJO: Estoy utilizando Power Builder 7.0

Gracias


Walter

Zuzunaga:
Mandame un correo a DavidZuzunaga@hotmail.com y te envio un ejemplo que te abre la ventanita de dialogo para elegir una carpeta ,o unidad

F_Tanori:

--- Citar ---aloalo
 
Publicado: Diciembre 07, 2005 12:05 pm
Report Post
--- Fin de la cita ---

 no necesitan enviarte un correo para abrir ese cuadro de dialogo este es un foro publico no se poque la gente intenta hacerlo privado


Las respuestas aqui son para todos, incluso para que puedan ser 'criticadas' constructivamente, o corregidas tal vez necesitas otro tipo de sitio


www.latinchat.com :P ahi puedes hacer contactos :P


Este mensaje es viejo, no creo que aloalo vaya a responder pues fue hace un año

y tu correo puede ser usado para otra cosa si lo dejas en un FORO PUBLICO MUNDIAL  :devil:  :whistling:


--- Código: Text --- String ls_Tipo,ls_Titulo,ls_pathboolean ib_AbrioCarpeta  ls_Titulo="Seleccione la carpeta"ls_path="C:\" //Directorio inicialib_AbrioCarpeta = GetFolder(ls_Titulo, ls_path )>0 if ib_AbrioCarpeta then   MessageBox("Carpeta Seleccionada",ls_path)    end if 




Saludos

leoandres:
Saludos...

Hace un tiempo vi un tip que armaba la estructura del arbol de directorios(carpetas) del disco duro en un TreeView, no lo consigo ahora, pero por el momento te doy una solución...
que el usuario tome cualquier archivo de esa carpeta y en la variable que recibes el nombre del archivo determinas donde se encuentra ubicado dicho archivo buscando en reversa el backslash (\) y cortas esa variable hasta esa posición...
Te doy el ejemplo:

integer value
string archivo, carpeta
value = GetFileOpenName("Seleccione Archivo",+ file_name, archivo, "DOC",  + "Text Files (*.TXT),*.TXT,"+ "Doc Files (*.DOC),*.DOC" )

// Ya tenemos el nombre del archivo seleccionado en la variable archivo...
IF len(archivo) > 0 THEN
value=len(archivo)
DO while mid(archivo,value,1) <> "\"
value --
LOOP
carpeta=left(archivo,value)
ELSE
MessageBox('Error!','No seleccionó archivo!')
END IF

...

Espero que te sirva...
Prueba...

leoandres:
... sobre la respuesta que mandaron mientras yo daba mi solución...

En la versión que yo trabajo (6.5) no existe la función "GETFOLDER", debe haber aparecido en úna versión más reciente...

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa