14 respuestas en este tema

[FGarcia]

Jovenes ilustres tengo un problema que necesito ayuda de ustedes...

 

 

 

 

No tengo dinero $   

 

 

Pasando a términos serios e importantes, resulta que una aplicación que tengo ya funcionando como aplicación con base de datos local me han pedido que una instancia de la misma se pueda ejecutar en una maquina remota. Eso es algo que nunca he hecho así que pido su ayuda (peras y manzanas por favor ). En materia:

 

La ruta de mi proyecto original:

php

Programa original con la base de datos en local (127.0.0.1)
 
  IP: 192.168.0.105  //Esta es la IP publica (no fija) de la maquina 
 
  C:\MisDesarrollos\Data\MiDB.fdb
  C:\MisDesarrollos\MiAplicacion.exe
  C:\MisDesarrollos\fbClient.dll

Mi conexion con la BD (Uso Unidac y provider Interbase) que es Firebird 2.5

 

php

procedure TdmDatabase.DataModuleCreate(Sender: TObject);
begin
  uniConexion.ProviderName := 'InterBase';
  uniConexion.Server := '127.0.0.1';
  uniConexion.SpecificOptions.Add('InterBase.Charset=UTF8');
  uniConexion.SpecificOptions.Add('InterBase.ClientLibrary=fbclient.dll');
  uniConexion.Database := GetCurrentDir + '\Data\' + NombreBD;
  
end;

Al iniciar la aplicación el el Source del proyecto:

php

Application.CreateForm(TdmDatabase, dmDatabase);
  if not dmDatabase.Conectar then
    begin
      FreeAndNil(dmDatabase);
      exit;
    end;

La función Conectar

php

function TdmDatabase.Conectar: Boolean;
begin
  Result := true;
 
  if uniConexion.Connected then
    uniConexion.Connected := false;
 
  try
    uniConexion.Connected := true;
  except
    on E: Exception do
      begin
        ShowMessage(Format(errConectarBD, [E.Message]));
        Result := False;
      end;
  end;
end;

Hasta ahí todo me funciona correctamente, no hay problema alguno.

 

Ahora creo que lo que debo de modificar es solamente en el Create del Form para la aplicación cliente:

php

procedure TdmDatabase.DataModuleCreate(Sender: TObject);
begin
  uniConexion.ProviderName := 'InterBase';
  uniConexion.Server := '192.168.0.105';
  uniConexion.SpecificOptions.Add('InterBase.Charset=UTF8');
  uniConexion.SpecificOptions.Add('InterBase.ClientLibrary=fbclient.dll');
  uniConexion.Database := '192.168.0.105\C:\MiAplicacion\Data\' + NombreBD;
end;

Es correcto lo que estoy haciendo o echo marcha atras?

 

Cuando intente ejecutar me apareció el mensaje de que "no podia conectar con 192.168.0.105"

 

como siempre agradezco su ayuda y tiempo!

[Nikolas]

por aqui hay una solución:

 

http://www.clubdelph...ead.php?t=57235

 

Espero te sirva

[FGarcia]

por aqui hay una solución:

 

http://www.clubdelph...ead.php?t=57235

 

Espero te sirva

 

Si buscando encontre lo del puerto (     mea culpa en un foro de vb)

 

y cambie la sentencia siguiente:

delphi

uniConexion.Database := '192.168.0.105\C:\MiAplicacion\Data\' + NombreBD;
 
Por
 
uniConexion.Database := '192.168.0.105:C:\MiAplicacion\Data\' + NombreBD;

Ya no me da el error de la conexion a la BD sin embargo me aparece otro en el que me dice que "La Base de datos no esta disponible"

 

falta resolver ese  

[enecumene]

Mejor renombra fbclient.dll por gds32.dll.

Saludos.

[Marc]

¿ Has redirigido el puerto 3050 en el router ?. No solo tienes que abrirlo en el firewall sino que además tienes que asegurarte que todas las conexiones que lleguen por este puerto desde el exterior (llegan al router), sean redirigidas al equipo con el servidor Firebird. Tienes que entrar en la configuración de tu router de Internet y añadir esa redirección en el apartado de NAT (Network Address Translation).

 

La dirección IP pública no puede ser 192.168.0.105. Esta es la dirección IP local de tu equipo Firebird en la red local (en cambio 127.0.0.1 es la dirección genérica de localhost que apunta siempre al mismo equipo desde que se lanza). Pero para direccionar un equipo externo tienes que ponerle la dirección pública de tu conexión a Internet.

 

Entra en esta página y te dirá cual es tu IP pública : http://whatismyipaddress.com/

 

Por cierto, si tu conexión a Internet es con IP dinámica (es decir, que varia cada vez que conectas a Internet), entonces en lugar de tener que estar siempre notificando la nueva dirección, es mucho más cómodo utilizar un servicio de DNS dinámico. Como este : http://www.noip.com/

 

Saludos.

[FGarcia]

Gracias Marc.

 

Para evitarme problemas (y no entrar en cosas raras aun)  mientras pruebo todo esto solo hice la conexion Pc = Switch = PC (197.168.0.105 = Switch = 197.168.0.115) , ya no me aparecen mensajes de "No puedo conectar con Host ". Hice ping desde ambas PC y hacia ambas pc y sin problemas, sin embargo al ejecutar la aplicacion cliente me aparece el mensaje de "Database unavailable".

 

Por otro lado la aplicacion cliente esta ejecutamdose en Win XP y la servidora en Win 7 64bits. ¿Algun ajuste necesario?

[Marc]

No, no hay que configurar nada especial para mezclar clientes y servidores a 32 y 64bits. Es independiente de Firebird.

 

Por lo que dices probablemente tengas un firewall bloqueando el puerto 3055 en tu PC servidor (Windows viene con un Firewall personal propio y todos los antivirus suelen venir con otro).

[Delphius]

Por el lado cliente de lo que te tienes que asegurar es de tener la versión correcta de la biblioteca cliente apropiada para la arquitectura. Si es un 32bits, usas el fbclient 32bits y si es 64 el correspondiente. Obviamente, que sea correspondiente a la versión de Firebird que se instala también.

 

El resto es hacer que apunten como señala marc a la IP correcta.

 

Saludos,

[FGarcia]

No, no hay que configurar nada especial para mezclar clientes y servidores a 32 y 64bits. Es independiente de Firebird.

 

Por lo que dices probablemente tengas un firewall bloqueando el puerto 3055 en tu PC servidor (Windows viene con un Firewall personal propio y todos los antivirus suelen venir con otro).

 

¿Puerto 3055? ¿No debería ser 3050?

 

Por otro lado si esta verificado que la versión de fb es la misma en ambas PC. (FB 2.5.3.26778 de 32 bits)

 

Gracias por el interés!

[Delphius]

Puede que se haya sido un desliz de marc. Si, es el 3050 a menos que tu lo configures para que sea otro.

Ojo: los eventos de Firebird, por defecto, se transmiten por otro puerto (que esté libre) asi que si haces uso de esta funcionalidad de Firebird deberás repetir el procedimiento en el router para que el cliente los capture. Lo más sano es configurar Firebird para que los eventos vayan por un puerto que tu designes.

 

Saludos,

[Marc]

¿Puerto 3055? ¿No debería ser 3050?

 

Por otro lado si esta verificado que la versión de fb es la misma en ambas PC. (FB 2.5.3.26778 de 32 bits)

 

Gracias por el interés!

 

Sí, en efecto, el 3050, ¿ en que estaría pensando ?.

 

Por el lado cliente de lo que te tienes que asegurar es de tener la versión correcta de la biblioteca cliente apropiada para la arquitectura. Si es un 32bits, usas el fbclient 32bits y si es 64 el correspondiente. Obviamente, que sea correspondiente a la versión de Firebird que se instala también.

 

El resto es hacer que apunten como señala marc a la IP correcta.

 

Saludos,

 

¿ Es necesario eso ?, yo aún distribuyo el mismo cliente en mi programa (el cliente 32bits con el programa Delphi también de 32bits) y funciona perfectamente en equipos 64bits.

[Rolphy Reyes]

Saludos.

 

@Marc, tal vez en los servidores al instalar la versión de 64bits (siempre y cuando el sistema operativo lo soporte) se le pueda sacar mayor provecho; también contando con una configuración adecuada el Firebird.

[Delphius]

Es cierto que una aplicación 32bits puede ser ejecutada en un 64bits, al menos en Windows. Pero esto no aprovecha adecuadamente los recursos que ofrece. Es más, en un SO Windows 64bits las aplicaciones Windows 32 trabajan ineficientemente. Está documentado esto.

 

Pongo un caso, IBExpert, en la versión que tengo (no he visto los últimos updates) no cuenta con una versión 64bits por lo que debe emplearse la biblioteca a 32bits. Tengo instalado FB 2.5 en 64bits. y si es una pena tener que desaprovechar semejante poder. Los de IBExpert se lamentaban no ofrecer una versión 64bits, decían estar trabajando en mejoras. Eso mismo decían en su FAQ, cuando estaba leyendo sobre si podría trabajar.

Ellos mismos documentaron que debe bajarse la dll32 y apuntar a ésta si se está usando 64bits. Porqué no se... pero por algo será

 

Puede parecer algo minúsculo pero no lo es.

 

Saludos,

[FGarcia]

Un proverbio Zen dice que "La naturaleza del cielo originalmente es clara, a fuerza de mirarlo la vista se oscurece"

 

Pues deje por la paz este proyecto, me dedique a otras cosas y voy a retomarlo porque no he podido hacer que desaparezca ese "database unavailable"

 

Seguro es una tonteria, pero esas son las que mas cuesta encontrar.

 

Saludos !!

[luk2009]

Fgarcia has instalado ibexpert, porque te seria de mucha ayuda para hacer pruebas.
Cuando te aparezcan los errores sera mas facil ayudarte.
Tambien puedes crear una direccion con no-ip o dyndns y darla a algunos de nosotros para intentar conectarnos y ver que error nos da.
Ya luego cambias esa direccion en no-ip o dyndns y listo