Al utilizar App.Path (Visual Basic 6),en el directorio de la aplicación "c:\Archivos de programa\Directorio_Aplicación, en XP no devuelve la cadena correcta "C:\Archivos de programa\ ....., por el contrario en Windows Vista nos de vuelva la cadena "C:\Program files\....".
Esto es importante solucionarlo pues trabajando en Red, nuestra aplicación funciona correctamente en todos los S.O. menos en Vista. Entonces tanto Crystal Report como la localización de la Base de datos no la encuentra el programa por este motivo.
¿Sabe alguien porque?
Muchas gracias.
Ejemplo
'Path local de inicio local
DbPath = App.Path
'Path general de la aplicación
PathApli = App.Path
'Ubicación de las bases de datos en el servidor
PathMdb = HdDatos & Mid$(DbPath, 2, Len(DbPath)) & "\Mdb\"
'Path de las bases
PathDbConta = PathMdb & "ConfisConta.mdb"
PathDbEmp = PathMdb & EjerTrabajo & "\"
PathDbEmpN1 = PathMdb & EjerTrabajo - 1 & "\"
PathDbAuxiliar = PathMdb & "Auxiliar.mdb"
PathDbCP = PathMdb & "CodigosPostales.mdb"
'Los listados estan en el disco local
PathRpt = DbPath & "\Rpt\"
'Los ficheros PDF estan en el disco local
PathPdf = DbPath & "\Pdf\"