Форум программистов [Powered by Invision Power Board]

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

Форум программистов > VB6 > Показать определенные строки в DataGrid

Автор: ArtNeoX 27.2.2006, 20:08

База данных. DataGrid. Есть столбец с форматом Дата. (X16)
код для отображения строк где столбец с датой не пустой.

Код


Private Sub Form_Load()
Dim db As Connection
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Data Source=Files\Base.mdb;"
Set adoPrimaryRS = New Recordset
adoPrimaryRS.Open "SELECT X16,X17,X04,X26,X27,X09,X13,X15,X25,X72 FROM Таблица1 WHERE X16>0 ORDER BY X16,X17 ASC", db, adOpenStatic, adLockOptimistic
Set grdDataGrid.DataSource = adoPrimaryRS
Set adoRecordset = adoPrimaryRS
mbDataChanged = False
End Sub

в итоге в datagrid будут отображены строчки где ячейки X16 - не пусты.
А Как отобразить строчки в которых дата больше 01.10.2006