ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнение списка при открытии формы
11 сообщений из 11, страница 1 из 1
Заполнение списка при открытии формы
    #32654784
Benzin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Benzin
Участник
На форме два списка. Источник одного получает условие отбора через св-во OpenArgs формы, на событие Open этот источник формируется и после открытия список1 содержит запись. Источник второго списка в условии отбора имеет присоединенный столбец первого списка, но после открытия формы второй список пустой. Заполнить его получается только через процедуру Click на первом списке.
А нельзя и второй список как-то сразу заполнять?
...
Рейтинг: 0 / 0
18.08.2004, 14:03:32
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32654855
Alexus12
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alexus12
Участник
дарагой
а кто тебе мешает
после заполнения первого списка
ручками вызвать эту процедуру клика?

так и напиши в конце form_load:
mysecondlist_click

это же почти обычный Sub, вот и пользуйся
...
Рейтинг: 0 / 0
18.08.2004, 14:30:01
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655253
Benzin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Benzin
Участник
А не выходит...
на Открытие формы:
Код: plaintext
1.
2.
Me!Список1.RowSource = "SELECT Табл1.фирма,  Табл1.UrAdr, Табл1.PostAdr" _
& " FROM Табл1" _
& " WHERE (((Табл1.IdMag)=" & Me.OpenArgs & "));"
источник списка2(сохраненный):
Код: plaintext
1.
2.
SELECT Табл2.Fio, Табл2.Dov, Табл2.Razd
FROM Табл2
WHERE (((Табл2.фирма)=[Forms]![Форма]![Список1]));
на Список1_Click:
Код: plaintext
Me!Список2.RowSource = Me!Список2.RowSource
На Загрузка формы:
Код: plaintext
Call Список1_Click
После открытия Список2 пустой!
...
Рейтинг: 0 / 0
18.08.2004, 16:28:13
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655273
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
А не проще повесить Ме!Список2.requery на событие Список1_AfterUpdate?
Или я чего-то не понимаю?
...
Рейтинг: 0 / 0
18.08.2004, 16:34:27
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655279
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
почему Call Список1_Click надо After_Update !
...
Рейтинг: 0 / 0
18.08.2004, 16:36:26
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655349
Benzin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Benzin
Участник
Исправил.
на Список1_AfterUpdate:
Код: plaintext
Me!Список2.RowSource = Me!Список2.RowSource
На Загрузка формы:
Код: plaintext
Call Список1_AfterUpdate
И что? Ничего не изменилось - если не щелкнуть на списке1, то список2 пустой.
...
Рейтинг: 0 / 0
18.08.2004, 17:00:10
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655358
Benzin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Benzin
Участник
Исправил.
на Список1_AfterUpdate:
Код: plaintext
Me!Список2.RowSource = Me!Список2.RowSource
На Загрузка формы:
Код: plaintext
Call Список1_AfterUpdate
И что? Ничего не изменилось - если не щелкнуть на списке1, то список2 пустой.
...
Рейтинг: 0 / 0
18.08.2004, 17:02:48
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655372
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
попробуй так
Код: plaintext
1.
2.
3.
4.
Form_open
Me!Список1.RowSource = "SELECT Табл1.фирма,  Табл1.UrAdr, Табл1.PostAdr" _
& " FROM Табл1" _
& " WHERE (((Табл1.IdMag)=" & Me.OpenArgs & "));"
Ме!список2.requery
...
Рейтинг: 0 / 0
18.08.2004, 17:07:03
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655376
Roma R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Roma R
Участник
Так и должно быть, в первом списке значение не задано!
После заполнения первого списка, задайте значение, а потом заполняйте второй.
Me!Список1=Me.Список1.ItemData(0)
...
Рейтинг: 0 / 0
18.08.2004, 17:08:10
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655385
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Блин я список перепутал с ПолеСОСписком
Конечно же
Код: plaintext
1.
2.
3.
4.
Me!Список1.RowSource = "SELECT Табл1.фирма,  Табл1.UrAdr, Табл1.PostAdr" _
& " FROM Табл1" _
& " WHERE (((Табл1.IdMag)=" & Me.OpenArgs & "));"
Me!Список1=Me.Список1.ItemData( 0 )
Ме!список2.requery
...
Рейтинг: 0 / 0
18.08.2004, 17:10:54
| Ответить | Цитировать | Написать  
Заполнение списка при открытии формы
    #32655391
Benzin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Benzin
Участник
Спасибо! С ItemData все заработало!
...
Рейтинг: 0 / 0
18.08.2004, 17:13:32
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнение списка при открытии формы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32655273&tid=1672362]:
 0ms
get settings:
 8ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 37ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 226ms
total:  321ms
созд. / загр.: 321ms
x
x
Закрыть


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