FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Perdón por el olvido. Me conecto a la base de datos mediante un TDatabase y un Tsession; las propiedades del srevidor están guardadas en un fichero ini. El código que uso es este:
Código:
char cEntorno[128], cTablas[128], cAcceso[128]; memset(cEntorno, '\0', sizeof(cEntorno)); memset(cAcceso , '\0', sizeof(cAcceso)); memset(cTablas , '\0', sizeof(cTablas)); GetPrivateProfileString("DATOS", "Entorno", "C:\\DatAfi21\\Gia.ini", cEntorno, sizeof(cEntorno), (ExtractFilePath(Application->ExeName) + "PtoDat21.ini").c_str()); GetPrivateProfileString("DATOS", "Acceso" , "C:\\DatAfi21\\Acceso" , cAcceso , sizeof(cAcceso) , (ExtractFilePath(Application->ExeName) + "PtoDat21.ini").c_str()); GetPrivateProfileString("DATOS", "Tablas" , "C:\\DatAfi21\\Tablas" , cTablas , sizeof(cTablas) , (ExtractFilePath(Application->ExeName) + "PtoDat21.ini").c_str()); try { fPersonas->Session1->PrivateDir = ExtractFilePath(Application->ExeName); fPersonas->Session1->ConfigMode = cmSession; fPersonas->Session1->NetFileDir = cAcceso; } catch(...) { Application->Terminate(); return; } try { fPersonas->Session1->AddStandardAlias("dGesAfi21", cTablas, "PARADOX"); } catch(...) { } // ************************************************************************* // * Se activan la sesión, la base de datos y las tablas que correspondan. * // ************************************************************************* fPersonas->Session1->Active = true; fPersonas->Database1->Connected = true; fPersonas->Session1->OpenDatabase(fPersonas->Database1->DatabaseName); |
#2
|
||||
|
||||
¿No hay mensaje de error ni nada?
|
#3
|
||||
|
||||
Simplemente que no se puede conectar al servidor, pero es un mensaje generado por mi en el try...catch en que están las tres líneas de propiedades de Session1. Es que hay algunos problemas añadidos: No puedo depurar el programa, que sería lo lógico, porque no voy a montar todo Builder 5 más los fuentes en el equipo del cliente. Por otra parte yo no puedo hacer la depuración en casa porque no tengo una red.
|
#4
|
||||
|
||||
Si usas el BDE, en la máquina nueva instálalo en una carpeta que no cuelgue de Archivos de programa yo lo instalaría en una carpeta creada dentro de la de mi aplicación;
C:MiAplicacion\BDE Suerte. Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
#5
|
||||
|
||||
Probaré esta última sugerencia.
|
#6
|
||||
|
||||
Creo que ya sé cual es el problema. Se trata, simplemente, de un problema de privilegios de usuario porque lanzando la aplicación en una máquina con usuario administrador se ejecuta sin ningún problema, y esto tiene que resolverlo quien ha instalado los nuevos equipos. Gracias a todos por las ideas aportadas.
|
|
|
|