Update ausführen

[Metallicwar]

[edit] Oder noch einfacher: die Abfrage ganz weglassen und alles im Update-Statement erledigen. Das dürfte auch der performanteste Weg sein. [/edit]
dazu muss ich ja eine neue Query hinzufügen und die bau ich dann einfach in meine Schleife ein. So sollte es gehn, werd ich gleich mal ausprobieren, vorrausgesetzt die VM startet mal

[Metallicwar]

hmn, irgendwas mach ich falsch....

Delphi-Quellcode:

      begin  
        qAkteAnhänge.First;
        for iDatensätze := 0 to qAkteanhänge.RecordCount - 1 do
          begin
            sNeueDatei := qAkteAnhänge.FieldByName('ID_PersonalAkte').AsString + '_' + qAkteanhänge.FieldByName('Dateiname').AsString;
            sAlteDatei := qAkteAnhänge.FieldByName('DateinameSave').AsString;
            RenameFile(sPfadPersonal+sAlteDatei, sPfadPersonal+sNeueDatei);
            qNewAuftrag.SQL.Text := 'UPDATE Auftragakte_Anhaenge SET DateinameSave=' + QuotedStr(sNeueDatei) + 'WHERE DateinameSave=' +QuotedStr(sAlteDatei);
            qNewAuftrag.ExecSQL;
            qAkteAnhänge.Next;
          end;
      end;

der SQL stimmt doch, er soll für jeden Datensatz den alten Dateinamen durch den neuen ersetzen, aber das tut er nicht, in der DB stehn immer noch die selben werte....

[Metallicwar]

kommando zurück!!!!
hab im SQL.Text die falsche Tabelle angegeben. ^^
mal schaun, ich teste jetzte mal und wenns noch irgendwo Probleme geben sollte, melde ich mich.

[DeddyH]

Was ich meinte:

SQL-Code:

UPDATE
  PersonalAkte_Anhaenge
SET
  DateinameSave = CONCAT(ID_PersonalAkte, '_', Dateiname)

Wieso clientseitig erledigen, was auch gleich auf dem Server geschehen könnte?