powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / проверка по условию
34 сообщений из 34, показаны все 2 страниц
проверка по условию
    #39687865
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день. Есть форма для отбора записей (см. рис.) надо чтоб при постановке птички во вторую строку выдавало сообщение что такой покупатель уже есть (MsgBox "Покупатель с таким кодом уже есть." & vbCrLf & "Выберите только одного!!!!").
...
Рейтинг: 0 / 0
проверка по условию
    #39687868
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
забыл написать запрос с полями SELECT tbKlient.KodKl, tbKlient.Post, tbKlient.flag FROM tbKlient
знаю что нужно поставить событие flag_AfterUpdate() но не могу найти простое решение.
...
Рейтинг: 0 / 0
проверка по условию
    #39687874
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вообще-то у флажка есть событие Click Вот на него и надо вешать обработку
...
Рейтинг: 0 / 0
проверка по условию
    #39687877
Фотография Joss
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А можно сформировать стандартный запрос в конструкторе по поиску дубликатов и сразу выводить признак в форме отчёта
...
Рейтинг: 0 / 0
проверка по условию
    #39687902
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_AngДобрый день. Есть форма для отбора записей (см. рис.) надо чтоб при постановке птички во вторую строку выдавало сообщение что такой покупатель уже есть (MsgBox "Покупатель с таким кодом уже есть." & vbCrLf & "Выберите только одного!!!!").Вы не пояснили с каким "каким" кодом-кодовое поле не допускает совпадений-потому оно и кодовое.Если же Вы хотите проверить какое-то другое на совпадения воспользуйтесь функциями Dcount или Dlookup (и зачем флажок-эту проверку можно провести на "до обновления" поля еще при создании новой записи)
...
Рейтинг: 0 / 0
проверка по условию
    #39687912
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, запись в форме уже выводится по выбору даты. там не надо ничего вводить. когда ставишь галочку идет проверка по коду покупателя (ключевое поле). если оно уже есть - водит сообщение
...
Рейтинг: 0 / 0
проверка по условию
    #39687914
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
отчеты никакие не надо выводить - это все сделано для того чтобы эти записи экспортировать в файл без повторов чисто для пользователей чтоб они не поставили галочку на одинаковых клиентов
...
Рейтинг: 0 / 0
проверка по условию
    #39687924
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Angотчеты никакие не надо выводить - это все сделано для того чтобы эти записи экспортировать в файл без повторов чисто для пользователей чтоб они не поставили галочку на одинаковых клиентовкакой файл? ТТН-ки?
...
Рейтинг: 0 / 0
проверка по условию
    #39687953
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прогер_самоучка, xml
...
Рейтинг: 0 / 0
проверка по условию
    #39687956
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Ang, клиентов нужно выводить один раз. введите в запрос distinct и вся недолга.
что такое "код" для юзера? типа насморка - и ему не пофиг что у кого то насморк?
...
Рейтинг: 0 / 0
проверка по условию
    #39687960
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
JossА можно сформировать стандартный запрос в конструкторе по поиску дубликатов и сразу выводить признак в форме отчётав свободное поле файл вывести текст "есть" или "нет" (или флажок) как-то так:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Dim povtor
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","серия='" & me.серия & "' and [№ ТТН]='" & me.[№ ТТН])
if isNull(povtor) then
    me.файл="нет"
else
    me.файл="да"
end if
...
Рейтинг: 0 / 0
проверка по условию
    #39687966
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Ang,
А Вы не хотите показать свою БД и вкратце описать её задачи
(я смутно подозреваю что структура не верна)
...
Рейтинг: 0 / 0
проверка по условию
    #39687987
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вдогонку-не дописал апостроф в конце :
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","серия='" & me.серия & "' and [№ ТТН]='" & me.[№ ТТН] & "'" )
...
Рейтинг: 0 / 0
проверка по условию
    #39687989
Фотография Tarasios
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Angотчеты никакие не надо выводить - это все сделано для того чтобы эти записи экспортировать в файл без повторов чисто для пользователей чтоб они не поставили галочку на одинаковых клиентов
Если задача чисто "эти записи экспортировать в файл без повторов", то можно, по идее, сделать всё проще.
Отдельным запросом данные группировать (при этом совпадающие записи "схлопываются" в одну) и уже итог экспортировать.
...
Рейтинг: 0 / 0
проверка по условию
    #39688013
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, вкартце поясняю: на форму выводятся все записи по указанной дате, далее пользователь сам ставит птички на тех покупателей, которые ему нужны для дальнейшего экспорта в файл. и если вдруг поставит на одинаковых покупателях птичку, то должно выводится сообщение. как-то так
...
Рейтинг: 0 / 0
проверка по условию
    #39688030
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Angsdku, вкартце поясняю: на форму выводятся все записи по указанной дате, далее пользователь сам ставит птички на тех покупателей, которые ему нужны для дальнейшего экспорта в файл. и если вдруг поставит на одинаковых покупателях птичку, то должно выводится сообщение. как-то такоспади, ну выводите, в чём сложность?
Вешайте на клик поля мессадж при условии, что такой уже есть и галка проставлена. И не ставьте галку. Хотя...
Можете и ставить галку, ведь на на этого покупателя должна же формироваться выгрузка :)
Да и нужно ли предупреждать...
...
Рейтинг: 0 / 0
проверка по условию
    #39688070
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Прогер_самоучка...Да и нужно ли предупреждать... А если для Иван Иваныча одно,а для Федор Федорыча другое -для извлечения данных не соответствующих действительности в полном объеме лучше всего подойдет простой запрос-хрен его знает какие понадобятся в данный момент)
...
Рейтинг: 0 / 0
проверка по условию
    #39688113
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sdkuПрогер_самоучка...Да и нужно ли предупреждать... А если для Иван Иваныча одно,а для Федор Федорыча другое -для извлечения данных не соответствующих действительности в полном объеме лучше всего подойдет простой запрос-хрен его знает какие понадобятся в данный момент) я так и не понял, что выгружается в xml
признаю, сам не совсем правильно поставил вопрос.
Там я хотел спросить что выгружается в файл.
...
Рейтинг: 0 / 0
проверка по условию
    #39688178
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sdku, вот база с вашим кодом на событие. сообщение не выдает. проверьте так ли я сделал. установите дату 10/08/2018 и нажмите кнопку обновить.
...
Рейтинг: 0 / 0
проверка по условию
    #39688304
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Ang,
Вот сообщение которое Вы хотите вывести:""Выберите только одного для экспорта!!!!"
Стесняюсь спросить:какие данные и куда Вы хотите экспортировать??
...
Рейтинг: 0 / 0
проверка по условию
    #39688308
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sdkuкуда Вы хотите экспортировать??
Oleg_Angxml


sdkuСтесняюсь спросить:какие данныевы стесняетесь, а я спросил :)

Прогер_самоучкачто выгружается в файл?
...
Рейтинг: 0 / 0
проверка по условию
    #39688349
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
оторажаются все ттн при чем выбирать нужно клиентов... (?) вобщем при выборе клиента галки ставим и снимаем на всех ттн которые им направлены :)
...
Рейтинг: 0 / 0
проверка по условию
    #39688430
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Ang,
Посмотрел схему данных.
Не увидел связи между таблицами (ACCESS-реляционная система управления БД-то есть предполагает связи между таблицами-иначе это листы Ёкселя)
Принципы EXCEL не применимы в ACCESS
Если в БД ACCESS отсутствуют связи между таблицами то из неё навряд-ли выйдет что-либо путное
...
Рейтинг: 0 / 0
проверка по условию
    #39688504
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
доброе утро sdku, схемы нет ибо это кусочек формы из общей программы для решения узко поставленной мной задачи. вся прога не вместилась бы в 150 кб потому и схему не перенесла. я чет не могу понять зачем вам лишняя инфа по экспорту данных в файл. я просто попросил помочь вывести сообщение при нажатие птички на одинаковых клиентах. дальше у меня все работает нормально.
...
Рейтинг: 0 / 0
проверка по условию
    #39688505
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alecko, не то что я хотел). у вас сразу птичка ставится на втором одинаковом клиенте, а мне надо чтоб выводилось сообщение когда сам ставишь птичку и предупреждало сообщением.
...
Рейтинг: 0 / 0
проверка по условию
    #39688549
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Angalecko, не то что я хотел). у вас сразу птичка ставится на втором одинаковом клиенте, а мне надо чтоб выводилось сообщение когда сам ставишь птичку и предупреждало сообщением.Вы слушаете о чём вас спрашивают?
Я 2 раза вас спрашивал про ТТН!
Не поленился и скачал вашу базу и точно, у вас там выборка с этим условием.
Я вас ещё раз спрашиваю, по-русски, галочка не должна ставиться только если покупатель такой есть или всё-таки помимо этого нужно, чтоб и ттн сверялись на повтор? !
...
Рейтинг: 0 / 0
проверка по условию
    #39688633
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прогер_самоучка, ТТН там всегда будет разная а вот покупатель иногда (редко) повторяется. а в базе я написал с проверкой на ТТН для отработки выражения который мне прислали
Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
[/SRC]Dim povtor
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","серия='" & me.серия & "' and [№ ТТН]='" & me.[№ ТТН])
if isNull(povtor) then
    me.файл="нет"
else
    me.файл="да"
end if 
[SRC PLSQL]


вообще мне надо чтоб на втором повторе клиента галочка не ставилась и выдавало сообщение. так понятно?
...
Рейтинг: 0 / 0
проверка по условию
    #39688683
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_AngПрогер_самоучка, ТТН там всегда будет разная а вот покупатель иногда (редко) повторяется. а в базе я написал с проверкой на ТТН для отработки выражения который мне прислали
Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
[/SRC]Dim povtor
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","серия='" & me.серия & "' and [№ ТТН]='" & me.[№ ТТН])
if isNull(povtor) then
    me.файл="нет"
else
    me.файл="да"
end if 
[SRC PLSQL]



вообще мне надо чтоб на втором повторе клиента галочка не ставилась и выдавало сообщение. так понятно?Надо, так надо.
Файл во вложении.
...
Рейтинг: 0 / 0
проверка по условию
    #39688718
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Ang,
ну напишите так(учтите замечания ниже):
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Private Sub флажок_BeforeUpdate(Cancel As Integer)
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","кодПокупателя=" & me.кодПокупателя & " and дата=#" & format(me.дата,"mm\/dd\/yy") & "#")
if not isNull(povtor) then
msgbox "уже есть"
me.флажок=""
end if 
End Sub

Oleg_Angsdku, запись в форме уже выводится по выбору даты. там не надо ничего вводить. когда ставишь галочку идет проверка по коду покупателя (ключевое поле). если оно уже есть - водит сообщениеВозникает вопрос по форме:на опубликованном скрине я не вижу поля [кодПокупателя]-о какой проверке по этому полю идет речь если его нет на форме
...
Рейтинг: 0 / 0
проверка по условию
    #39688735
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вернее так:
Код: vbnet
1.
povtor=Dlookup("кодовоеПолеТаблицы","имяТаблицы","кодПокупателя=" & me.кодПокупателя & " and дата=#" & format(me.дата,"mm\/dd\/yy") & "# and флажок")
...
Рейтинг: 0 / 0
проверка по условию
    #39688859
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему я говорю о структуре?
Вы пытаетесь отобрать какие-то данные для экспорта куда-то но по сути весь отбор сводится к ответу на один простой вопрос-экспортировать имена клиентов для которых были совершены отгрузки(не важно их количество)в указанную дату и только.
При наличии таблицы "отгрузки" (в которой указывать все данные по отгрузке-№ТТН, дату, клиента и т.д.,подчиненную ей таблицу "составОтгрузки" с указанием всех товаров\материалов, их количество, цену и прочие подробности в отгрузке) получение этих данных элементарно + всегда можно извлечь данные по конкретной отгрузке для конкретных клиентов и т.д. и т.п.
Короче: структура это первооснова, избавляющая от лишних телодвижений при извлечении нужных данных (разработка форм,отчетов,запросов до создания не продуманной до мелочей структуры таблиц, равносильно постановке телеги впереди лошади)
...
Рейтинг: 0 / 0
проверка по условию
    #39689249
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
все работает, но есть один минус. когда снимаешь птичку с первого одинакового клиента опять появляется сообщение. (можете сами убедиться потестив пример)

РS отвечаю на вопрос : кода клиента нет на форме, т.к. он в режиме конструктора не выводит на экран.
схема есть. я ж писал выше что просто выдернул форму в новую базу для пересылки сюда.
...
Рейтинг: 0 / 0
проверка по условию
    #39689279
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Oleg_Angвсе работает, но есть один минус. когда снимаешь птичку с первого одинакового клиента опять появляется сообщение. (можете сами убедиться потестив пример)ну так и поставьте дополнительное условие, чтоб только в одну сторону работало
Код: vbnet
1.
If v > 0 And flag.Value <> 0 Then
...
Рейтинг: 0 / 0
проверка по условию
    #39689298
Oleg_Ang
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прогер_самоучка, Большое спасибо за помощь)
...
Рейтинг: 0 / 0
34 сообщений из 34, показаны все 2 страниц
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / проверка по условию
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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