Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Помогите с mdb базой Добавлено: 05.04.04 18:28  

Автор вопроса:  Sur | Web-сайт: sur.hotbox.ru/ | ICQ: 1249088 

Своими словами:

записи в mdb базе: 1,2,3,4,5

удаляю 3: 1,2,4,5

добавляю 6:

Жду, что будет 1,2,4,5,6

А получаю 1,2,6,4,5

Что AddNew пишет в базу где свободно или все-же должна в конец?

Мне собственно нужно номер последней записи, а тут такая путаница, записи скачут как хотят, неужели счетчик вводить и вычислять max?

PS индекса у базы нет, с индексным полем (счетчик) база в Access

выглядит (1,2,4,5,6), а по MoveNext из кода все равно выходит (1,2,6,4,5)

Весь бедлам прекращается (1,2,4,5,6), если после удаления сделать сжатие-восстановление базы (но это-ж не метод)

Декларации:

Private ADB As dao.Database

Private ars As dao.Recordset

Set ADB = DBEngine.OpenDatabase(abdname, False)

Set ars = ADB.OpenRecordset("Acter", dbOpenTable)

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Alex&r



Вопросов: 10
Ответов: 105
 Профиль | | #1 Добавлено: 06.04.04 10:49

Надо отсортировать таблицу по заданному полю.

Рекордсет.Sort = "Имя_поля Asc"

(ключи сортировки - Asc или Desc, Аsc - по умолчанию, можно не указывать)

Ответить

Номер ответа: 2
Автор ответа:
 Sur



ICQ: 1249088 

Вопросов: 10
Ответов: 304
 Web-сайт: sur.hotbox.ru/
 Профиль | | #2
Добавлено: 06.04.04 16:09

Рекордсет.Sort не работает - этот объект не поддерживается.

Ладно, вставил в базу индекс-счетчик

Set ADB = DBEngine.OpenDatabase(abdname, False)

Set ars = ADB.OpenRecordset("Acter", dbOpenTable)

ars.Index = "Key"

Получилась сортировка базы по этому полю

Пусть так живет...

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам