powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Нумерация строк в поле!!!
11 сообщений из 11, страница 1 из 1
Нумерация строк в поле!!!
    #32656492
IgorGer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Просто есть пустая таблица и в ней одно поле и нет ни одной записи. Как можно быстро, т.е. с помощью какой команды можно заполнить поле таблицы, например начиная с цифры 1 и по 5000?

С уважением, Игорь!!!
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656716
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorGerПросто есть пустая таблица и в ней одно поле и нет ни одной записи. Как можно быстро, т.е. с помощью какой команды можно заполнить поле таблицы, например начиная с цифры 1 и по 5000?

С уважением, Игорь!!!for i=1 to 5000
table.addnew
table("field")=i
table.update
next

Или нужна какая-то экстраординарная идея? Какой в этом смысл?
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656869
IgorGer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Объясните начинающему поподробнее конкретно к чему этот код привязывать, если таблица называется "ааа", а поле "Kod"?
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656906
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorGerОбъясните начинающему поподробнее конкретно к чему этот код привязывать, если таблица называется "ааа", а поле "Kod"?Читай книжки. Когда начитаешься - создашь глобальный модуль, поместишь туда подобную (или более интеллектуальную) процедуру и запустишь её по F8.
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656937
IgorGer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Читать книжки долго и муторно и не хватает времени. На то и создан форум, чтобы черпать быстрее знания. Неужели трудно объяснить на конкретном примере?
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656963
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorGerЧитать книжки долго и муторно и не хватает времени. На то и создан форум, чтобы черпать быстрее знания. Неужели трудно объяснить на конкретном примере?ИМХО, форум создан для того, чтобы давать экспертные советы по нетривиальным проблемам, которых нет ни в хелпе, ни в книжках. А разжёвывать азы - это как-то мелковато...

Вот тебе алгоритм:
1. Создаёшь глобальный модуль, не привязанный ни к какой форме.
2. Создаёшь в нём процедуру, обвешав указанный вверху текст нужными командами инициализации объекта БД и своей таблицы.
3. Сохраняешь, компилируешь БД и запускаешь свежеприготовленную процедуру. Телемаркет.

P.S. К модераторам - удалите, пожалуйста, мой флуд из этого топика.
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656970
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да тут весь топик - флуд.
в особенности от того, кому книжки западло читать
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32656972
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторНа то и создан форум, чтобы черпать быстрее знания
Ну и как? Черпается?
Знания черпать будешь из Fucking manuals & FAQ, а не из форума. Что делают в форуме, маяк тебе уже объяснил.

Флуд не потру.
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32657005
IgorGer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ладно, извините, заговорился.
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32657325
IgorGer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Да, еще раз извините, книга помогла на самом деле!!! Все работает!!!

Private Sub xxx()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim i As Long

Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("SELECT * FROM aaa")
For i = 1 To 5000
rst.AddNew
rst("kod") = i
rst.Update
Next
rst.Close
Set rst = Nothing
Set dbs = Nothing
End Sub

С уважением, Игорь!!!
...
Рейтинг: 0 / 0
Нумерация строк в поле!!!
    #32657341
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
IgorGer
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Private Sub xxx()
Dim dbs As DAO.Database
Dim rst As DAO.Recordset
Dim i As Long
  
  Set dbs = CurrentDb
  Set rst = dbs.OpenRecordset("SELECT * FROM aaa")
  For i =  1  To  5000 
    rst.AddNew
    rst("kod") = i
    rst.Update
  Next
  rst.Close
  Set rst = Nothing
  Set dbs = Nothing
End Sub
Отлично. Даже добавить нечего. Впрочем, чего тут удивляться - проблема-то фИгова.
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Нумерация строк в поле!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]