Einzelnen Beitrag anzeigen

Robert_G
(Gast)

n/a Beiträge
 
#2

Re: Datenbank über Button beschreiben lassen...

  Alt 16. Feb 2004, 10:02
Wenn du in alle Einträge, bei denen "Versuchsfl_Bezeichnung = Versuch" ist, ändern willst:
Delphi-Quellcode:
Var
  ProcessedRecs : Integer;
Begin
  ...
  With ADOQuery1 Do
  Begin
    SQL.Text :=
      'Update dbo_Versuchsflaechen_ST t' + #10 +
      'Set t.Vesuchs_ID = :i_VersFlID' + #10 +
      'WHERE t.Versuchsfl_Bezeichnung = :i_Versuch';
    prepared := True;
    Parameters.ParamByName('i_VersFlID').Value := VersFlID;
    Parameters.ParamByName('i_Versuch').Value := Versuch;
    ProcessedRecs := ExecSQL;
  End;

  MessageDlg(IntToStr(ProcessedRecs) + ' records updated ...', mtInformation, [mbOK], 0);
  ...
End;
  Mit Zitat antworten Zitat