powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / FlexGrid
15 сообщений из 15, страница 1 из 1
FlexGrid
    #32728253
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
скажите как рекордсет всязать к Flex Grid.
код типа

Me.MSFlexGrid.DataSource = rst

не проходит

Или может посоветуйте другой грид
Спасибо
...
Рейтинг: 0 / 0
FlexGrid
    #32728712
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Никто не в курсе?)))
...
Рейтинг: 0 / 0
FlexGrid
    #32728723
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не работают в аксесе с флексгридом
работают, но мало
спрашивайте в форуме по VB. на мой взгляд там больше вероятность получения ответа.
...
Рейтинг: 0 / 0
FlexGrid
    #32728748
Фотография Serafim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
примерно так - не могу быстро найти
myConnPrn = CREATEOBJECT("ADODB.Connection")
rsPrn = CREATEOBJECT("ADODB.Recordset")
conStr = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB= "myDB";Exclusive=No;Collate=Machine;"
myConnPrn.OPEN(conStr)
rsPrn.OPEN(myStr, THIS.myConnPrn)
me.fg.DATASOURCE = rsPrn
...
Рейтинг: 0 / 0
FlexGrid
    #32728856
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Serafimпримерно так - не могу быстро найти
myConnPrn = CREATEOBJECT("ADODB.Connection")
rsPrn = CREATEOBJECT("ADODB.Recordset")
conStr = "Driver={Microsoft Visual FoxPro Driver};SourceType=DBF;SourceDB= "myDB";Exclusive=No;Collate=Machine;"
myConnPrn.OPEN(conStr)
rsPrn.OPEN(myStr, THIS.myConnPrn)
me.fg.DATASOURCE = rsPrn

не, так почемуто не проходит ((((
...
Рейтинг: 0 / 0
FlexGrid
    #32728862
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Просто после перекрестного запроса я получаю набор записей с переменным числом столбцов. Есть вариант это сделать через форму и представить ее в виде таблицы, но это не самый простой вариант. Мне казалось проще использовать какойто грид.

плз, Скажите тогда какой грид можно использовать или другой вариант решения вопроса.

спасибо за ответы.
...
Рейтинг: 0 / 0
FlexGrid
    #32728893
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JulyhПросто после перекрестного запроса я получаю набор записей с переменным числом столбцов. Есть вариант это сделать через форму и представить ее в виде таблицы, но это не самый простой вариант. Мне казалось проще использовать какойто грид.

плз, Скажите тогда какой грид можно использовать или другой вариант решения вопроса.

спасибо за ответы.
Сделайте на основе вашего перекрестного запроса запрос на создание таблицы и отображайте эту таблицу как подчиненную форму.
...
Рейтинг: 0 / 0
FlexGrid
    #32728914
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
так можно, но трудоемкость большая, да и скорость.

Преобразование запроса в подчиненную форму, уделение и добавление компонентов для отображения информации на подчиненной форме, а удаление и добавление на форму компонентов требует чтобы форма была в режиме конструктора и ....

В общем такой вариант не совсем устраивает ((((
...
Рейтинг: 0 / 0
FlexGrid
    #32728964
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Julyhтак можно, но трудоемкость большая, да и скорость.

Преобразование запроса в подчиненную форму, уделение и добавление компонентов для отображения информации на подчиненной форме, а удаление и добавление на форму компонентов требует чтобы форма была в режиме конструктора и ....

В общем такой вариант не совсем устраивает ((((
Извините, но вы не вьехали, или я плохо объяснил.
Ничего того, что вы написали делать не надо, зачем режим конструктора?
И даже не надо делать создания таблицы (что я написал).
У контрола Подчиненная форма в свойстве SourceObject просто указывайте свой перекрестный запрос.
...
Рейтинг: 0 / 0
FlexGrid
    #32729236
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Serge Gavrilov Julyhтак можно, но трудоемкость большая, да и скорость.

Преобразование запроса в подчиненную форму, уделение и добавление компонентов для отображения информации на подчиненной форме, а удаление и добавление на форму компонентов требует чтобы форма была в режиме конструктора и ....

В общем такой вариант не совсем устраивает ((((
Извините, но вы не вьехали, или я плохо объяснил.
Ничего того, что вы написали делать не надо, зачем режим конструктора?
И даже не надо делать создания таблицы (что я написал).
У контрола Подчиненная форма в свойстве SourceObject просто указывайте свой перекрестный запрос.

Если в ФАКах этого нет - то обязательно должно быть. Ибо многие мучаются сим вопросом на разных форумах. И я тоже был в числе этих тоскующих. И оченнно не хотелось юзать левые компоненты, чтоб не париться с юзерскими машинами.

СПАСИБО, Сергей!!! Вернул радость жизни. :о)
...
Рейтинг: 0 / 0
FlexGrid
    #32730826
Julyh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Главное просто!
Спасибо.
...
Рейтинг: 0 / 0
FlexGrid
    #32730976
Витал
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Эх! Блин!
Попробовал напрямую присобачить хранимую процедуру
Me.MyForm.SourceObject = "exec MyProc"

ругается, соб- бака!!
...
Рейтинг: 0 / 0
FlexGrid
    #32731026
Фотография Serge Gavrilov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ВиталЭх! Блин!
Попробовал напрямую присобачить хранимую процедуру
Me.MyForm.SourceObject = "exec MyProc"

ругается, соб- бака!!

Не, ну такого счастья никто не обещал :)
...
Рейтинг: 0 / 0
FlexGrid
    #32731051
Фотография Worobjoff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть верный способ (проверено) но работает только на Access2000 или выше.
1. Добавляем ссылки в редакторе кода (Tools\References):
- Microsoft ActiveX Data Objects 2.0 Library
- Microsoft ActiveX Data Objects Recordset 2.x Library
- Microsoft Hierarchal Flex Grid Control 6.0 OLEDB
2. Помещаем на форму Hierarchal Flex Grid, даем ему имя FGrid1
3. Добавляем следующие ниже строки (пример для «Борей»)
4. Пользуемся
5. Примечание. Этот контрол имеет массу свойств и настроек, которые лучше отладить в VB-60, а потом скопировать текст в Access.

Dim conn1 As New ADODB.Connection
Dim rs1 As New ADODB.Recordset

Private Sub Form_Load()
Dim s As String
Set conn1 = CurrentProject.Connection
If rs1.State = adStateOpen Then rs1.Close
rs1.Open "SELECT * FROM Клиенты", conn1, adOpenStatic, adLockReadOnly, adCmdText
Do Until rs1.EOF
s = s + rs1.Fields(2)
rs1.MoveNext
Loop
Set Me.FGrid1.DataSource = rs1
End Sub
...
Рейтинг: 0 / 0
FlexGrid
    #32731052
Фотография Worobjoff
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Пардон, к тому что уже опубликовано – поправочка: там лишний цикл – его не надо. (использовал при отладке)

Dim conn1 As New ADODB.Connection
Dim rs1 As New ADODB.Recordset

Private Sub Form_Load()
Dim s As String
Set conn1 = CurrentProject.Connection
If rs1.State = adStateOpen Then rs1.Close
rs1.Open "SELECT * FROM Клиенты", conn1, adOpenStatic, adLockReadOnly, adCmdText
Set Me.FGrid1.DataSource = rs1
End Sub
...
Рейтинг: 0 / 0
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / FlexGrid
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]