ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
25 сообщений из 180, страница 5 из 8
  5  все
в чем глюк?
    #32088073
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Так после первого If'a End где?
И вообще, чем делать пустой If, лучше
If Left$(Me.ttt.Value,6)<>"WHERE " Then
И не надо никакого Esle, и попонятнее будет.
...
Рейтинг: 0 / 0
09.01.2003, 12:48
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088076
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Тьфу ты, есть End If, недоглядел...
Ну так что, бросаешь окончательно? Тогда пойду пиво пит... И водку жрат... (шютка)
...
Рейтинг: 0 / 0
09.01.2003, 12:55
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088080
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
с закрытием ифов все нормально... почему он не обрабатывает
If Me.OPT.Value <> 0 Then -если она полная... и не обходит если пустая? (-1/0)
не поняла..((
...
Рейтинг: 0 / 0
09.01.2003, 12:57
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088082
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
ШЮТНИК!!!!!!!...)))
...
Рейтинг: 0 / 0
09.01.2003, 12:58
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088084
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
что делать-то?
...
Рейтинг: 0 / 0
09.01.2003, 13:02
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088105
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
А OPT какого типа? Случаем, не один из переключателей в группе?
...
Рейтинг: 0 / 0
09.01.2003, 13:19
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088114
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
это свободный переключатель... а что?
...
Рейтинг: 0 / 0
09.01.2003, 13:27
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088120
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
регулируется через:

Private Sub PERSONAL_BeforeUpdate(Cancel As Integer)
If PERSONAL.Value = -1 Then
TBS.Value = 0
SVA.Value = 0

TREIDING.Visible = True
mmm.Visible = True
rrr.Visible = True
OPT.Visible = True
Else
TREIDING.Visible = False
OPT.Visible = False
mmm.Visible = False
rrr.Visible = False
EEE.Visible = False
www.Visible = False
AKVA.Visible = False
TD.Visible = False
End If
... итд...
...
Рейтинг: 0 / 0
09.01.2003, 13:31
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088123
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Тогда надо было бы смотреть Value группы.
А так - не понимаю...
Поставь точку останова на этой строке (щелкни слева от окна кода, должна появиться жирная коричневая точка) и когда остановится, посмотри какое значение показывает (наведи курсор)
...
Рейтинг: 0 / 0
09.01.2003, 13:34
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088130
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
исправила... теперь глюк в CurrentDb.CreateQueryDef "SumLen", StrSQL--пишет:
ошибочное или пропущенное слово в инструкции select...
...
Рейтинг: 0 / 0
09.01.2003, 13:40
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088132
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Да я что, гадатель на кофейной гуще, что ли?
Не знаю ни как исправила, ни какая получается инструкция...
StrSQL посмотри в режиме останова!
Ctrl+G - окно отладки. В нем пишешь:
?StrSQL,
жмешь Энтер, получаешь StrSQL, постишь сюда.
...
Рейтинг: 0 / 0
09.01.2003, 13:42
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088137
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
блин это я недосмотрела... не ругай меня сильно, пожалуйста, мне и так совестно что я тебе ТАК надоедаю... все в порядке... СПАБИБО... с меня пиво...
...
Рейтинг: 0 / 0
09.01.2003, 13:47
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088164
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Что ж, рад за тебя!
Пиво принимается по адресу alexjuice@mtu-net.ru
А Аксесс не бросай, если что, поможем (пока пиво не кончится ;0)))
Впрочем, я сейчас работаю на связке Access 2000 + SQL Server 2000.
...
Рейтинг: 0 / 0
09.01.2003, 13:57
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088195
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
еще раз спасибо....!!!! что бы я без Вас делала...???
...
Рейтинг: 0 / 0
09.01.2003, 14:25
| Ответить | Цитировать | Написать  
в чем глюк?
    #32088262
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AlexJuice
Участник
Ну вот, пока помогал, так на ты, а как всё - так на Вы сразу...
Или это ко всем? Тогда с маленькой буквы надоть
...
Рейтинг: 0 / 0
09.01.2003, 15:08
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089369
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
и без вас всех, и без тебя конкретно...))
...
Рейтинг: 0 / 0
13.01.2003, 09:31
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089371
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
такое отработать может? если нет, то почему?

StrSQL = "SELECT FINAL_PRISE FROM GAZOLINE WHERE GAZOLINE.BREND= FORMS!SHABLON!GAZOLINE"
CurrentDb.CreateQueryDef "gaz", StrSQL
DoCmd.OpenQuery "gaz", acNormal, acEdit

MsgBox (StrSQL)
CurrentDb.QueryDefs.Delete "gaz" 'удалить существующий запрос с этим именем....

TXT3 = (Forms!SHABLON!COL_OF_GAZOLINE * GAZ.FINAL_PRISE)
TXT2 = (Forms!SHABLON!AVANS - TXT3)

If TXT2 > "0" Then
TXT1 = "O"
Else: TXT1 = TXT2
End If
ret = "UPDATE SHABLON SET GNOMER = FORMs!SHABLON!GNOMER, marka_avto=FORMs!SHABLON!marka_avto, driver=FORMs!SHABLON!driver, avans=" & TXT1 & ", DATES = FORMs!SHABLON!dates, gazoline=FORMs!SHABLON!gazoline, rashod=" & TXT2 & ", oplatit=" & TXT3 & ", col_of_gazoline=FORMs!SHABLON!col_of_gazoline WHERE AVANS= Forms!SHABLON!AVANS OR DATES<> Forms!SHABLON!DATES OR [PRIC E_FOR_LITTER]<>'Forms!SHABLON![PRIC E_FOR_LITTER]' OR DATE_OF_PRICE<> Forms!SHABLON!DATE_OF_PRICE OR COL_OF_GAZOLINE<> Forms!SHABLON!COL_OF_GAZOLINE;"


CurrentDb.CreateQueryDef "raschet", ret
DoCmd.OpenQuery "raschet", acNormal, acEdit

CurrentDb.QueryDefs.Delete "raschet" 'удалить существующий запрос с этим именем....
...
Рейтинг: 0 / 0
13.01.2003, 09:36
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089381
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
Принципиально да, тольо надо синтаксис подправить\r
Код: plaintext
StrSQL =  "SELECT FINAL_PRISE FROM GAZOLINE WHERE GAZOLINE.BREND="  & FORMS!SHABLON!GAZOLIN
\r
кол-во кавычек зависит от типа данных, вот здесь я подымал этото вопрос - \r
\r
Не понятно зачем вот эта строка\r
Код: plaintext
DoCmd.OpenQuery  "gaz" , acNormal, acEdit
\r
ты уверена что юзверу надо это видеть???\r
тем более, что открытый запрос/таблицу/форму Access не даст удалить...\r
Код: plaintext
TXT3 = (Forms!SHABLON!COL_OF_GAZOLINE * GAZ.FINAL_PRISE)
\r
эта запись неверна потому что значение умножить на поле тяжело.\r
если ты уверена что в запросе м.б. только одна запись то вполне подойдёт DMax (да простят меня гуру), если нет то RecordSet копай.\r
Код: plaintext
1.
If TXT2 >  "0 " Then \r
TXT1 =  "O"
\r
ноль не надо ставить в кавычки, а вот букву О во 2ой строчке надо, я так понимаю что это опечатка\r
насчёт UPDATE запроса смотри то же что и для первого + тебе надо просто сформировать запрос или выполнить его?\r
если всё таки проапдейтить таблицу SHABLON\r
то удобнее будет использовать \r
CurrentDb.Execute ret\r
\r
И ещё так осебятина\r
я вижу что ты постоянно пишишь FORMs!SHABLON ты что пишишь этот код не под форму SHABLON? если под неё то с моей точки зрения удобнее будет писать - me.marka_avto\r
короче писать да и Access подсказывает
...
Рейтинг: 0 / 0
13.01.2003, 10:11
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089383
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
СИБ-СИБ...
...
Рейтинг: 0 / 0
13.01.2003, 10:14
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089384
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
с тегами напутал ссори\\r
ссылка /topic/177
...
Рейтинг: 0 / 0
13.01.2003, 10:14
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089390
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
мне надо посчитать количество записей в форме, как это сделать?
можно ли отчеты лепить динамически по запросу, а не использовать шаблон?
...
Рейтинг: 0 / 0
13.01.2003, 10:20
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089400
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
1ое почитай здесь там в конце подбитие итогов с первым местом я ошибся, сам юзаю такую функцию\r
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Function CheckSQKStr(SQLstr As String) As Boolean\r
Dim rst As Recordset\r
  Set rst = CurrentDb.OpenRecordset(SQLstr)\r
  If Not (rst.EOF And rst.BOF) Then\r
    CheckSQKStr = True \'здесь есть хоть одна запись\'\r
\'добавя сюда строку - что-то=rst.RecordCount получишь кол-во записей\'\r
  Else\r
    CheckSQKStr = False\r
  End If\r
  rst.Close\r
  Set rst = Nothing\r
End Function
\r
\r
насчёт второго не в курсе мало пользовал, или мало информации попробую по конкретнее описать проблему
...
Рейтинг: 0 / 0
13.01.2003, 10:28
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089413
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
это отработало... спасибо...
...
Рейтинг: 0 / 0
13.01.2003, 11:07
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089416
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
яяя
Участник
как сделать так, чтобы результат запроса сливался в определенное поле в форме?...
...
Рейтинг: 0 / 0
13.01.2003, 11:10
| Ответить | Цитировать | Написать  
в чем глюк?
    #32089425
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
назначить его rowsourse'ем
...
Рейтинг: 0 / 0
13.01.2003, 11:15
| Ответить | Цитировать | Написать  
25 сообщений из 180, страница 5 из 8
  5  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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