Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Группа переключателей в заголовке формы / 6 сообщений из 6, страница 1 из 1
09.09.2019, 13:54
    #39859317
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
Здравствуйте,

Подскажите, пожалуйста, правильно ли написана процедура на Группу переключателей, находящейся в заголовке формы?
Есть форма как контейнер, в ней ленточная со списком фирм. Пытаюсь сделать фильтр списка переключателями, но выскакивает окно, с требованием ввести параметр (Поставщик/Покупатель/Партнер).

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub Группа730_AfterUpdate()

Select Case Группа730
        Case 1
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Поставщик"
        Case 2
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Покупатель"
        Case 3
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = Партнер"
        Case 4
            Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма order by Название"
    End Select

End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.09.2019, 14:12
    #39859328
ROI
ROI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
kniga,
"Select Фирма .* from Фирма where Контрагент = Поставщик"
может так
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.09.2019, 14:16
    #39859332
Serg197311
Serg197311
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
'Поставщик'
'Покупатель' и тд
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.09.2019, 14:46
    #39859361
Agapov_stas
Agapov_stas
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
kniga,

Поле " Контрагент " числовое (значение id из таблицы справочника) или текстовое?

Если первое, то необходимо указывать id из справочника, к примеру:
Код: vbnet
1.
Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = " & DLookup("id", "YourTableName", "[YourFieldName] = 'Поставщик'")



Если же второе (текст), то:
Код: vbnet
1.
Forms!Phonebook!objSubForm.Form.RecordSource = "Select * from Фирма where Контрагент = 'Поставщик'"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.09.2019, 14:47
    #39859364
Кривцов Анатолий
Кривцов Анатолий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
kniga, что из себя представляет поле "Контрагент" в таблице? Его тип?
Если это поле подстановки, то как выглядит его источник строк?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.09.2019, 15:19
    #39859386
kniga
kniga
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Группа переключателей в заголовке формы
Всем большое спасибо!

В копилку знаний добавилось то, что тип поля тоже на код влияет.
У меня тип поля [Контрагент] - Короткий текст, хотя и с подстановкой, поэтому одинарные кавычки решили вопрос ))

Я так и подозревал, что в каких то знаках "засада", пробовал двойные кавычки, скобки круглые, квадратные, амперсанд даже ставил, просто для меня как любителя все эти значки темный лес. ))

Еще раз спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Группа переключателей в заголовке формы / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 148ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1610488]:
 0ms
get settings:
 7ms
get forum list:
 11ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 43ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 12ms
total:  148ms
x
x
Закрыть


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