• Sábado 21 de Diciembre de 2024, 14:43

Autor Tema:  Ubicacion De La Aplicacion  (Leído 4147 veces)

MoisesR

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Ubicacion De La Aplicacion
« en: Miércoles 16 de Febrero de 2005, 18:37 »
0
Hola amigos, quisera saber si existe alguna función en pb para saber en que directorio se esta ejecutando mi aplicación, o de que forma podria saber esta información.

Mi aplicación esta vinculada a abrir otros archivos y quisiera poder configurar dinamicamente la ubicacion de estos, por si la aplicación es instalada en otra carpeta.

Les agradesco por anticipado su ayuda.

Saludos
Moisés.

RadicalEd

  • Moderador
  • ******
  • Mensajes: 2430
  • Nacionalidad: co
    • Ver Perfil
Re: Ubicacion De La Aplicacion
« Respuesta #1 en: Miércoles 16 de Febrero de 2005, 18:43 »
0
De PB no se nada pero de pronto te sirve esta ayudita, en Visual Basic existe el metodo "App" y su propiedad "Path", te muestra la direccion donde corre la aplicacion, osea:

MsgBox App.Path 'MsgBox es una ventana de dialogo

Pues de pronto sea parecido en Power Builder

Ojala te sirva.
Chao

El pasado son solo recuerdos, el futuro son solo sueños

ior

  • Nuevo Miembro
  • *
  • Mensajes: 10
    • Ver Perfil
Re: Ubicacion De La Aplicacion
« Respuesta #2 en: Miércoles 23 de Febrero de 2005, 17:55 »
0
tal vez para ahorita ya lo hallas averifuado:

GetCurrentDirectory PowerScript function obtienes el directorio actual de tu aplicacion.

Manejando cadenas puede cambiar la ruta de tus archivos o crear tu directorio por default para el manejo de  tus archivos, si la applicación inicia y no hay directorio por default para el manejo de tus file, pues simplemente crealo.

Una aplicacion por default cuando tu quieres guardar un archivo, intenta guardar sobre el directorio donde tienes guardada tu aplicación, pero puede cambiar tu directorio por default.

Aqui tienes un fragmento de codigo que yo utilizo.

...

//creo el directorio donde guardare las nominas
ls_path = 'C:\E_nomina'

CreateDirectory(ls_path)

ls_name_file = ls_path + '\Nomina_'+string (p_fecha_aplic, 'mm')+string(p_fecha_aplic,'dd')+string(p_fecha_aplic,'yyyy')/*+ string (p_hora_aplic, 'hh') + string (p_hora_aplic, 'mm') + string (p_hora_aplic, 'ss') */ +'.txt'
ls_name_no_cuenta = ls_path + '\Not_cuenta_'+string (p_fecha_aplic, 'mm')+string(p_fecha_aplic,'dd')+string(p_fecha_aplic,'yyyy')/*+string (p_hora_aplic, 'hh') + string (p_hora_aplic, 'mm') + string (p_hora_aplic, 'ss')*/ +'.txt'

//Me cambio a mi directorio.
ChangeDirectory (ls_path)
..

En el ejemplo anterior no pasa nada si el directorio ya existe. no lo sobreeescribe, aunque tambien puede checar si directorio ya existe con DirectoryExists ( nombre de tu directorio con todo y ruta )

Espero te sirva.

p.d.las funciones que necesitas estan en un grupo de controles llamados file system.