powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проверка в форме условия в запросе
17 сообщений из 17, страница 1 из 1
Проверка в форме условия в запросе
    #32444205
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всем добрый день. Есть проблема существует ленточная форма1
дата кто Сумма ОПЛ
на основе таблицы1. в этой форме поле-флажок "ОПЛ" при нажатии на который USER подтверждает что данную сумму можно оплатить
Вопрос можно ли написать условие что если общаяя сумма по табл1 - потдверждённая сумма в форме1 <0 то выскакавало сообщение
Спасибо
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32444213
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
private sub ПресловутоеПоле_afterupdate()
  if nz(me.ПолеСуммы, 0 )>dsum( "expr" , "tabl" ) then _
    msgbox  "Сообщение" 
end sub
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32444235
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо. а можно ли как нибудь ещё и связать по каким либо ктериям если к примеру и в таблице и форме будет ещё одно поле "категория" а вместо табл1 будет запрос с группировкой по этому полю и суммой в поле сумма?
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32444259
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dsum
f1 (и вообще можно его чаще нажимать)
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32444262
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ok !!
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447571
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прошу прощения опять возвращаюсь к своему вопросу (временно отсутсвовал)
Всё сделал как подсказали а именно:

Private Sub podtv_oplata_AfterUpdate()
If Me!summa_usd > DSum("ost", "ost_budjet", "Firma=" & Me![firma]) Then
MsgBox "STOP"

Где "Firma=" & Me![firma]-то самое условие
Без условия всё работает а с уловием выдает ошибку 64479
"Введённое в качестве параметра запроса выражение содержит ошибку.Объект не содержит программируемый объект"
Подскажите где я ложанулся спасибо
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447594
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может быть так:
Private Sub podtv_oplata_AfterUpdate()
If Me!summa_usd > DSum("ost", "ost_budjet", "Firma= Me![firma]") Then
MsgBox "STOP"
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447621
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Неет всеё равно та же ошибка
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447630
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если вот так:


Private Sub podtv_oplata_AfterUpdate()
If Me!summa_usd > DSum("ost", "ost_budjet", "Firma= Forms![Имя формы]![firma]") Then
MsgBox "STOP"
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447819
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Kучше, наверное, так:

If Me!summa_usd > DSum("ost", "ost_budjet", "Firma=""" & nz(Me![firma]) & """") Then

и почитать это :)
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32447822
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ок получилсь СПАСИБО.\
А можно прописать ещё одно условие
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449756
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Прошу прощения я начинающий
не подскажите как здесь в параметрах
If Me!summa_usd > DSum("ost", "ost_budjet", "Firma=""" & nz(Me![firma]) & """") Then
прописать ещё одно условие я попробовал так
If Me!summa_usd > DSum("ost", "ost_budjet", "Podr=""" & Me![podr] & """" And "Kategoriya=""" & Me![type_tov] & """") Then
MsgBox "STOP"

А мне выдаёт ошибку выполнения "13" несоответвие типа а если эти условия писать по одному то всё работает
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449789
Фотография Geo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
And должно находиться "внутри" строки.
Т.е. вместо
If Me!summa_usd > DSum("ost", "ost_budjet", "Podr=""" & Me![podr] & """" And "Kategoriya=""" & Me![type_tov] & """") Then
напиши
If Me!summa_usd > DSum("ost", "ost_budjet", "Podr=""" & Me![podr] & """ And Kategoriya=""" & Me![type_tov] & """") Then
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449795
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
"Podr=""" & Me![podr] & """" And "Kategoriya=""" & Me![type_tov] & """"

Я отметил зеленым кавычки, которые надо убрать. Слово And должно быть частью стринга, задающего условие. С этими кавычками получалось "string" and "string", т.е. попытка произвести логическую операцию над двумя стрингами и подсунуть результат в функцию DSum вместо стринга.
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449797
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Модератор форума
Абпаздал.
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449812
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А куда ставить то закрывающую "
...
Рейтинг: 0 / 0
Проверка в форме условия в запросе
    #32449818
asemel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Ок Спасибоочки получилось
...
Рейтинг: 0 / 0
17 сообщений из 17, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Проверка в форме условия в запросе
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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