|
|
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Люди! Ау! Разьясните на простом языке чё у меня происходит... У меня : 1) Есть Form1,задающая параметр в Table1 через Combobox 2) Есть Query1 , выбирающий записи на базе параметров Table1 из Table2(доставка груза в тоннах) 3) Есть Query2 , выбирающий записи на базе параметров Table1 из Table3(выход груза в тоннах) 4) Потом есть Query3 и Query4 - суммирующие все выбранные значения соответственно Query1 и Query2(то есть получаю две цифры) 5) ПОследняя Query5 - возвращает значение-разницу Query4-Query3(получаю результат именуемый скажем "остаток груза"). Есть Form2,которая отображает параметр Query5. Дак вот ! я сделал кнопку,похоже не так... поправьте меня плиз.... :( Ето кнопка в Form1 : Private Sub Command10_Click() Dim Label1 As Label Dim Label2 As Label Dim Balance As String On Error GoTo Label1 DoCmd.OpenForm "Form2", acNormal, , , , acHidden Balance = Forms![Form2]![Поле...] DoCmd.Close acForm, "Form2" Forms![customer and cargo for query]![BALANCE OF QUANTITY] = Balance GoTo ss2 Label1: Balance = 0 Forms![customer and cargo for query]![BALANCE OF QUANTITY] = Balance Msgbox"Заданные параметры ошибочны" Label2: End Sub Я думал,что если задам в Form1 реальные параметры выборки то все отработает... Так оно и есть... а вот если задаю нереальные... то есть генерирую ошибку... то ! (я то думал что присвоиться ноль и процедура завершиться... но...)Form2 вооще не запускается.... даже если впоследствии задать верный параметр,все-равно не запускается... приходится её открыть в Design-е и тогда снова выборка идет нормально... Плиз скажите чего я забыл добавить... Заранее спасибо за помощь в освоении Access-a :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 00:37 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Не думаю, что дело в этом, но все-таки. Код: plaintext 1. - это лишнее. Label - это не метка для перехода в программе, а объект - контрол, представляющий собой надпись при поле на форме. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 00:41 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Кстати, а где метка ss2, которая упомянута в программе??? Я не понимаю, почему эта программа не валится еще на этапе компиляции. Неужели это из-за простого отсутствия Option Explicit в начале модуля... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 00:46 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Владимир Саныч пардон,извиняюсь... упомянутая goto SS2 - это конечно-же goto Label2 (я для простоты заменил все реальные метки и реальные названия форм при копировании "кнопки"... а SS2 забыл в этом месте заменить...) Дак все-же... почему при использовании несуществующего параметра после отработки кнопки больше никогда не "оживает" Form2 ? Мне ощщень интересно почему это.. вроде ж все просто... Форма не должна отображать финальный результат... а потом при вводе нормального параметра она должна показать результат... а тут последнее Query считает все ОК а форма при этом не открывается вооще... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 18:34 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Но все-таки: Option Explicit в начале модуля есть или нет? Предлагаю его поставить и проверить, нет ли ошибок компиляции. И в любом случае, те две строки, которые я процитировал, - лишние. Если после обоих исправлений по-прежнему работать не будет, тогда будем думать дальше. :^) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 20:16 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Владимир Саныч, Чтоб долго не парить мозги сделал "Копи Пасте" :)) Чтоб было видно один в один как у меня ето все написано(Option Explicit есть...) Я боюсь может я чего не до конца обрисовал в предыдущих сообщениях... : Option Explicit ------------------------------------ Private Sub Command10_Click() Rem Dim SS1 As Label Rem Dim ss2 As Label Dim Balance As String On Error GoTo SS1 DoCmd.OpenForm "FINAL BALANCE MT", acNormal, , , , acHidden Balance = Forms![FINAL BALANCE MT]![Остаток на складе] DoCmd.Close acForm, "FINAL BALANCE MT" Forms![customer and cargo for query]![BALANCE OF QUANTITY] = Balance GoTo ss2 SS1: Balance = 0 Forms![customer and cargo for query]![BALANCE OF QUANTITY] = Balance ss2: End Sub Самая первая форма,где задаются параметры отбора и существует вышеуказанная кнопка ,содержит и поле-результат. Чуйствую что при отсутствии результата в форме FINAL BALANCE MT и происходит сбой... т.к. Кнопка "лезет" считать цифру а там её нет... там вообще ничего нет...но ёпрст... почему ж у меня не срабатывает в этом случае On error... неужели отсутствие результата и сбой при считывании поля не является ошибкой... И ничего не понимаю почему FINAL BALANCE MT при повторном (уже корректном)обращении не открывается вооще (как я и говорил ранее).. Блин... труба какая-то... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 20:33 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
REM при описании меток я по вашей рекомендации сделал... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 16.11.2003, 23:11 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
> Кнопка "лезет" считать цифру Кстати, не цифру, а строку. Переменная Balance ведь описана как строка. Я бы запустил построчно и посмотрел бы, на какой строке прекращается нормальная работа. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2003, 09:55 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Владимир Саныч , Благодарю за поддержку,но у меня из ряда фантастики решение.... Я ПРОСТО ПОПРОБОВАЛ заменить длинные названия форм аля "customer and cargo for query" на аббревиатуры(чтоб мне понятно было) соответственно получилось название CACFQ... И... :)) Прикол получился в мою сторону... все работает...Во труба... неужели в Акцесе такие глюки бывают... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2003, 23:10 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Ну чаво. Таки абзац. :^) Что еще можно сказать... ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 17.11.2003, 23:12 |
|
||
|
Форма на базе Query,которая суммирует еще ряд Query "замирает"
|
|||
|---|---|---|---|
|
#18+
Владимир Саныч, А пришел я к такому решению после того как попытался в редакторе войти в Object Browser... К моему полному удивлению там не было форм с вот такими длинными названиями... поэтому решил переделать... После того как все стало работать вспомнилось из третьей матрицы - "Матрица дала сбой" а также ListBox в голове "перекручивал" ряд препаратов из медицины аля ГЛЮконат натрия,ГЛЮкоза ну и там всякие слова с корнем Глюк :)) Хехе... познаю Акцесс... :)) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 18.11.2003, 12:01 |
|
||
|
|

start [/forum/topic.php?fid=45&msg=32325704&tid=1678174]: |
0ms |
get settings: |
6ms |
get forum list: |
12ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
42ms |
get topic data: |
7ms |
get forum data: |
2ms |
get page messages: |
33ms |
get tp. blocked users: |
1ms |
| others: | 200ms |
| total: | 309ms |

| 0 / 0 |
