Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Conexión con bases de datos
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 20-06-2005
jordan23 jordan23 is offline
Miembro
 
Registrado: jun 2005
Posts: 21
Poder: 0
jordan23 Va por buen camino
Ayuda con Interbase via remota

Ok comunidad, este es el escenario, estoy haciendo pruebas con Interbase de manera Remota, es decir, instale el servidor de Interbase en una maquina y la conexion la hice sin dificultad, ahora quiero hacer pruebas desde otra maquina que esta en otra ciudad con la cual tenemos obviamente enlace, que pasos tengo que seguir para realizar una prueba, segun yo:

1. Tengo que instalar el cliente de interbase en dicha maquina
2. Tengo que crear un alias en el BDE en dicha maquina (aqui es donde tengo la mayor de las dudas, como configuro el alias???)
3. Hacer un programa prueba


Podrian orientarme???. Se los agradecere.
Responder Con Cita
  #2  
Antiguo 20-06-2005
jordan23 jordan23 is offline
Miembro
 
Registrado: jun 2005
Posts: 21
Poder: 0
jordan23 Va por buen camino
Se me olvido comentarles la plataforma

Red Novell 5(se que no se puede instalar el servidor de Interbase, por eso lo instale en una maquina conectada a la Red, que tiene Win 98)

Interbase 6
Delphi 4
Responder Con Cita
  #3  
Antiguo 21-06-2005
jordan23 jordan23 is offline
Miembro
 
Registrado: jun 2005
Posts: 21
Poder: 0
jordan23 Va por buen camino
Ok, ya puedo ver el servidor desde una maquina cliente en la cual NO se haya el servidor, la puedo ver desde el BDE, pero a la hora de accesar la aplicación en el cliente me dice algo como "su login no esta dado de alta en la base de datos contacte al administrador", no se si dentro del servidor tengo que dar de alta la dirección IP como en MySQL, o que tengo que hacer??? cabe señalar que este error no se da si corro la aplicación en la maquina donde se haya el servidor.
Responder Con Cita
  #4  
Antiguo 22-06-2005
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
Primero, para Interbase, te recomiendo que uses los componentes IBX, que ya vienen incluidos en Delphi.

Segúndo, cuando te conectas a un servidor de Interbase, tienes que proporcionar un usuario y contraseña, Interbase tiene a SYSDBA como administrador y la contraseña predeterminada es masterkey (la cual te recomiendo cambiar).

Espero que esto te ayude en algo...


Saludos...
Responder Con Cita
  #5  
Antiguo 22-06-2005
Avatar de AGAG4
AGAG4 AGAG4 is offline
Miembro
 
Registrado: ago 2004
Ubicación: Los Mochis, Sinaloa, México
Posts: 1.420
Poder: 21
AGAG4 Va por buen camino
checa esto....

Si tienes algún Router, tienes que direccionar el Puerto 3050 de Interbase a la PC que esta como Servidor....

Saludos.
Responder Con Cita
  #6  
Antiguo 22-06-2005
jordan23 jordan23 is offline
Miembro
 
Registrado: jun 2005
Posts: 21
Poder: 0
jordan23 Va por buen camino
Antes que nada gracias por sus comentarios.
Para AGAG4 lo ultimo que me dices, como lo hago??? perdon pero soy novato.

Para Maeyanes los componentes IBX no vienen en Delphi 4, ya instale los FreeIB que creo que son los antecesores de IBX y ya pude acceder, a esta hora mi problema es que no puedo hacer inserts, tengo el siguiente código

Código:
		with FIBQuery1 do
		begin
			Close;
			SQL.Clear;
			SQL.Add('INSERT INTO Insumos (cod_insumo, desc_insumo)');
		    SQL.Add('VALUES ('''+edCodigo.Text+''','''+edDescrip.Text+''') ');
			ExecQuery;
		end;
No me marca ningun error, y pareciera que si lo hace, pero acceso a la base y no esta el registro, que podrá ser???
Responder Con Cita
  #7  
Antiguo 22-06-2005
[maeyanes] maeyanes is offline
Capo de los Capos
 
Registrado: may 2003
Ubicación: Campeche, México
Posts: 2.732
Poder: 24
maeyanes Va por buen camino
El problema puede estar en la transacción...

Me imagino que pusiste un componente FIBDatabase y un FIBTransaction, entonces, puedes intentar algo como:

Código Delphi [-]
FIBTransaction.StartTransaction; // Inicias la transacción
try
  with FIBQuery1 do
    begin
      Close;
      SQL.Clear;
      SQL.Add('INSERT INTO Insumos (cod_insumo, desc_insumo)');
      SQL.Add('VALUES (' + QuotedStr(edCodigo.Text) + ',' + QuotedStr(edDescrip.Text) + ') ');
      ExecQuery;
      FIBTransaction.Commit // Luego de insertar el registro, haces commit
    end
except
  FIBTransaction.Rollback;  // Si hay algún error, deshechas la transacción
  raise
end;
Responder Con Cita
  #8  
Antiguo 22-06-2005
jordan23 jordan23 is offline
Miembro
 
Registrado: jun 2005
Posts: 21
Poder: 0
jordan23 Va por buen camino
Perfecto Maeyanes, funciono, te agradezco mucho.
Responder Con Cita
Respuesta



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 14:17:35.


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