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 26-06-2005
(VIH)Lestat (VIH)Lestat is offline
Miembro
 
Registrado: abr 2005
Posts: 95
Poder: 22
(VIH)Lestat Va por buen camino
oye para el MODULOSID.IBQuery1 si mostro los valores tal y como los tienen las variables, guardo el dni del alumno ... pero en el query2 ya no almacena el dni del alumno pero la variable aparece que si lo tiene... pero por que paso esto ??? a que se debe... me puedes explicar???
Responder Con Cita
  #2  
Antiguo 26-06-2005
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Poder: 26
vtdeleon Va por buen camino
A qeu se debe? Ni la menor idea :-/
Sigamos probando, tarde o temprano llegaremos al Ki del asunto

En el query2, en vez de utilizar la variable para asignarle el string, pon una cadena String directamente 'algo' o matricula.Text y chequea si el param lo acepta
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita
  #3  
Antiguo 26-06-2005
(VIH)Lestat (VIH)Lestat is offline
Miembro
 
Registrado: abr 2005
Posts: 95
Poder: 22
(VIH)Lestat Va por buen camino
no lo acepta... y ya intente jalar el dato desde esta para el query 2 instruccion
Código:
IBTalumnos.FieldByName('dni').AsString
pero todavia no ha guardado el valor en la tabla.... y que otra cosa me puedes sugerir para poder solucionarlo...
Responder Con Cita
  #4  
Antiguo 26-06-2005
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Poder: 26
vtdeleon Va por buen camino
Pon un boton y un Nuevo Query en el formulario, llamemoslo IBPrueba.
Con la misma sentencia
Código SQL [-]
insert into alumnos_carrera
 values (:dni,:dnicarrera);
Código Delphi [-]
Procedure OnclickBoton(..);
begin
  ibprueba.parambyname('dni').asstring:='0001';//o lo que sea
  showmessage( ibprueba.parambyname('dni').asstring);
  ibprueba.parambyname('dnicarrera').asstring:='PLATANERO';//:-p
  ibprueba.execsql;
end;
Suerte
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita
  #5  
Antiguo 26-06-2005
(VIH)Lestat (VIH)Lestat is offline
Miembro
 
Registrado: abr 2005
Posts: 95
Poder: 22
(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


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


La franja horaria es GMT +2. Ahora son las 21:52:41.


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