Страница: 1 |
Страница: 1 |
Вопрос: DataGrid & RecordSet
Добавлено: 24.05.05 12:24
Автор вопроса: Илья
Народ, проблема стандартная, но нормального ответа я найти не смог. Есть объект DataGrid, есть база Access 2000. Подключаю через ADODB. В результате информация в DataGrid не отображается. Для проверки вывел инфу из recordset в ListBox - все отображается. Что не так? Вот код:
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\otcet\otcet.mdb"
Set rs = New ADODB.Recordset
rs.ActiveConnection = cnn
rs.Source = "SELECT * FROM Tabl"
rs.Open , , adOpenKeyset, adLockOptimistic
If Not rs.EOF And Not rs.BOF Then
With rs
Do While .EOF = False
List1.AddItem .Fields("Ingener").Value
.MoveNext
Loop
End With
End If
If Not rs Is Nothing Then
If rs.State = 1 Then rs.Close
Set rs = Nothing
End If
Set Me.DataGrid1.DataSource = rs
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
Илья
Вопросов: 5
Ответов: 6
Профиль | | #1
Добавлено: 24.05.05 14:52
Все разобрался, не надо закрывать Recordset и будет Вам счастье