удаление записи

[IraPr]

Здравствуйте, помогите пожалуйста!Мне необходимо при удалении записи упорядочить операции , тоесть у меня были операции:1 2 3 4 5 , при удалении 3(например), номера операций встали вместо удаленной: 4ая - 3, 5ая - 4. Тоесть стали 1 2 3 4.
заранее большрое спасибо!!!!!!!!

[Teslenko_EA]

Здравствуйте IraPr.
задача может быть решена если после удаления выполнить подобную процедуру:

Sub reNumber()
Dim d As DAO.Database, r As DAO.Recordset, i%
Const sQ = "select номер from Table order by номер"
Set d = CurrentDb
ser r = d.OpenRecordset(sQ)
Do Until r.EOF
    i = i + 1
    r.Edit
    r(0) = i
    r.Update
    r.MoveNext
Loop
Set r = Nothing
Set d = Nothing
End Sub

конечно предварительно откорректировав SQL конструкцию.
Евгений.

[IraPr]

у меня что-то не получается, у меня связи между таблицами и не выходит переименование по конкретному коду, вот пример!