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 18-08-2017
ClaraMaria ClaraMaria is offline
Miembro
NULL
 
Registrado: ago 2017
Posts: 22
Poder: 0
ClaraMaria Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
Tengo una versión de ibexpert que no tiene la opción de importar datos.
¿Y cuál es el problema?

Es un programa distinto.

Un bucle donde recorres el fichero de texto y vas leyendo línea a línea. Cada línea la procesas y guardas en la base de datos. Pasas a la siguiente línea... hasta que no queden más.
Entiendo haber yo cuando ingreso los clientes de inscripción tengo que llenar estos campos.

Cita:
Fecha Contrato (Edit Automatico, Muestra la fecha actual primero y se puede cambiar la fecha manual)
TIPO PERSONA (Combobox)
Documento Identificacion (Combobox)
Apellido Paterno (Edit)
Apellido Materno (Edit)
Primer Nombre (Edit)
Segundo Nombre (Edit)
Estado Civil (Comobobox)
Zona (Combobox)
Departamento (Combobox)
Provincia (Combobox)
Distrito (Combobox)
Lugar (Combobox)
Referencia (Edit)
lo que estoy pensando hacer es crear en delphi un form igual con esos datos y lo que quiero saber es si puedo conectar todos esos campos con la tabla de excel o Access y a la vez con mi base de datos interbase (Ibexpert) y como dice usted hacer un bucle en donde tome toda la informacion de esos campos de la tabla en excel y pasar a la tabla existente de la base de datos sin necesidad de estar escribiendo esos campos con un boton de crear
Pienso poner estos campos.

Cita:
Fecha Contrato (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD
TIPO PERSONA (dblookupCombobox)
Documento Identificacion (dblookupCombobox)
Apellido Paterno (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD
Apellido Materno (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD
Primer Nombre (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD
Segundo Nombre (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD
Estado Civil (dblookupcombobox)
Zona (en donde vive) (dblookupCombobox)
Departamento (dblookupCombobox)
Provincia (dblookupCombobox)
Distrito (dblookupCombobox)
Lugar (dblookupCombobox)
Referencia (Edit) no se puede conectar a base de datos o (DBEdit) que si se puede conectar a BD

Última edición por ClaraMaria fecha: 18-08-2017 a las 00:27:27.
Responder Con Cita
  #2  
Antiguo 18-08-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cada vez lo complicas y nos confundes más. Yo ya no entiendo lo que tienes, lo que quieres, lo que necesitas, ni nada...
Responder Con Cita
  #3  
Antiguo 18-08-2017
ClaraMaria ClaraMaria is offline
Miembro
NULL
 
Registrado: ago 2017
Posts: 22
Poder: 0
ClaraMaria Va por buen camino
Cita:
Empezado por Casimiro Notevi Ver Mensaje
Cada vez lo complicas y nos confundes más. Yo ya no entiendo lo que tienes, lo que quieres, lo que necesitas, ni nada...
Disculpen por todas las confusiones y por molestar mucho o por ser un poco pesada.
Bueno le explico al usar varias formas de importar no me funciono entonces opte por una aplicación en delphi okey, el sistema que uso para llenar los clientes a la base de datos tiene estos campos en lo cual se pone todos la informacion
Cita:
Nombre:Fecha Contrato / (Tipo del campo es un Edit) Este Edit muestra la fecha actual como default pero también se puede editar a cualquier fecha
Nombre:Tipo Persona / (Tipo del campo es un Combobox)
Nombre: Documento Identificación / (Tipo del campo es un Combobox)
Nombre: Apellido Paterno / (Tipo del campo es un Edit)
Nombre:Apellido Materno / (Tipo del campo es un Edit)
Nombre:Primer Nombre / (Tipo del campo es un Edit)
Nombre:Segundo Nombre / (Tipo del campo es un Edit)
Nombre:Estado Civil / (Tipo del campo es un Combobox)
Nombre:Zona / (Tipo del campo es un Combobox)
Nombre:Departamento / (Tipo del campo es un Combobox)
Nombre:Provincia / (Tipo del campo es un Combobox)
Nombre:Distrito / (Tipo del campo es un Combobox)
Nombre:Lugar / (Tipo del campo es un Combobox)
Nombre:Referencia / (Tipo del campo es un Edit)
Ahora en la tabla de Excel o Access tengo también los mismos campos con toda la informacion que quiero pasar a la tabla de mi base de datos que ya existe, entonces estoy pensando crear los mismos campos para que el bucle que usted me dice haga la función de cojer todos esos campos de la tabla de (Excel o Access) y lo pase a la tabla que ya existe en la base de datos. (cada campo que esta en Excel o Access con su respectivo campo de los componentes ya mencionados).
Ejemplo:
Los datos de la Tabla de Excel o Access que tiene los campos Apellido Paterno, Apellido Materno, Nombre haga la función de registrar en el mismo campo que tiene la Aplicación para que cuando pase a la base de datos (interbase-Ibexpert) se registre en el campo que corresponde igual que los demás campos.
Nota:
Para eso también se estaría conectando ADOConnection a Excel o Access y IBDatabase a interbase de esa forma primero se lee los datos que estan en (excel o Access) y pasarlos a la base de datos de interbase que también esta conectado.
Responder Con Cita
  #4  
Antiguo 18-08-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Desde Delphi puedes leer directamente la hoja de cálculo, y guardar la información en la base de datos.
Desde Delphi puedes leer un fichero de texto que hayas exportado desde la hoja de cálculo.
Con IBexpert puedes leer un fichero de texto que hayas exportado desde la hoja de cálculo (mi vieja versión de ibexpert no tiene esa opción).

Lo de Access no tengo ni idea para qué lo usas, es un paso intermedio inútil y pérdida de tiempo.

Última edición por Casimiro Notevi fecha: 18-08-2017 a las 22:46:42.
Responder Con Cita
  #5  
Antiguo 18-08-2017
ClaraMaria ClaraMaria is offline
Miembro
NULL
 
Registrado: ago 2017
Posts: 22
Poder: 0
ClaraMaria Va por buen camino
Buenas tardes nuevamente, mire los datos que tenia en Excel los pase a ibexpert pero en una tabla nueva (Clientes2), entonces lo que hice fue crear una aplicación con esos campos y para que se muestre los datos en la aplicación he utilizado IBDatabase1, IbTransaction1 para la conexión y ademas (IBQuery1, DataSetProvider1, ClientDataSet1 y DataSource1) de esta manera los datos que están en la tabla nueva clientes 2 ya se pueden visualizar en la aplicación, ahora lo que quiero es como puedo hacer para que cuando la aplicación cumpla la función de guardar, lo pueda guardar en mi tabla existente que se llama Clientes1.

Estaba pensando algo así como este código
Código Delphi [-]
procedure TMantenimientodeClientes.GrabarClick(Sender: TObject);
begin
   DataModule1.ClientDataSet1.ApplyUpdates (0);
end;

end.

pero eso creo que lo guardaría en el mismo lugar donde esta supongo, y lo que quiero es pasar a mi tabla existente nose si se pueda darle una ubicación en el código hacia la tabla en donde quiero que se guarde.
Responder Con Cita
  #6  
Antiguo 18-08-2017
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.057
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Sigues con las preguntas ambiguas, nosotros no vemos ni sabemos cómo es tu aplicación, lo que hace o lo que muestra.
Pero parece que das a entender que has importado los datos de la hoja de cálculo a una tabla de tu base de datos.
Si es así, entonces lo que tienes que hacer es pasarlos a la otra tabla.
Si las tablas son iguales:
Código SQL [-]
insert into tabla2 select * from tabla1
Si no son iguales:
Código SQL [-]
insert into tabla2 (campo1,campo2,campo3,...) values (select campo1,campo2,campo3,... from tabla1)
La sintaxis dependerá del nombre de tus tablas y campos.
Responder Con Cita
  #7  
Antiguo 18-08-2017
ClaraMaria ClaraMaria is offline
Miembro
NULL
 
Registrado: ago 2017
Posts: 22
Poder: 0
ClaraMaria Va por buen camino
El problema esta que la tabla existente esta enlazada a otras 3 tablas mas y cuando se ingresa los registros manualmente y damos guardar automáticamente se crean en las 3 tablas, es por eso para no hacer muchos problemas decidí en crear las mismas tablas en una aplicacion con todos los campos iguales usando estos componentes (IBDatabase1, IbTransaction1 para la conexión y ademas (IBQuery1, DataSetProvider1, ClientDataSet1 y DataSource1) ahora todos los campos que puse en la aplicacion son estos:
Cita:
Nombre:Fecha Contrato / (Tipo del campo es un Edit) Este Edit muestra la fecha actual como default pero también se puede editar a cualquier fecha
Nombre:Tipo Persona / (Tipo del campo es un Combobox)
Nombre: Documento Identificación / (Tipo del campo es un Combobox)
Nombre: Apellido Paterno / (Tipo del campo es un Edit)
Nombre:Apellido Materno / (Tipo del campo es un Edit)
Nombre:Primer Nombre / (Tipo del campo es un Edit)
Nombre:Segundo Nombre / (Tipo del campo es un Edit)
Nombre:Estado Civil / (Tipo del campo es un Combobox)
Nombre:Zona / (Tipo del campo es un Combobox)
Nombreepartamento / (Tipo del campo es un Combobox)
Nombre:Provincia / (Tipo del campo es un Combobox)
Nombreistrito / (Tipo del campo es un Combobox)
Nombre:Lugar / (Tipo del campo es un Combobox)
Nombre:Referencia / (Tipo del campo es un Edit)
entonces al tener todos esos campos enlazados a (IBQuery1, DataSetProvider1, ClientDataSet1 y DataSource1) con el codigo
Cita:
procedure TMantenimientodeClientes.GrabarClick(Sender: TObject);
begin
DataModule1.ClientDataSet1.ApplyUpdates (0);
end;

end.
hago que se registre nuevamente pero en la tabla existente de esa forma en las otras 3 tablas que están enlazadas también se registrara pero el unico problema es en estos campos
Cita:
Nombre:Fecha Contrato
Nombre: Numero de Documento Identificación
Nombre: Apellido Paterno
Nombre:Apellido Materno
Nombre:Primer Nombre
Nombre:Segundo Nombre
Nombre:Referencia
que están en la tabla clientes 2 y al usar el codigo de arriba DataModule1.ClientDataSet1.ApplyUpdates (0); me lo volverá registrar en esa misma tabla clientes 2, en este caso como puedo decirle al código que estos campos de la tabla clientes 2 me lo vuelva a registrar pero en clientes 1 con el siguiente codigo
Código Delphi [-]
DataModule1.ClientDataSet1.ApplyUpdates (0);
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

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Importar datos de excel a una DBGRID Soa Pelaez Varios 2 22-03-2016 13:02:40
Importar datos de Excel a un StringGrid. ingabraham Varios 4 19-06-2011 00:49:00
Importar datos de txt. y excel a paradox ledesma78 Conexión con bases de datos 1 09-08-2010 11:06:49
importar datos de excel a mi aplicacion squenda Varios 2 11-12-2003 03:33:32
Importar de Excel a InterBase Kompac Firebird e Interbase 3 16-05-2003 14:24:23


La franja horaria es GMT +2. Ahora son las 07:20:29.


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