Script zum Verschieben von Elementen von Ordner A nach Ordner B

Ich hab keine Ahnung, ob es ohne einen Direkten SQL Befehl auch geht.
Aber das war auf die schnelle das einfachste:

program VerschiebeElemente;

var
  quellOrdnerID, zielOrdnerID: Integer;
 

begin
  // Definiere Quell- und Zielordner IDs
  quellOrdnerID := 8203;  // ID von Ordner A
  zielOrdnerID := 8279;   // ID von Ordner B

Database(0). ExecuteSQL('update item_folders set folder='+IntToStr(zielOrdnerID)+' where folder ='+IntToStr(quellOrdnerID));
   SystemLog('fertig.');
end.

Bitte beachte, das ich nicht weiß, welche Nebenwirkungen hier auftreten könnten.

Wo kam eígentlich dein Code her ?
das sieht mir fast nach ChatGPT aus…

1 Like