ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / помогите розобраться с уловием if then...
25 сообщений из 51, страница 1 из 3
  1  все
помогите розобраться с уловием if then...
    #32718955
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Наверно я как дрова.
Вот такой у меня код :
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Private Sub СведенияВладелец_Click()
On Error GoTo Err_СведенияВладелец_Click

    Dim stDocName As String
    Dim stLinkCriteria As String
    
   
    stDocName = ChrW( 1042 ) & ChrW( 1083 ) & ChrW( 1072 ) & ChrW( 1076 ) & ChrW( 1077 ) & ChrW( 1083 ) & ChrW( 1077 ) & ChrW( 1094 )
     stLinkCriteria = "[КВ]=" & Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]
       If stLinkCriteria = "" Then
     DoCmd.OpenForm "Владелец"
     Else
      DoCmd.OpenForm stDocName, , , stLinkCriteria
    
       End If
Exit_СведенияВладелец_Click:
    Exit Sub

Err_СведенияВладелец_Click:
    MsgBox Err.Description
    Resume Exit_СведенияВладелец_Click
    
End Sub
Суть в том, что бы при наличии в поле владельца (в подчинённой форме) форма Владелец открывалась с этой записью, а при отсутствии....просто открывалась.
Не работает. Говорит "Введенное выражение не содержит значения"
...
Рейтинг: 0 / 0
30.09.2004, 17:39:56
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32718983
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
If isnull(Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]) Then
DoCmd.OpenForm stDocName
Else
DoCmd.OpenForm stDocName, , , "[КВ]=" & Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]
End If
...
Рейтинг: 0 / 0
30.09.2004, 18:20:10
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32718997
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ищ
Гость
вот эта строка
stLinkCriteria = "[КВ]=" & Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]

если владелец пуст
то
stLinkCriteria = "[КВ]="

если не пуст
stLinkCriteria = "[КВ]=ля-ля"

т.е. у тебя получается , что переменная stLinkCriteria НИКОГДА не бывает равной ""

поэтому на условие IF всегда выполняется
DoCmd.OpenForm stDocName, , , stLinkCriteria
...
Рейтинг: 0 / 0
30.09.2004, 18:24:28
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719005
ищ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ищ
Гость
эх ВС, ВС
не дал человеку подумать
...
Рейтинг: 0 / 0
30.09.2004, 18:25:33
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719017
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Спасибо!
Вот только насчет "" я не очень понял - я вроде смотрел в окошке перменных - когда нет Владельца она именно "".
Вообщем вроде понял, но не до конца
...
Рейтинг: 0 / 0
30.09.2004, 18:29:24
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719020
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
ищэх ВС, ВС
не дал человеку подумать
Каюсь! :^)
...
Рейтинг: 0 / 0
30.09.2004, 18:31:55
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719023
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
vearlenВот только насчет "" я не очень понял - я вроде смотрел в окошке перменных - когда нет Владельца она именно "".
Не верю.
...
Рейтинг: 0 / 0
30.09.2004, 18:32:36
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719031
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
щас еще раз посмотрю - внимательно.
посмотрел - действительно - могу print screen сделать.
Мне просто самому интересно же ж понять....
...
Рейтинг: 0 / 0
30.09.2004, 18:35:44
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719043
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Владимир Саныч vearlenВот только насчет "" я не очень понял - я вроде смотрел в окошке перменных - когда нет Владельца она именно "".
Не верю.
...
Рейтинг: 0 / 0
30.09.2004, 18:43:14
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719050
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Блин. Мы в отладчике или где?

Ну так ошибка же произошла. Программа ушла на обработку ошибки. А переменная не успела получить никакого значения. И форма уже не откроется, потому что на команду открывания формы программа уже не вернется.
...
Рейтинг: 0 / 0
30.09.2004, 18:47:31
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719055
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Владимир СанычБлин. Мы в отладчике или где?

Ну так ошибка же произошла. Программа ушла на обработку ошибки. А переменная не успела получить никакого значения. И форма уже не откроется, потому что на команду открывания формы программа уже не вернется.
Ну во-первых япредупреждал - что "как дрова".
А во вторых - как я как "обычный" пользователь тогда должен понять, что вызвало ошибку - если Владимир Санычпеременная не успела получить никакого значения ( я ж это и указал в условии).
...туплю наверно
...
Рейтинг: 0 / 0
30.09.2004, 18:53:11
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719061
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
vearlenкак я как "обычный" пользователь тогда должен понять, что вызвало ошибку
Обычный пользователь этого понимать не должен. А программист должен довести отладку до конца, устранить баги, ну типа как большой. Тогда у пользователя этих ошибок не будет.
...
Рейтинг: 0 / 0
30.09.2004, 18:56:00
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719068
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
а еще...можно спросить...я наверно чего-то не так сделал.
Написал как было рекомендовано...
Код: plaintext
1.
2.
3.
4.
If IsNull("[КВ]=" & Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]) Then
        DoCmd.OpenForm stDocName
Else

        DoCmd.OpenForm stDocName, , , "[КВ]=" & Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]
и ни фига....
...
Рейтинг: 0 / 0
30.09.2004, 18:59:35
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719086
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
vearlenНаписал как было рекомендовано...
Рекомендовано было не так. В первой строке "[КВ]=" & лишнее.
...
Рейтинг: 0 / 0
30.09.2004, 19:14:44
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719098
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
и ни фига.... все равно
...
Рейтинг: 0 / 0
30.09.2004, 19:19:33
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719107
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Я пас. Я не умею отлаживать программу на расстоянии. По телефону отлаживал, но мне человек говорил, на какую строку программа заходит и чему равны значения переменных. Телепатически - нет, не умею, сдаюсь.
...
Рейтинг: 0 / 0
30.09.2004, 19:26:47
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719116
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лифчик
Участник
Я в окошке проекта не вижу формы с названием "Лицензия". Поскольку контрол Subform в главной форме имеет название [подчиненная форма Лицензия], то подозреваю, что форма с похожим названием должна быть. Правда, окно не до конца прокручено
...
Рейтинг: 0 / 0
30.09.2004, 19:34:41
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719123
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
ЛифчикЯ в окошке проекта не вижу формы с названием "Лицензия". Поскольку контрол Subform в главной форме имеет название [подчиненная форма Лицензия], то подозреваю, что форма с похожим названием должна быть. Правда, окно не до конца прокручено
а такой формы и нет :( я не понял почему должна быть форма с названием Лицензия.
...
Рейтинг: 0 / 0
30.09.2004, 19:38:38
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719129
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Хотя вопрос Лифчика не совсем корректен, я с ним (с вопросом и с Лифчиком) согласен. В контроле "подчиненная форма Лицензия" какая форма находится?
...
Рейтинг: 0 / 0
30.09.2004, 19:41:54
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719134
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Там находится "подчиненная форма Лицензия" - она так называется. (
...
Рейтинг: 0 / 0
30.09.2004, 19:45:36
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719145
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
В основной форме [Месторождения_ввод] находится подчинённая, созданная мастером и т.д... и называется она подчин...Лицензия, потому, что сделана на основе таблицы Лицензия. я беру из подчинённой значение КВ (код владельца) и открываю форму Владелец.
...
Рейтинг: 0 / 0
30.09.2004, 19:51:46
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719148
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
А. С вопросом Лифчика все понятно. Лифчик, у этой формы нет модуля, поэтому мы ее тут не видим.
...
Рейтинг: 0 / 0
30.09.2004, 19:52:54
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719160
Фотография Лифчик
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лифчик
Участник
Тогда можно узнать, как называется контрол в котором расположена подчиненная форма лицензия, у которой нет модуля и поэтому ее не видно в окне проэкта :)
...
Рейтинг: 0 / 0
30.09.2004, 20:00:42
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719165
vearlen
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vearlen
Участник
Боюсь проявить свою полную некомпетентность, но контрол ....в котором расположена подчинённая форма лицензия по-моему называется подчин...форма лицензия :(
...
Рейтинг: 0 / 0
30.09.2004, 20:06:43
| Ответить | Цитировать | Написать  
помогите розобраться с уловием if then...
    #32719169
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Предлагаю добавить в окошко наблюдаемых переменных следующую штуку:

Forms![Месторождения_ввод]![подчиненная форма Лицензия].Form![Владелец]
...
Рейтинг: 0 / 0
30.09.2004, 20:11:54
| Ответить | Цитировать | Написать  
25 сообщений из 51, страница 1 из 3
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / помогите розобраться с уловием if then...
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32719129&tid=1671357]:
 0ms
get settings:
 8ms
get forum list:
 13ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 51ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 59ms
get tp. blocked users:
 1ms
others: 233ms
total:  379ms
созд. / загр.: 379ms
x
x
Закрыть


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