powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / проверка по условию
9 сообщений из 34, страница 2 из 2
проверка по условию
    #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
9 сообщений из 34, страница 2 из 2
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / проверка по условию
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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