Помогите Люди


Как вывести рекордсет в виде таблици

konteyner = "SELECT count([Дата обращения]) FROM dbo.root WHERE [Дата обращения] Between " & Uslovie1 & " And " & Uslovie2 & "And " & "Дом=" & dom & " And " & "Район=" & rayon & " And " & "Улица=" & Ulica


Ado 2.7 и VB 6.0

rstcurr.Open konteyner, cnnlocal, adOpenStatic, adLockOptimistic

a=rstcurr.getstring

Я заношу результат запроса в переменную

Но

Мне также нужно отображать его в виде таблици

Вопрос как мне вывести Рекордсет rstcurr в виде таблици

смотри DataGrid, FlexDataGrid или гриды сторонних разработчиков




Я пробовал Пользоваться FlexGrid но вставлял его в проекте ADP а не в VB


И у него отсуствует св-во Recordesourse хотя в VB это св-во есть