Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Temas relacionados > Redes
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 09-05-2014
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
Problemas con una red en W7

Tengo una aplicación desarrollada hace años en BCB 5 Profesional y ejecutándose sin problema en red contra tablas Paradox desde Windows XP. No he tenido tiempo de migrarla a una versión superior de Builder y ahora me ha surgido un problema: El usuario de la misma ha adquirido máquinas nuevas con Windows 7 32 bits (¡loado sea el vendedor!) y ahora no logro que se conecte la aplicación desde esa máquina nueva al servidor de la base de datos. En local funciona sin problemas, pero no sé si me falta alguna librería para poder conectarme en red desde W7.
Responder Con Cita
  #2  
Antiguo 10-05-2014
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Poder: 20
oscarac Va por buen camino
y como es que te conectas a las otras computadoras?
mapeas unidades?
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
  #3  
Antiguo 10-05-2014
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
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);
Responder Con Cita
  #4  
Antiguo 10-05-2014
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.037
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
¿No hay mensaje de error ni nada?
Responder Con Cita
  #5  
Antiguo 10-05-2014
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
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.
Responder Con Cita
  #6  
Antiguo 10-05-2014
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
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:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #7  
Antiguo 12-05-2014
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
Probaré esta última sugerencia.
Responder Con Cita
  #8  
Antiguo 13-05-2014
Avatar de Angel.Matilla
Angel.Matilla Angel.Matilla is offline
Miembro
 
Registrado: ene 2007
Posts: 1.350
Poder: 19
Angel.Matilla Va por buen camino
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.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 20:45:32.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi