Форум программистов, компьютерный форум, киберфорум
Microsoft Access
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 5.00/11: Рейтинг темы: голосов - 11, средняя оценка - 5.00
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39

Как сделать автонумерацию на поле номер договора а не счетчик?

12.04.2022, 18:25. Показов 2770. Ответов 45
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Уважаемые программисты.

Прошу о помощи, как мне присвоить последующий номер в поле номер договора вроде как счетчика каждый раз чтобы в это поле прибавлялся значение +1?

Намример: предыдущий номер договора в записи 089, а после при добавление новой записи чтобы поле автоматически отображал 090 и тд.

Заранее благодарю, за правильный ответ.

P.S.
Я думаю, что это простое задание, но я пока новичок, поэтому поймите и помогите.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.04.2022, 18:25
Ответы с готовыми решениями:

Перевод ручной нумерации в автонумерацию пунктов и подпунктов договора
Приветствую всех! Друзья, подскажите, каким образом можно в документе о приеме сотрудников на работу изменить вручную проставленную...

Как сделать,чтобы номер договора появился при печати счета на оплату?!
Здравствуйте. Помогите, пожалуйста, решить проблему. Как сделать, чтобы номер договора(Пример: Основание: Договор поставки №21 от...

Как сделать автонумерацию ?
Про тип поля 'Счетчик' я знаю, но это не подходит. Вычитал вариант : select max(id) +1 , <прочие значения>, но это, кажется, для...

45
Эксперт MS Access
 Аватар для ltv_1953
17536 / 7288 / 1663
Регистрация: 21.06.2012
Сообщений: 13,957
12.04.2022, 19:14
В форме (имена Ваши):
Visual Basic
1
2
3
4
Private Sub Form_BeforeInsert(Cancel As Integer)
        Me.Номер_Договора = Nz(БАЗА_ТЕКУЩАЯ.OpenRecordset _
        ("SELECT Max(Номер_Договора) FROM Договора, dbOpenForwardOnly).Fields(0), 0) + 1
End Sub
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 19:47  [ТС]
Что-то не получается.
У меня поле номер договора [DLM]
Текущая база Forma [BLC]
BeforeUpdate есть такой event но BeforeInsert нет.

Вот так заменил
Visual Basic
1
2
3
4
5
'Private Sub Form_BeforeUpdate(Cancel As Integer)
Private Sub Form_BeforeInsert(Cancel As Integer)
        Me.DLM = NZ(BLC.OpenRecordset_
        ("SELECT Max(DLM) FROM DLM, dbOpenForwardOnly.Fields(0), 0) + 1
End Sub
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.04.2022, 20:12
Цитата Сообщение от Yalchin Посмотреть сообщение
Текущая база Forma [BLC]
Форма - это не база.
Вместо этого
Цитата Сообщение от Yalchin Посмотреть сообщение
BLC.OpenRecordset
нужно это
Visual Basic
1
CurrentDb.OpenRecordset
И пробела перед знаком продолжения "_" нет, а нужен.
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 20:26  [ТС]
Это строка выходит красным.
Что тут не так?

("SELECT Max(DLM) FROM (DLM) OpenForwardOnly.Fields(0), 0) + 1
0
604 / 127 / 45
Регистрация: 12.04.2015
Сообщений: 519
12.04.2022, 21:15
Цитата Сообщение от Capi Посмотреть сообщение
И пробела перед знаком продолжения "_" нет, а нужен.
Yalchin, Вам же ответили
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.04.2022, 21:20
glsn,

Мне?

О чём?

Я ни о чём не спрашивала.
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 21:21  [ТС]
Пробел перед знаком я поставил " _"

Но всё равно последняя строка краснеет.
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.04.2022, 21:26
Yalchin,

Кавычки закрывающей нет.

Добавлено через 3 минуты
После FROM договора

И запятую после этого нужно поставить
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 21:26  [ТС]
А где должно быть закрывающая кавычка?
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.04.2022, 21:55
Yalchin,

Написано, где.
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 22:50  [ТС]
Поле Номер_договора понятно.

А что означает тут синтаксис Договора? Это имя поле или имя формы или .... ???
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
12.04.2022, 22:54  [ТС]
Вот такого рода проблема.
При добавление нового записи возникает такая ситуация.
Миниатюры
Как сделать автонумерацию на поле номер договора а не счетчик?   Как сделать автонумерацию на поле номер договора а не счетчик?  
0
Модератор
Эксперт MS Access
6231 / 2909 / 707
Регистрация: 12.06.2016
Сообщений: 7,839
12.04.2022, 22:59
Yalchin,

Ваше
SELECT Max(DLM) FROM (DLM)
это какая-то бессмыслица.

Про запросы на выборку почитайте хоть немного,
чтобы понимать, что делаете, и что вам отвечают.
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
13.04.2022, 06:42  [ТС]
Я тоже так думаю, что это бессмысленно
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,936
Записей в блоге: 4
13.04.2022, 06:58
Yalchin,

по крайней мере имя таблицы не должно совпадать с именем поля
SQL
1
SELECT MAX(DataLM) FROM [tabl_DLM]
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
13.04.2022, 10:39  [ТС]
Всё равно не получается.
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,936
Записей в блоге: 4
13.04.2022, 10:46
тогда надо смотреть пример базы, выложите в зазипованном виде
0
5 / 0 / 0
Регистрация: 07.03.2022
Сообщений: 39
13.04.2022, 11:50  [ТС]
Вот такая ошибка выскакивает
Миниатюры
Как сделать автонумерацию на поле номер договора а не счетчик?  
0
Модератор
Эксперт MS Access
 Аватар для shanemac51
12231 / 5078 / 814
Регистрация: 07.08.2010
Сообщений: 14,936
Записей в блоге: 4
13.04.2022, 12:05
проверяйте имена - текст сообщает что не найдены таблица или запрос
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
13.04.2022, 12:05
Помогаю со студенческими работами здесь

Подскажите как сделать автонумерацию!?
Поскажите ввожу номера претензий самостоятельно , иногда пропуская цифры и получаются непоследовательные! а мне надо бы с 645001... далее...

Как сделать нестандартную автонумерацию в Word?
Здравствуйте! Ситуация в следующем: есть документ, который содержит в себе приложения. Например, имеется "Приложение 1" , к...

Как сделать поле-счётчик, но увеличивающийся по определенным значениям
Не понимаю как в Accesse создать поле с автоматическим счётчиком, который увеличивался бы в зависимости от разных значений другого поля...

Как сделать числовое поле как счетчик или несколько счетчиков в таблице в accsse
Помогите пожалуйста...В таблице есть такие поля где нужно воспользоваться несколькими счетчиками ну accsse выдает ошибку, пробовала...

Как вырезать номер кредитного договора?
Есть строка информацией, в ней есть номер кредитного договора (к/д), из этой строки нужно вытащить его в отдельный столбик без №, чисто...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru