Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > DataGrid...


Автор: x_Coder 16.2.2004, 16:05
Как программно заполнить данными элемент DataGrid?
Я использую ADO.
Подключаюсь к базе и создаю набор записей таким образом:
--------------------------------------------------------------------------------------------------
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sSQL As String

Set cn = New ADODB.Connection
cn.ConnectionString = "Driver=Microsoft Access Driver (*.mdb); DBQ=" & App.Path & "\Data.mdb"
cn.Open
sSQL = "SELECT * FROM clients"

rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic

rs.ActiveConnection = cn
rs.Source = sSQL
rs.Open
--------------------------------------------------------------------------------------------------
Data.mdb - база данных
Clients - таблица в базе данных

Заранее благодарен!

Автор: shilnik 17.2.2004, 07:48
rs.AddNew
rs("Field_1")="Value"
...
rs("Field_n")="Value"
rs.Update



DataGrid.Refresh

Автор: x_Coder 18.2.2004, 13:36
Я что-то не понял!
Как заполнить DataGrid данными из существующей таблицы?

Автор: shilnik 18.2.2004, 14:37
А откуда DataGrid, с каких компонентов. Кажется в стандартном наборе есть только компонент Data. Или что-то не правильно понял?

Автор: x_Coder 23.2.2004, 12:04
Да! DataGrid находиться не в стандартных!

А заполнить ее можно так:

Set DataGrid.DataSourse = rs

rs - набор записей

Вот так.

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)