Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос ADODB.Recordset.Delete, Update, AddNew / 3 сообщений из 3, страница 1 из 1
30.08.2004, 18:10
    #32672041
МаксимВ
МаксимВ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос ADODB.Recordset.Delete, Update, AddNew
Есть две связанные таблицы.
Если делаю курсор на клиенте, то методы 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:38
    #32672109
buser
buser
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос ADODB.Recordset.Delete, Update, AddNew
Мобть посмотреть на UpdateCommand?
либо в пропертях менять свойство Unique Table... в зависимости от того кака таблица упдатится... либо воспользоваться поиском по форуму :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.08.2004, 09:19
    #32672507
GOBUR
GOBUR
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вопрос ADODB.Recordset.Delete, Update, AddNew
Тогда реализуй добавление, удаление через SQL команды.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос ADODB.Recordset.Delete, Update, AddNew / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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