ADODC+DataGrid+Подключение из кода = ПРОБЛЕМА

[windsurfer_ua]

Помогите пожалуйста разобратся.
Создаю подключение в коде:

strSQL = "Select * from test"
strConnect = App.Path & "\db5.mdb"
With cnnOrders
.Provider = "Microsoft.Jet.OLEDB.4.0"
.Open strConnect, "Admin"
End With
With rstOrders
.Source = ""
.LockType = adLockOptimistic
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.ActiveConnection = cnnOrders
.Open strSQL, Options:=adCmdText
End With

Set adcOrders.Recordset = rstOrders
adcOrders.Refresh

На форме adcOrders+ связаный с ним датагрид.
При использовании OLEDB.3.5 все ок.
При использовании OLEDB.4.0 датагрид не заполняется - остается пустой.

[Sedge]

А BLOB-полей в базе случаем нет?

[windsurfer_ua]

Нет, обычные текстовые и числовые поля....

[Rainbow]

Ну, воообще-то это разные провайдеры
Для доступа к Access 97, например, используется первый (3.5)
А к Access 2000 - второй (4.0)

А в чем проблема-то? Зачем тебе 4.0, если с 3.5 работает?

[gaidar]

Тяга ко всему новому. Лучший вариант - использовать то, что работает. Тем более, что с 4 врядли вообще можно заставить работать. Так, помнится, несовместимость версий при работе с большим текстом и двоичными данными была (если я трезв и все помню как надо )

[3ton]

Помогите пожалуйста разобратся.
Создаю подключение в коде:
...
Set adcOrders.Recordset = rstOrders
adcOrders.Refresh

В таком виде у меня вообще не зарулило, зато когда поменял на это:

Код: Выделить всё

Set adcOrders.DataSource = rstOrders
adcOrders.Refresh


Усе заработало.

[rodnoi]

Помогите пожалуйста разобратся.
Создаю подключение в коде:
...
Set adcOrders.Recordset = rstOrders
adcOrders.Refresh

В таком виде у меня вообще не зарулило, зато когда поменял на это:

Код: Выделить всё

Set adcOrders.DataSource = rstOrders
adcOrders.Refresh


Усе заработало.

[rodnoi]

Ne rabotaet tak adcOrders ne imeet ge takogo metoda DataSource