Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 30-08-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 27
Caral Va por buen camino
Hola
Aunque el tema ya se contesto aqui, me parece que todavía no te queda claro.
Para hacer un insert en varias tablas es lo mismo que en una.
No importa si están relacionadas o no, esto solo afectara a la hora de relacionar la información, pero para mostrarla, no para insertarla o modificarla.
Ahora, para insertar lo que se necesita es:
1- Tener un query.
2- Hacer una sentencia sql.
3- Grabar la informacion.

El paso 3 se puede hacer, o bien directo, osea que se insertara pero no se veran los resultados en el form o viéndolos, me explico con este comando (ExecSQL) se hace directo y simplemente abriendo el query se hace visible.
Veamos que usa la sentencia sql:
las palabras Instert Into, seguido por el nombre de la tabla, entre paréntesis (Los campos que se quieren insertar de esa tabla) a continuacion la palabra Values y entre parentesis los (datos que quieres insertar).
Veamos un ejemplo:
El Query: Query1
La tabla: Tabla1
Los Campos: Id, Nombre, Apellido.
La Información: Edit1, Edit2, Edit3.
Ahora insertaremos en esa tabla:
Código Delphi [-]
Query1.SQL.Text := 'Insert Into Tabla1 (Id, Nombre, Apellido) '+
                          'Values (' +Edit1.Text+', '+Edit2.Text+', '+Edit3.Text')'
Query1.ExecSQL; // aqui la informacion se graba.
// Si quisieramos ver la informacion en algun dbgrid etc, abriríamos el query directamente, con (Query1.Open) en vez de (Query1.ExecSQL).
Ejemplo de dos o mas tablas:
El Query: Query1 (uno solo)
Las tablas: Tabla1, tabla2
Los Campos: tabla1(Id, Nombre, Apellido), tabla2(Id, telefono1,telefono2).
La Información: Edit1, Edit2, Edit3, Edit4, edit5.
Ahora insertaremos en las tablas:
Código Delphi [-]
// tabla1
Query1.SQL.Text := 'Insert Into Tabla1 (Id, Nombre, Apellido) '+
                          'Values (' +Edit1.Text+', '+Edit2.Text+', '+Edit3.Text')'
Query1.ExecSQL;
// tabla2
Query1.SQL.Text := 'Insert Into Tabla2 (Id, Telefono1, Telefono2) '+
                          'Values (' +Edit1.Text+', '+Edit4.Text+', '+Edit5.Text')'
Query1.ExecSQL;
// y asi sucesivamente.
Como ves el campo ID esta relacionado en las dos tablas y la información esta en el Edit1.
Espero que te quede mas claro y te sirva.
Saludos
__________________
Siempre Novato
Responder Con Cita
 



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
Consultas Múltiples theloren07 Conexión con bases de datos 11 12-07-2007 15:24:32
insercion en ado vroa74 Conexión con bases de datos 1 28-03-2007 00:13:27
insercion en GDB vroa74 Conexión con bases de datos 1 22-03-2007 11:09:39
Multiples instancias Phacko Varios 1 07-09-2004 15:40:25
multiples registros azaagh Conexión con bases de datos 8 10-06-2004 02:45:55


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


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