Ir al contenido


Foto

Error de conexion


  • Por favor identifícate para responder
10 respuestas en este tema

#1 VANE

VANE

    Newbie

  • Miembros
  • Pip
  • 5 mensajes

Escrito 23 marzo 2013 - 09:41

:grin: ayuda con este error me aparece al intentar hacet conexion:
he seguido los pasos que tienen aqui para novatos usando firebird y Delphi.

Unable to complete network request to host "localhost".
faied to locate host machine.
Undefined service gds_db/tcp

He buscado de todo por la web y nada me funciona
  • 0

#2 Fenareth

Fenareth

    Advanced Member

  • Administrador
  • 3.486 mensajes
  • LocationMexico City

Escrito 23 marzo 2013 - 10:37

Hola amiga VANE, bienvenida a DelphiAccess...

Pregunta, con qué estás tratando de conectarte a la base de datos ???

Mientras me contestas intenta colocar ésta IP de conexión en lugar de localhost: 127.0.0.1

Cuéntanos tus resultados (y)

Saludox ! :)
  • 0

#3 VANE

VANE

    Newbie

  • Miembros
  • Pip
  • 5 mensajes

Escrito 23 marzo 2013 - 10:50

CON FIREBIRD intente cambiando la direccion ip pero me tira igual el mismo error :cry:


  • 0

#4 VANE

VANE

    Newbie

  • Miembros
  • Pip
  • 5 mensajes

Escrito 23 marzo 2013 - 11:00

El gestor de BD que estoy usando es  IBExpert

www.delphiaccess.com/forum/tutoriales/tutorial-(como-empezar-con-firebird)-para-novatos/

  • 0

#5 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.446 mensajes
  • LocationMéxico

Escrito 23 marzo 2013 - 11:15

Hola VANE

Tienes que agregar en el archivo services que se encuentra en Windows\System32\Drivers\etc la siguiente línea

gds_db          3050/tcp                          #Firebird



Saludos
  • 0

#6 VANE

VANE

    Newbie

  • Miembros
  • Pip
  • 5 mensajes

Escrito 23 marzo 2013 - 11:30

Lo habro con notepad e ingreso la linea al final del codigo pero cuando intento guardar el cambio me dice "imposible guardar el archivo esta abierto por otro programa" como lo resuelvo?
  • 0

#7 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.446 mensajes
  • LocationMéxico

Escrito 23 marzo 2013 - 11:35

Lo habro con notepad e ingreso la linea al final del codigo pero cuando intento guardar el cambio me dice "imposible guardar el archivo esta abierto por otro programa" como lo resuelvo?


Si estás usando Windows Vista ó Windows 7 ejecuta notepad como administrador (boton derecho) y después abre el archivo services.

Saludos
  • 0

#8 VANE

VANE

    Newbie

  • Miembros
  • Pip
  • 5 mensajes

Escrito 23 marzo 2013 - 11:43

si estoy usando win7 y ejecuto como administrador pero aun me sigue diciendo "imposible guardar el archivo esta abierto por otro programa"
  • 0

#9 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.446 mensajes
  • LocationMéxico

Escrito 23 marzo 2013 - 11:48

si estoy usando win7 y ejecuto como administrador pero aun me sigue diciendo "imposible guardar el archivo esta abierto por otro programa"


Acabo de modificar ese archivo sin problema, lo que hice fué,

- boton derecho en notepad,
- clic en ejecutar como administrador
- abro el archivo services
- modifico y guardo archivo


Si te sigue mostrando el error de que está siendo usado por otro programa, cierra tu delphi.

Saludos
  • 0

#10 genyus00

genyus00

    Advanced Member

  • Miembros
  • PipPipPip
  • 52 mensajes
  • LocationBogota

Escrito 01 diciembre 2022 - 02:28

Buenas. El dia de hoy me tope con este error el Delphi 11, asi que les comparto mi solucion despues de tanto buscar y buscar:

Todo iba bien hasta que por algun motivo copie en la ruta del . exe la libreria gds32.dll, alli todo dejo de funcionar y empezo el 

viacrusis,  hasta que encontre esta sugerencia: "Si ves este mensaje (la conexión fue rechazada por la interface remota) la consecuencia

es que el usuario no puede conectarse a la Base de Datos. Un posible motivo es que está usando un cliente de InterBase en lugar de usar

un cliente de Firebird." 

 

Automaticamente error de capa 9 : Error generado entre la silla y el teclado!

 

Solucion:

 

Quitar la gds32.dll de la ruta de mi . exe y santo remedio, pero como mi aplicacion al final es una dll que corre en IIS

 y como uso los componente de FireDac, la misma ISAPI pide al subirla a IIS la adicion de un componente

"TFDPhysFBDriverLinkal proyecto. Entonces se puede adicionar el componente o crearlo en tiempo de ejecucion,

en mi caso asigno los parametros al FDConecction de la siguiente forma y creo el objeto DriverLink de Firebird y por las dudas

dejo en la ruta de mi .exe la libreria fbcliente.dll. asi:


delphi
  1. function TDatabase.OpenFirebird(var ExtError: string): Boolean;
  2. const
  3. NombreMetodo = 'OpenFirebird';
  4. begin
  5. if ModoDebug then
  6. AnadeLog(tlInformacion, 'Iniciando ' + NombreMetodo + ' de ' + ClassName);
  7.  
  8. try
  9. with FconConexion do
  10. begin
  11. Result := TRUE;
  12. Params.Clear;
  13. Params.Add('DriverID=FB');
  14. Params.Add('Server=' + strServidorBase);
  15. Params.Add('Database=' + strNombreBase);
  16. Params.Add('User_Name=' + strUsuarioBase);
  17. Params.Add('Password=' + strClaveBase);
  18. Params.Add('CharacterSet=' + strCharset);
  19. Params.Add('RoleName=' + strRoleName);
  20. Params.Add('BlobSize=-1');
  21. Params.Add('CommitRetain=0');
  22. Params.Add('ErrorResourceFile=');
  23. Params.Add('LocaleCode=0000');
  24. Params.Add('SQLDialect=3');
  25. Params.Add('ITransIsolation=ReadCommited');
  26. Params.Add('WaitOnLocks=1');
  27. Params.Add('Trim Char=False');
  28. Params.Add('Protocol='+ GetEnumName(TypeInfo(TProtocolos), intProtocolo));
  29. //Params.Add('MonitorBy=Remote');
  30.  
  31. if FDriverLink<>nil then
  32. FDriverLink.Release;
  33.  
  34. FDriverLink := TFDPhysFBDriverLink.Create(GloParentComponent);
  35. FDriverLink.VendorLib := GetCurrentDir + '\fbclient.dll';
  36.  
  37. LoginPrompt := False;
  38. Connected := True;
  39. end;
  40. except
  41. on E: Exception do
  42. begin
  43. Result := FALSE;
  44. ExtError := E.Message;
  45. AnadeLog(tlError, 'Error ejecutando ' + NombreMetodo + ' de ' + ClassName + '. ERROR: ' + E.Message);
  46. if MostrarExceptiones then
  47. raise;
  48. end;
  49. end;
  50. end; 

Espero poder ayudar a cerrar este tema y que la solucion les ayude en algo.


Editado por genyus00, 01 diciembre 2022 - 02:32 .

  • 1

#11 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.446 mensajes
  • LocationMéxico

Escrito 01 diciembre 2022 - 08:40

Excelente aporte amigo genyus00

 

A muchos les va a ser de gran utilidad.

 

(b)

 

Saludos


  • 0




IP.Board spam blocked by CleanTalk.