Bonsoir,
J'ai un probleme d'insertion dans une table.Je m'explique :
j'ai deux table a savoir chambre et reservation. Je veux inserer quelques donnees de la table chambre dans la table reservation.Pour cela j'ai voulu passer passer par une requete mais qui ne marche pas.
Voici la procedure :
procedure Tchamb_dispo.BitBtn5Click(Sender: TObject);
Var idchambre:integer;
ddd,ddf : TDateTime;
begin
idchambre:=Grille.DataSource.DataSet.FieldbyName('IDCHAMBRE_SERVI').AsInteger ;
ddd := Grille.DataSource.DataSet.FieldbyName('DATED').AsDateTime;
ddf := Grille.DataSource.DataSet.FieldbyName('DATEF').AsDateTime
with DMReserv.IBQReserv do
begin
SQL.Clear;
SQL.Add('insert into RESERVATION (DATEDR, DATEFR, IDRESERVATION) values (SELECT :DD, :DF,:IDC FROM CHAMBRE)');
ParamByName('DD').AsDate := ddd;
ParamByName('DF').AsDate := ddf;
ParamByName('IDC').AsInteger :=idchambre;
ExecSQL;
end;
end;
je demande de l'aide pour mener a bien mon travail
Cordialement!