VPF::Перезапись поля во всех строках таблицы Бд

MMihan

Дата 10.6.2012, 16:31 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 8.12.2011

Репутация: нет
Всего: нет

Добрый день как реализовать Перезапись одного поля 'N'- Тип поля числовой , Бд access,
во всех строках БД
если делаю ADOQuery то ссылается на неверный тип данных..
если через AdoTable то просто переходит на последнюю строку

есть Заявки с номерами 1 2 3 4 5 итд. удаляем заявку с номером 3 получается 1 2 4 5 нужно сделать 1 2 3 4

Код




procedure TMainForm.Button1Click(Sender: TObject);
 
  var m:integer;
begin
  ADOQuery1.Close;
 
  ADOQuery1.Open;
  while ADOQuery1.Eof do
begin
 
  m:=m+ADOQuery1.FieldByName('N').AsInteger;
  ADOQuery1.Next;
  ADOQuery1.Active:=true;
 
end;
end;

Это сообщение отредактировал(а) MMihan - 10.6.2012, 18:04

Frees

Дата 10.6.2012, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 23
Всего: 54

можно выполнить update запрос

Код


update table1
set N = N - 1
where N > 3

--------------------

Кольцов Виктор Владимирович

MMihan

Дата 11.6.2012, 13:03 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 21
Регистрация: 8.12.2011

Репутация: нет
Всего: нет

спасибо так не пойдет)) записей можеть быть и мольше и не иммено что 3 ))

XperT

Дата 11.6.2012, 13:42 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 269
Регистрация: 19.8.2006

Репутация: нет
Всего: 4

Цитата(MMihan @ 11.6.2012, 13:03)

спасибо так не пойдет)) записей можеть быть и мольше и не иммено что 3 ))

Советую подучить SQL, этот запрос - самый лучший и самый простой вариант в вашей ситуации

superVad

Дата 11.6.2012, 19:58 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 735
Регистрация: 6.4.2006
Где: Черкассы, Украина

Репутация: 3
Всего: 15

Цитата(MMihan @ 11.6.2012, 12:03

)

спасибо так не пойдет)) записей можеть быть и мольше и не иммено что 3 ))

Задание на лето - переписать этот запрос для другого номера.

Данкинг

Дата 11.6.2012, 20:50 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130

Цитата(MMihan @ 10.6.2012, 17:31

)

Код

while ADOQuery1.Eof do
begin
 
  m:=m+ADOQuery1.FieldByName('N').AsInteger;
  ADOQuery1.Next;
  ADOQuery1.Active:=true;
 
end;

А что вообще должен делать этот код и каким местом тут обновление поля?

Это сообщение отредактировал(а) Данкинг - 11.6.2012, 20:50

--------------------

There's nothing left but silent epitaphs.

Akella

Дата 12.6.2012, 19:26 (ссылка)

(голосов:1)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329

Цитата(MMihan @ 10.6.2012, 16:31

)

есть Заявки с номерами 1 2 3 4 5 итд. удаляем заявку с номером 3 получается 1 2 4 5 нужно сделать 1 2 3 4

если это ключевое поле, то забудь и никогда так не делай

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »