Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Удаление ...

Тема: Удаление записи через SQL

15.06.2007 19:52:27

All

4316 сообщения

Тема: Удаление записи через SQL

У меня возникла небольшая проблема с объектом RecordSet и её методом Delete. Я знаю, как добавить записи в базу с помощью метода AddNew. Теперь возникла необходимость удаления Записей из таблицы. Скажем так, существует необновляемый запрос, в состав которого входит таблица, из которой будут удаляться записи. У этой таблицы в запросе есть свой Код, с помощью которого будут удаляться записи. Код выглядит так.
Dim tbl as Recordset, db as database, Kod As String
Kod = [Поле в запросе, соответствующее этому коду]
set db = currentdb
set tbl = db.OpenRecordset("MyTable",dbOpenDynaset)
tbl.delete
Метод tbl.delete удалят поочерёдно записи из таблицы начиная с первой. А вот как сделать то что бы он удалял только ту строку, которая на данный момент активна в запросе (на которой стоит курсор) и соответствует Ключевому полю Kod Описаному Ниже.

P.S. Общий раздел по формам
Автор: Вопрос 15 от 0:00:00 Источник ...

15.06.2007 19:52:27

All

4316 сообщения

RE: Удаление записи через SQL

Для позиционирования в запросе существует метод tbl.FindFirst. Смотрите примеры в файле: la_form.mdb. В вашем случае, я бы написал по другому: db.execute “DELETE * FROM [MyTable] WHERE [Kod]=” & me.Kod. Пример «Как удалить запись через SQL?» возьмите из файла: la_form1.mdb

P.S. Общий раздел по формам
Автор: Виктор Конюков от 0:00:00 Источник ...

15.06.2007 19:52:27

Nick2

1 сообщения

RE: Удаление записи через SQL

Не работает пример из la_form1
Вот правильный рабочий вариант

DoCmd.SetWarnings False ' выключаем предупреждение об удалении
DoCmd.RunSQL "DELETE * FROM [Consultations] WHERE [ConsultationID]=" & Me.ConsultationID
'если ConsultationID число, то переменную не надо заключать в одинарные кавычки
' обновляем форму
Consultations.Requery
'DoCmd.SetWarnings True ' включаем предупреждение об удалении

P.S. Общий раздел по формам
Автор: Nick от 20.07.2004 19:32:59 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Удаление ...

Поиск

Список форумов

Начало | Forums