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 26-06-2005
(VIH)Lestat (VIH)Lestat is offline
Miembro
 
Registrado: abr 2005
Posts: 95
Poder: 20
(VIH)Lestat Va por buen camino
Busque el Meoyo del asunto compadre... jajajaajaa ya lo tengo logre resolver mi problema....

El codigo quedo de la siguiente manera:

Código:
//Se pasan los parametros a los Querys
 
 		ModuloSID.IBQuery1.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery1.Params[1].AsString:=apellidopa;
 		ModuloSID.IBQuery1.Params[2].AsString:=apellidoma;
 		ModuloSID.IBQuery1.Params[3].AsString:=Nombre;
 		ModuloSID.IBQuery1.Params[4].AsString:=Sex;
 		ModuloSID.IBQuery1.Params[5].AsString:=Dir;
 		ModuloSID.IBQuery1.Params[6].AsString:=Local;
 		ModuloSID.IBQuery1.Params[7].AsString:=ciud;
 		ModuloSID.IBQuery1.Params[8].AsString:=Tele;
 		ModuloSID.IBQuery1.Params[9].Value:=fecha_ing;
 		ModuloSID.IBQuery1.Params[10].AsString:=statu;
 		ModuloSID.IBQuery1.Params[11].AsBlob:=imagen;
 		MOduloSID.IBQuery1.Params[12].AsString:=edoc;
 
 
 		ModuloSID.IBQuery2.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery2.Params[1].AsString:=carrera;
 
 		ModuloSID.IBQuery3.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery3.Params[1].AsInteger:=sem;
 
 		ModuloSID.IBQuery4.Params[0].AsString:=dni_a;
 		ModuloSID.IBQuery4.Params[1].AsInteger:=cert;
 		ModuloSID.IBQuery4.Params[2].AsInteger:=act;
 		ModuloSID.IBQuery4.Params[3].AsInteger:=fot;
 		ModuloSID.IBQuery4.Params[4].AsInteger:=cur;
 
 		//Se ejecuta los Querys del 1 al 4 para almacenar datos
 
 		  ModuloSID.IBQuery1.ExecSQL;
 		  ModuloSID.IBQuery2.ExecSQL;
 		  ModuloSID.IBQuery3.ExecSQL;
 		  ModuloSid.IBQuery4.ExecSQL;
 
 	   //Se abren y cierran las tablas para actualizar sus valores
 
 		MOduloSID.IBTalum_doc.Close;
 		ModuloSID.IBTalum_doc.Open;
 
 		ModuloSID.IBTalumnos.Close;
 		ModuloSID.IBTalumnos.Open;
 
 		ModuloSID.IBTalumno_carrera.Open;
 		ModuloSID.IBTalumno_carrera.Close;
 
 		ModuloSID.IBTsemestre.Close;
 		ModuloSID.IBTsemestre.Open;
como pueden darse cuenta el valor de la dni del alumno no me lo almacenaba en las demas tablas porque primero se ejecutaba el QUery 1 y luego se cerraban y abrian las tablas para actualizar los datos,, y por eso ya no me dejaba pasarle de nuevo el parametro a los demas querys.. y como pueden estas sentencias las deje de ultimo para que todos los parametros se pasen correctamente....

jajajaaj un poco complicado ... pero no imposible... verdad???

GRax a todos por su ayuda.....
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 21:18:03.


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