Снизить ID у каждой записи на 1

Posted by micher under Delphi

Нужно у каждой записи в MySQL бд снижать ID на -1. Как реализовать?

Yurk@



procedure TForm2.Button1Click(Sender: TObject);

begin

  SQLQuery1.Close;

  SQLQuery1.SQL.Text := 'UPDATE table SET id = id -1 WHERE mod = :mod AND server = :server';

  SQLQuery1.Parameters.ParamByName('mod').Value := mods;

  SQLQuery1.Parameters.ParamByName('server').Value := server;

  SQLQuery1.ExecSQL;

end;

тема на форуме

Последние записи

made in programmersforum 5

Снизить ID у каждой записи на 1

Похожие статьи