Einzelnen Beitrag anzeigen

Freiwilderer

Registriert seit: 26. Mai 2009
163 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Elegante Abfrage mit JOIN

  Alt 22. Jul 2009, 14:12
hi,
ich bin nich ganz sicher, dass ich das problem richtig verstanden habe ... aber wenn ich das lösen müsste, so, wie ich glaube, dass du das meinst würde ich die id einfach in ne lokale variable packen ... oder gibts dabei n problem ?

etwa so:

Delphi-Quellcode:
var
AktuelleID : Integer;
// Existiert die Population in der Datenbank?
      sql := 'SELECT id FROM populations WHERE continent = '+QuotedStr(cont)+' AND popgroup = '+QuotedStr(pop);
      sql_result := frmMain.Database.Query(sql);

      AktuelleID := sql.fieldbyname('id').asInteger;

      if (frmMain.Database.NumRows(sql_result) = 0) then
      begin
        // Population der Datenbank hinzufügen
        sql := 'INSERT INTO populations (continent, popgroup) VALUES ('+QuotedStr(cont)+', '+QuotedStr(pop)+')';
        frmMain.Database.Query(sql);

        sql := 'SELECT id FROM populations WHERE id = LAST_INSERT_ID()';
        sql_result := frmMain.Database.Query(sql);
        AktuelleID := sql.fieldbyname('id').asInteger;
      end;

      pop_id := StrToInt(frmMain.Database.FetchRow(sql_result)[0]);
      irgendwas := AktuelleID;
oder, was spricht dagegen ?

mfg
  Mit Zitat antworten Zitat