LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: ListBox в...
 Тема: ListBox в форме, не могу присвоить значение...
 
 15.06.2007 21:02:05
Rustam1
17 сообщения


Тема: ListBox в форме, не могу присвоить значение...
Помогите разобраться с элементом, надо вставить значения в ListBox иснтрукцию SQL через VBA...
есть выборка нескольких значений, надо вывести их в этот элемент...


P.S. Общий раздел по формам
Автор: Рустам от 03.03.2002 13:07:21 Источник ...
 15.06.2007 21:02:05
All
4316 сообщения
1-ый


RE: ListBox в форме, не могу присвоить значение...
Private Sub Список0_Enter()
With Me.Список0
.RowSource = "SELECT * FROM [Таблица1];"
End With
End Sub


P.S. Общий раздел по формам
Автор: Виктор Конюков от 0:00:00 Источник ...
 15.06.2007 21:02:05
Rustam1
17 сообщения


RE: ListBox в форме, не могу присвоить значение...
Спасибо за ответ, я успел сам догадаться..
Но теперь продолжение вопроса:
В форме работаю с кнопками, и на различные события присваиваю различные значения в поля, списки.
Проблема вылезла, и не могу придумать как решить,
Часть вопроса решилось строками почти аналогичными выше, но возникла еще...
strSQL = "SELECT * FROM [Таблица]"
me.список1.rowsours = strSQL

А потом я strSQL переписываю под новый запрос
strSQL="SELECT * FROM [Таблица] WHERE (то то и то то)"
А потом хочу выполнить такую инструкцию
set rs = CurrentDB.OpenRecordset (strSQL)
И тут началось, вылетает на ошибке...
Заранее знаю что запрос правильный, без первого присвоения в список отрабатывает, и на этом все, помогите...


P.S. Общий раздел по формам
Автор: Рустам от 05.03.2002 8:27:00 Источник ...
 15.06.2007 21:02:06
All
4316 сообщения
1-ый


RE: ListBox в форме, не могу присвоить значение...
Попробуйте выделить отдельно ссылку на базу данных
Dim db as DAO.Database
Set db = CurrentDB
Set rs = dbs.OpenRecordset(strSQL)


P.S. Общий раздел по формам
Автор: Виктор Конюков от 0:00:00 Источник ...
 15.06.2007 21:02:06
Rustam1
17 сообщения


Дополнение...
После строки set rs = CurrentDB...
ставлю такие строки me.поле=rs!код2 вот после этого и вылетает на ошибку...


P.S. Общий раздел по формам
Автор: Рустам от 05.03.2002 8:43:38 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: ListBox в...
ПоискПоиск  Список форумовСписок форумов  
right