ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос ADODB.Recordset.Delete, Update, AddNew
3 сообщений из 3, страница 1 из 1
Вопрос ADODB.Recordset.Delete, Update, AddNew
    #32672041
МаксимВ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
МаксимВ
Участник
Есть две связанные таблицы.
Если делаю курсор на клиенте, то методы Delete, Update, AddNew не работают. При их вызове ADO пытается удалить(в данном примере) записи из обеих таблиц.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Option Explicit

Private Sub Form_Load()
Dim cn As ADODB.Connection, rs As Recordset
    Set cn = New ADODB.Connection
    Set rs = New ADODB.Recordset
    cn.ConnectionString = "DSN=DB1"
    cn.CursorLocation = adUseClient
    cn.Open
    rs.Open "select table2.N2,table2.C2,table2.N1,table1.C1 from table2 inner join table1 on table1.N1 = table2.N1", cn, _
        adOpenStatic, adLockOptimistic, adCmdText
    rs.MoveLast
    rs.Delete
    rs.Update
End Sub
А если создавать курсор на сервере, то все нормально.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Option Explicit

Private Sub Form_Load()
Dim cn As ADODB.Connection, rs As Recordset
    Set cn = New ADODB.Connection
    Set rs = New ADODB.Recordset
    cn.ConnectionString = "DSN=DB1"
    cn.CursorLocation = adUseServer
    cn.Open
    rs.Open "select table2.N2,table2.C2,table2.N1,table1.C1 from table2 inner join table1 on table1.N1 = table2.N1", cn, _
        adOpenKeyset, adLockOptimistic, adCmdText
    rs.MoveLast
    rs.Delete
    rs.Update
End Sub
Не хотелось-бы использовать курсоры на сервере. Да и работать с таким RecordSet не удобно - AbsolutePosition, RecordCount не поддерживаются. Можно сделать через cn.Execute, но мне так не нужно.
...
Рейтинг: 0 / 0
30.08.2004, 18:10
| Ответить | Цитировать | Написать  
Вопрос ADODB.Recordset.Delete, Update, AddNew
    #32672109
Фотография buser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
buser
Участник
Мобть посмотреть на UpdateCommand?
либо в пропертях менять свойство Unique Table... в зависимости от того кака таблица упдатится... либо воспользоваться поиском по форуму :)
...
Рейтинг: 0 / 0
30.08.2004, 18:38
| Ответить | Цитировать | Написать  
Вопрос ADODB.Recordset.Delete, Update, AddNew
    #32672507
GOBUR
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
GOBUR
Участник
Тогда реализуй добавление, удаление через SQL команды.
...
Рейтинг: 0 / 0
31.08.2004, 09:19
| Ответить | Цитировать | Написать  
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос ADODB.Recordset.Delete, Update, AddNew
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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