Ver Mensaje Individual
  #22  
Antiguo 08-02-2010
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola
A ver si a la fuerza.
Código Delphi [-]
// recorre la tabla en el query1 y hace el primer update
datam.Query1.First;
   while not datam.Query1.Eof do  
   begin
   datam.Query2. sql.Text := 'Update 20092 set practica = '+datam.Query1Practica.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);
   datam.Query2.ExecSQL;
   datam.Query1 .Next; 
   end;
// recorre la tabla en el query1 y hace el segundo update
datam.Query1.First;
   while not datam.Query1.Eof do   
   begin
   datam.Query2.SQL.Text := 'Update 20092 set parciales = '+datam.Query1Parciales.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);
   datam.Query2.ExecSQL;
   datam.Query1 .Next;
   end;
// recorre la tabla en el query1 y hace el tercer update
while not datam.Query1.Eof do   
   begin
   datam.Query2.SQL.Text := 'Update 20092 set calf_final = '+datam.Query1calif_final.AsString+' where matricula = '+QuotedStr(datam.Query1matricula.AsString);
   datam.Query2.ExecSQL; 
   datam.Query1 .Next; 
   end;
Haces tres update de la tabla independientemente.
Saludos
PD: MACO?????......
__________________
Siempre Novato
Responder Con Cita