powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как ускорить работу ADO?Или в чем проблема?
3 сообщений из 3, страница 1 из 1
Как ускорить работу ADO?Или в чем проблема?
    #34458281
-=Over=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
'Подключаюсь к базе Access с помощью обекта ADODB.connection.

dim cn as new adodb.connection
cn.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Main.mdb;Persist Security Info=False"

'Выполняется запрос

cn.execute("delete from [TableName] where [id]=id").Затем выполняется
recordset.requery
DataGrid.refresh


В результате обновление записей происходит только секунд через 6 нажатием на кнопку Refresh.


Private Sub Refresh_Click()
recordset.requery
DataGrid.refresh
End Sub


Тот же самый запрос непосредственно в Access работает меньше секунды.Та же ситуация с запросами Update и Insert Into.То есть проблема вероятно кроется в механизме соединения с базой данных.Что можно сделать чтобы ускорит выполнение запросов?
...
Рейтинг: 0 / 0
Как ускорить работу ADO?Или в чем проблема?
    #34458598
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проблема как всегда не в ADO, а в авторе, точней в его подходе. 6 секунд уходят не на удаление, а на повторное получение всего набора записей из базы и обновление грида. Access такими вещами не занимается. Нужно просто удалить строку из рекордсета, а DataGrid на это сам отреагирует.
...
Рейтинг: 0 / 0
Как ускорить работу ADO?Или в чем проблема?
    #34462668
-=Over=-
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо!Все работает шустро.:)
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как ускорить работу ADO?Или в чем проблема?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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