Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Работа с данными

Страница: 1 |

 

  Вопрос: SQL Server & RecordSet Добавлено: 03.03.04 11:31  

Автор вопроса:  optimizm

Set myDB = myWork.OpenConnection("NewCon", , False, "ODBC;DATABASE=Reestr;UID=;PWD=;DSN=MQis")
Set myDin = myDB.OpenRecordset("AnketGroup", dbOpenDynaset) 

 myDin.AddNew
 myDin.Update
Подскажите почему не работает. Пишет что база открыта только для чтения. Также не работают метод FindFirst. Пишет что обьект не поддерживает этот метод. Может нужны какие то дополнительные параметры при открытии Recordseta

Ответить

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

Номер ответа: 1
Автор ответа:
 ol2003



Вопросов: 3
Ответов: 122
  Профиль | | #1 Добавлено: 03.03.04 19:05
Скажи, а какие права у логина, который ты используешь? Чтобы делать update или add  нужно иметь права как минимум db_datawriter.

Ответить

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



Вопросов: 11
Ответов: 12
  Профиль | | #2 Добавлено: 03.03.04 19:47

Права тут как видимо ни при чём, иначе была бы ошибка прав доступа.
Попробуй определить явно свойства рекордсета.

Dim rs As ADODB.Recordset, cn As ADODB.Connection
Set rs = New ADODB.Recordset
With rs
    .CursorLocation = adUseServer
    .LockType = adLockOptimistic
    .ActiveConnection = cn
    .CursorType = adOpenDynamic
    .Open "AnketGroup"
    .AddNew
    .Update
    .Close
End With
Set rs = Nothing

По умолчанию .CursorType = adOpenForwardOnly дело в этом.
А вообще в отладчике добавь просмотр объекта Recordset и смотри его свойства.

Ответить

Страница: 1 |

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



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