Дублирующие записи

[Sirik]

Всем привет.
На удаленном SQL сервере лежит БД, в ней таблица с несколькими полями, одно из которых - это некий номер в порядке возрастания. При каждом добавлении записи, программа-клиент запрашивает последний номер, инкриминирует его и вносит новую запись.
Так вот в чем проблема: если сервер немного подлагивает, при запросе, 2 юзера получают одно и тоже число и соответственно вносят свои записи с одинаковыми номерами, т.е. происходит дубляж.
Самое печальное то, что юзеры ходят на сервер под одной учеткой (я к сожалению не админ этого сервера), т.е. как я понимаю, блокировка таблицы невозможна (монопольный доступ), пробовал выставить флаг подключения в adModeShareExclusive, не помогло.

Так вот вопрос: как можно реализовать, чтобы юзеры не дублировали записи?

[iGrok]

1. Блокировка - она не про учётку а про конкретную сессию. Т.е. должна сработать.
2. Не видя структуру бд сложно сказать, но, может, сделать поле с ид автоинкрементным?

[Sirik]

Авто нельзя, поле не уникальное.
На счет блокировки, может я неправильно ее делаю? Вот код:

Код: Выделить всё


    Dim cn As New ADODB.Connection

.....

    cn.Provider = "SQLOLEDB"
    cn.Mode = adModeShareExclusive
    cn.ConnectionString = "Data Source='XXX.XXX.XXX.XXX';Database=DB;User Id='user';Password='pass';"
    cn.Open
....


    cn.Close
    Set cn = Nothing



[alibek]

Блокировку можно поставить пессимистическую.
А нумерацию обычно делают хранимой процедурой на сервере, а не считают на клиенте.

[Sirik]

Согласен, на стороне сервера идеальное решение, остается вопрос как это сделать?
Как вызвать хранимую процедуру с параметрами и получить ответ?

[alibek]

Есть много способов, зависит от СУБД, ЯП и используемой библиотеки доступа к данным.
Но практически все СУБД умеют запускать хранимые процедуры, возвращающие значение, и практически все библиотеки умеют вызывать хранимые процедуры и получать возвращаемое значение.

[Andrey Fedorov]

В MS SQL для поля таблицы достаточно установить свойство IDENTITY и не мудрить!

P.S
Давно тут не был...

[HandKot]

В MS SQL для поля таблицы достаточно установить свойство IDENTITY и не мудрить!

P.S
Давно тут не был...

Авто нельзя, поле не уникальное.

хотя как такое может быть не ясно

[alibek]

identity само по себе не гарантирует уникальность.
Для уникальности нужен constraint или uniquie index.
А identity просто упрощает работу с таблицей.