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

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

это же почти обычный Sub, вот и пользуйся
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2004, 16:28:13
    #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:34:27
    #32655273
Vsevolod V
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заполнение списка при открытии формы
А не проще повесить Ме!Список2.requery на событие Список1_AfterUpdate?
Или я чего-то не понимаю?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2004, 16:36:26
    #32655279
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заполнение списка при открытии формы
почему Call Список1_Click надо After_Update !
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2004, 17:00:10
    #32655349
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
    #32655358
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заполнение списка при открытии формы
Исправил.
на Список1_AfterUpdate:
Код: plaintext
Me!Список2.RowSource = Me!Список2.RowSource
На Загрузка формы:
Код: plaintext
Call Список1_AfterUpdate
И что? Ничего не изменилось - если не щелкнуть на списке1, то список2 пустой.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2004, 17:07:03
    #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:08:10
    #32655376
Roma R
Roma R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заполнение списка при открытии формы
Так и должно быть, в первом списке значение не задано!
После заполнения первого списка, задайте значение, а потом заполняйте второй.
Me!Список1=Me.Список1.ItemData(0)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.08.2004, 17:10:54
    #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:13:32
    #32655391
Benzin
Benzin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Заполнение списка при открытии формы
Спасибо! С ItemData все заработало!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнение списка при открытии формы / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 310ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1672362]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 1ms
check topic access:
 1ms
track hit:
 49ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 27ms
get tp. blocked users:
 1ms
others: 204ms
total:  310ms
x
x
Закрыть


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