Club Delphi  
    Paypal   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 Buscar Temas de Hoy Marcar Foros Como Leídos

Conexión con bases de datos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 01-07-2008
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 213
Poder: 19
alquimista Va por buen camino
Se pueden tener 2 tablas abiertas a la vez utilizando ADO y DBgrid?

No tengo mucha idea con BD.

Tengo una conexión a una base de datos access (requisito obligado) con ADO.
Utilizo un Datamodule con una conexión ADO (ADOConnection1) un ADOTable1 con una tabla de la base de datos y un DataSource1 que hace referencia a la ADOTable1

En el programa
utilizo para conectar:
Código Delphi [-]
...if JvOpenDialog1.Execute then
   begin
   strOpenNomBD:=JvOpenDialog1.FileName;
   with (legerdb.DataModule10.ADOConnection1) do
      begin
       Connected:=false;
       ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";User ID=Admin;'+
       'Data Source='+strOpenNomBD+';Mode=Share Deny None;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password="";'+
       'Jet OLEDB:Engine Type=5;Jet OLEDBatabase Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";'+
       'Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDBon''t Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False';
       Connected:=true;
       end;
    db.DataModule10.ADOTable1.Active:=true;
   db.DataModule10.ADOTable2.Active:=true;
    db.DataModule10.ADOConnection1.Connected:=true;
    db.DataModule10.ADOTable1.Active :=true;
    db.DataModule10.ADOTable2.Active:=true;
    db.DataModule10.datasource2.Enabled:=true;
    end;



En el programa añado un DBNavigator (botones de edición, etc) un DBgrid y todo va bien.
Ahora bien si utilizo otra tabla (ADOtable2 y Datasource2) y pongo el navegador y DBGrid y me aparecen desactivados los controles de la tabla 2.
En el código los activo etc...
¿Ya he dicho que no estoy muy puesto con Base de datos ?
¿Que estoy haciendo mal?

Saludos.

Última edición por alquimista fecha: 01-07-2008 a las 15:22:33. Razón: para cambiar código
Responder Con Cita
  #2  
Antiguo 01-07-2008
Avatar de eduarcol
[eduarcol] eduarcol is offline
Miembro Premium
 
Registrado: ago 2003
Ubicación: En los estados Zulia y Merida de Venezuela
Posts: 4.151
Poder: 27
eduarcol Va por buen camino
y estas seguro que estas abriendo (.Active := True) la segunda tabla
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
Responder Con Cita
  #3  
Antiguo 01-07-2008
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 213
Poder: 19
alquimista Va por buen camino
Si ya he probado a ponerlo active,tanto en el componente como en el código. Sólo que al hacer pruebas y recompilar los he puesto como comentario. (ya cambio el código anterior)
¿La pregunta es que si se pueden abrir todas las tablas que se quiera a la vez con ADO? o será necesario utilizar otro método y como?

Última edición por alquimista fecha: 01-07-2008 a las 15:23:45.
Responder Con Cita
  #4  
Antiguo 01-07-2008
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 24
Caro Va por buen camino
Hola alquimista, puedes abrir todas las tablas que quieras con AdoTable, como estas haciendo AdoTable.Active := True; lo que te entiendo es que quieres mostrar cada uno, con un dbgrid y un dbNavigator diferentes por tabla, entonces necesitas un dataSource por cada AdoTable y lo enlazas a su respectivo dbGrid y dbNavigator en su propiedad DatSource de ambos.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #5  
Antiguo 01-07-2008
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 213
Poder: 19
alquimista Va por buen camino
Eso es lo que estoy haciendo y no se por que no se me activan dos tablas a la vez.
Delphi 2006, Windows XP SP3, Access creado en versión 2007 pero grabado en formato 2003 (*.mdb) sin relaciones ningunas y campos de texto y número. Lo curioso que en el IDE si que se activa el DBGRID y aparecen los valores metidos y en runtime aparece como desactivada una de las dos tablas. Las activo al crear el form principal.
Gracias...
Responder Con Cita
  #6  
Antiguo 01-07-2008
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 213
Poder: 19
alquimista Va por buen camino
Thumbs up

Solucionado...
Se me quedo el código anterior fuera del formcreate y no me di cuenta.

Activado todo y funciona Ok.

Gracias por las respuestas ya que me han llevado a la solución de que algo había hecho mal.

Gracias
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como utilizr tablas parados sin tener a delphi instalado kurono Varios 3 04-04-2008 22:22:07
¿Pueden tener disparadores (triggers) las vistas “Union”? Al González Firebird e Interbase 1 19-05-2006 22:29:26
Como agilizar actualizacion de tablas desde la red utilizando delphi, sql, dbaseIV Silviña Conexión con bases de datos 3 19-05-2004 17:23:10
Tablas Abiertas Ulises Providers 2 02-03-2004 12:50:23


La franja horaria es GMT +2. Ahora son las 21:57:15.


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