powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
180 сообщений из 180, показаны все 8 страниц
в чем глюк?
    #32087251
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
хелп... допустим у меня два запроса типа:

SELECT *
FROM AVTO
WHERE GNOMER like 'GNOMER' AND MARKA_AVTO like 'MARKA' AND DRIVER LIKE 'DRIVER' AND AVANS LIKE 'AVANS';

SELECT *
FROM AVTO
WHERE SVA like '%$SVA%' AND TBS like '%$TBS%' AND PERSONAL LIKE '%$PERSONAL%' AND OPT LIKE '%$OPT%' AND AKVA LIKE '%$AKVA%' AND TD LIKE '%$TD%' AND TREIDING LIKE '%$TREIDING%';

ни один не работает... кто скажет в чем дело? буду признательна...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087266
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
SELECT * 
FROM AVTO 
WHERE ((GNOMER like  "GNOMER" ) AND (MARKA_AVTO like  "MARKA" ) AND (DRIVER LIKE  "DRIVER" ) AND (AVANS LIKE  "AVANS" ));


Если всё таки работаешь в AccESS, насчёт скобочек они вроде не обязательны но иногда помогают
...
Рейтинг: 0 / 0
в чем глюк?
    #32087293
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
всеравно не работает...(((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087318
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не работает это как?
не запускается или не выдаёт результат?
если последнее поэкспирементируй со звёздочками у меня подобный глюк был
...
Рейтинг: 0 / 0
в чем глюк?
    #32087354
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А в чем смысл использования LIKE без звездочек???
Это аналогично "="

Процент - это в СКУЛе, а в Аксессе - звездочка.
...
Рейтинг: 0 / 0
в чем глюк?
    #32087381
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
(((... всеравно труп... результата как не было так и нет...(((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087382
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. В КАКОМ виде не работает?
2. КАК не работает?
- выдает ошибку?
- не возвращает записей?
- ........?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087393
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не возвращает записей...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087397
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот в таком виде:

SELECT *
FROM AVTO
WHERE ([GNOMER] Like "*GNOMER*" And [MARKA_AVTO] Like "*MARKA*" And [DRIVER] Like "*DRIVER*" And [AVANS] Like "*AVANS*");


тоже не работает...

да и так тоже не хочет(((...

SELECT GNOMER, DRIVER
FROM AVTO
WHERE ((SVA)="-1" Or (TBS)="-1" Or (PERSONAL)="-1" And (OPT)="-1" And (AKVA)="-1" And (TD)="-1" And (TREIDING)="-1");

маразм.... главное по-отдельности шуршит... а когда в кучу складываешь --- не хочет... что делать???...

все вариатты испробовала... никак этот маразм не лечится... (((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087402
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
помогите пожалуйста... 5 часов уже ногти об клаву стачиваю... а результат нулевой...

до конца жизни благодарна буду... чесс слово...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087416
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сделай через конструктор учитывая * и ""
AccESS допишет ещё кучу всякого, но должно помочь
...
Рейтинг: 0 / 0
в чем глюк?
    #32087429
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Sfagnum...

не помогает... никакой реакции...(((
если к 3-м часам не сделаю - повешусь... или увольняться пойду... маразм... сколько раз предлагала не использовать аксесс... так нет...(((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087431
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что в другом треде не отвечают? Почитай!
...
Рейтинг: 0 / 0
в чем глюк?
    #32087441
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
читала... только что от туда...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087452
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну ещё один глупый совет, попробуй добавлять условия по нарастающей может что проясниться?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087454
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А типы полей какие??? Это должно срабатывать только для текстовых. И зачем имена полей в скобках? И еще непонятно сочетание Or & And без всяких группировок...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087455
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
на первом же условии никакой реакции....
...
Рейтинг: 0 / 0
в чем глюк?
    #32087457
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 AlexJuse...
поля текстовые... зачем в скобках?... добрые люди посоветовали... а что не нужно скобочек?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087463
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как понять без групировок?...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087465
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
кстати у меня подобная конструкция в скуле отрабатывала... но там был еще $...
почему же здесь не работает... я в шоке...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087469
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087473
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
поля text не memo

и вариант

Код: plaintext
1.
2.
SELECT * 
FROM AVTO 
WHERE (((AVTO.GNOMER) Like  "*GNOMER*" ));


не идёт, при этом значение - GNOMER присутствует в таблице AVTO в поле GNOMER

Если всё так, то я умываю руки...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087474
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насчет скобок, вероятно, имели в виду разделить ими условия.
Впрочем, у меня такого рода запросы никогда не глючили...
Без тестовых данных тут ничего не посоветуешь.
Кстати, а зачем текстовые поля "-1"? Или это dbf?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087476
Владимир Смирнов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Приведите пример, одну-две записи из тех, которые должны выбраться Вашим запросом.
...
Рейтинг: 0 / 0
в чем глюк?
    #32087483
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
касательно gnomer:
GNOMER MARKA
Т191МС50 Газель 33021
К072АВ50 ГАЗ 3307
К094АВ50 ГАЗ-2757АО

а там где -1 - формат логический... только я не поняла, что здесь выборку сделать не получится...?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087489
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
SELECT * 
FROM AVTO 
WHERE (((AVTO.GNOMER) Like  "*Т191МС50*" ));


НЕ РАБОТАЕТ?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087495
Владимир Смирнов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если в запросах Вы хотите использовать переменные параметры (те, что после Like), то это делается не так.
...
Рейтинг: 0 / 0
в чем глюк?
    #32087502
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
на это он говорит что там ошибка синтаксиса... ((( мне нужен запрос, который значение для поиска будет брать из окошек как это сделать не подскажешь?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087509
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как это делать правильно? подскажите... научите...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087514
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это делается через VBA, но сперва надо получить рабочий запрос хотябы через конструктор на ЛЮБЫХ значениях а дальше проще
...
Рейтинг: 0 / 0
в чем глюк?
    #32087517
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как получить рабочий запрос?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087520
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
с номером подставленным в запрос отработало... что дальше?...
простите чайкика))
...
Рейтинг: 0 / 0
в чем глюк?
    #32087521
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Like применяется только к текстовым полям. Для логических полей подойдет
-1 без кавычек.
Если нужен параметр, то так:
PARAMETERS [MyText] Text ( 255 );
SELECT Q1.tablename, Q1.shift
FROM Q1
WHERE (((Q1.tablename) Like "*" & [MyText] & "*"));
Q1 - имя таблицы
...
Рейтинг: 0 / 0
в чем глюк?
    #32087531
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно еще так условие задать:
Код: plaintext
1.
WHERE
AVTO.GNOMER LIKE [Forms]![Car_Select_Form]![GNOMER];
...
Рейтинг: 0 / 0
в чем глюк?
    #32087532
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
СПАСИБО... ОТРАБОТАЛО... УРА....... БЫЛ-БЫ ПОБЛИЖЕ - РАСЦЕЛОВАЛА БЫ!!!
...
Рейтинг: 0 / 0
в чем глюк?
    #32087536
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
БЫЛ-БЫ ПОБЛИЖЕ - РАСЦЕЛОВАЛА БЫ!!!

А можно узнать, к кому относится это сообщение?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087541
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
но мне бы хотелось чтобы он не запрашивал параметры а брал их сам из соответствующих окошек... не подскажете как это сделать...
не сочтите за наглость...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087543
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
к тебе Алекс...))
...
Рейтинг: 0 / 0
в чем глюк?
    #32087544
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а дальше? как быть дальше?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087546
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Совмести мой ответ с ответом mahoune

Like "*" & [Forms]![Main]![Поле5] & "*"

Кстати, его тоже можешь расцеловать - я не жадный ;0)
...
Рейтинг: 0 / 0
в чем глюк?
    #32087548
Владимир Смирнов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вам уже ответил mahoune:
Код: plaintext
1.
WHERE
AVTO.GNOMER LIKE [Forms]![Car_Select_Form]![GNOMER];

Здесь [Forms]![Car_Select_Form]![GNOMER] - значение, которое берётся из формы Car_Select_Form из поля GNOMER .
...
Рейтинг: 0 / 0
в чем глюк?
    #32087550
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
хорошо... тогда расцелую обоих...))
...
Рейтинг: 0 / 0
в чем глюк?
    #32087553
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2яяя, Смотри мой пример
Вариант Alex предполагал, что перед вызовом, ты задаш значение для параметра
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
  Dim qdf As DAO.QueryDef
  Dim rst As DAO.Recordset
  Set qdf = CurrentDb.QueryDefs( "QRY_CAR_SELECT" )
  qdf.Parameters( "MyText" ) =  "То что мы хотим найти" 
  Set rst = qdf.OpenRecordset

  Set qdf = Nothing
  Set rst = Nothing

 -- Где QRY_CAR_SELECT тот запрос, что AlexJuice дал
 


либо мой
Код: plaintext
1.
2.
3.
4.
[Forms]![Car_Select_Form]![GNOMER];

Car_Select_Form - Название формы где задают значение.
GNOMER - Название поля в котором храним значение для поиска!
...
Рейтинг: 0 / 0
в чем глюк?
    #32087555
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вернее всех... кто помогал... и терпел мои дурные вопросы...)) СПАСИБО...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087558
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 mahoune:

[Forms]![Car_Select_Form]![GNOMER];

А где Like-то???
...
Рейтинг: 0 / 0
в чем глюк?
    #32087560
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> вернее всех... кто помогал... и терпел мои дурные вопросы...)) СПАСИБО...\r
\r
Пожалуйста... Хотя меня, пожалуй, не надо.\r
"Маловат" я еще для таких дел...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087561
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а если больше 1 одного поля проверяет то не работает... почему? клянусь - больше глупых вопросов не будет... этот последний...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087564
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2AlexJuice, ссори, еще не видно было твоего ответа и давал пояснения к своему! Конечно-же
Код: plaintext
1.
2.
3.
SELECT * FROM AVTO 
WHERE
AVTO.GNOMER LIKE  "%"  & [Forms]![Car_Select_Form]![GNOMER] &  "%" ;
...
Рейтинг: 0 / 0
в чем глюк?
    #32087566
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 AlexJuise
...)) ... такой маленький и такой испорченный...
так по чему глюкует?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087567
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 mahoune: опять мимо!
Мы говорим про Access! No SQL Server!!!

% -> *
...
Рейтинг: 0 / 0
в чем глюк?
    #32087572
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не работает...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087573
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дык в каком виде и как не работает на этот раз?
А насчет испорченности - это не ко мне ;0)
...
Рейтинг: 0 / 0
в чем глюк?
    #32087578
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SELECT AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER, AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER], AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, AVTO.PERSONAL, AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING
FROM AVTO
WHERE AVTO.GNOMER Like "*"Forms!AVTO!GNOMER"*";
...
Рейтинг: 0 / 0
в чем глюк?
    #32087581
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
когда все в кучу... то не работает...((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087582
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
To AlexJuice & mahoune
А вы объяснили ей куда всё это писать?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087586
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А где прописанные мною конкатенации?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087587
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Sfagnum...знаешь... я сама догадалась... а вообще после празников нужно быть более терпеливыми...

SELECT AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER, AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER], AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, AVTO.PERSONAL, AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING
FROM AVTO
WHERE AVTO.GNOMER Like "*" & Forms!AVTO!GNOMER & "*" And AVTO.MARKA_AVTO Like "*" & Forms!AVTO!MARKA & "*" And AVTO.DRIVER Like "*" & Forms!AVTO!DRIVER & "*";


вот эта куча работать не хочет... почему...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087591
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
по-отдельности работает а вместе не хочет...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087595
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Опять же: как не работает? Не выдает записей?
А вызывается кнопкой или как?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087597
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вызывается кнопкой и не выдает записей...((
...
Рейтинг: 0 / 0
в чем глюк?
    #32087602
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А мобыть их и нет??? Точно есть такие записи?
Тут надо ковырять реальные данные, так не скажешь.
...
Рейтинг: 0 / 0
в чем глюк?
    #32087604
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не верю... Думается мне просто нет записей которые удовлетворяют условию!
...
Рейтинг: 0 / 0
в чем глюк?
    #32087611
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
смотри вот данные:
GNOMER MARKA_AVTO DRIVER AVANS DATE GAZOLINE PRIC E_FOR_LITTER COL_OF_GAZOLINE DATE_OF_PRICE SVA TBS PERSONAL OPT AKVA TD TREIDING
0,00р. 08.01.2003 13:06:04 0 Нет Нет Нет Нет Нет Нет Нет
111 ваз смирнов 0,00р. 12.12.2002 Аи80 10 Да Нет Нет Нет Нет Нет Нет
111 0,00р. 10.03.2003 Аи90 12 Нет Да Нет Да Нет Нет Нет
222 0,00р. 15.02.2002 Аи92 21 Нет Да Нет Нет Да Нет Нет
222 0,00р. ДТ 1 Нет Да Нет Нет Нет Да Нет
333 0,00р. ДТ 100 Нет Да Нет Нет Нет Нет Да
333 0,00р. ДТ 70 Нет Нет Да Да Нет Нет Нет
444 0,00р. ДТ 5 Нет Нет Да Нет Нет Нет Да
444 0,00р. ДТ 5 Нет Нет Нет Нет Нет Нет Нет
555 0,00р. ДТ 80 Нет Нет Нет Нет Нет Нет Нет
555 0,00р. ДТ 1 Нет Нет Нет Нет Нет Нет Нет
0,00р. 10.01.2002 Аи80 0 Нет Нет Да Нет Да Нет Нет

ищу 111-ваз смирнов... реакция - по нулям...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087621
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
теперь отработало...
последний тупой вопрос... почему логические поля таким образом выбирать нельзя... и какая форма существует для них?...
не сочтите за наглость... такое обилие вопросов... пересела на аксесс... проарботав со скулом 3 года... все новое... а хелп - сами знаете... одна надажда на вас...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087623
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
то есть по 2 полям вместо 4х?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087632
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Sfagnum... поясни это ты про лог-поля? если про них то да ... если нет то у меня опять вопрос если заполняешь одно поле... то запрос не отрабатывает... как это обойти?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087647
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. напиши проще через "=" а не like
2. есть два решения "в лоб":
а. создать все вариации и через if работать с нужным
б. создать все вариации и соединить в один запрос UNION'ом

умнее ни чего не придумал:(
...
Рейтинг: 0 / 0
в чем глюк?
    #32087650
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а вот тут поподробнее... оба варианта... потому что у меня есть одна бодяга но мне она не нравится... хотелось бы что нить поизящнее... подкинь идейку...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087660
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
хотя знаешь я до юниона не додумалась...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087665
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я делал приблизительно так:
проверял наличие значения в поле и добавлял в запрос соответствующий параметр выборки

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
strSQL =  "SELECT AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER,
 AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER], 
AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, 
AVTO.PERSONAL, AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING 
FROM AVTO 
WHERE " 
if me.GNOMER <>  ""then
 strSQL = StrSQL + " AVTO.GNOMER Like  "*"  & Forms!AVTO!GNOMER &  "*" 

ну и т.д. если я правильно всё понял
...
Рейтинг: 0 / 0
в чем глюк?
    #32087669
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Насчёт UNION эт я погорячился, будет очччень масивно, если подходит, то мне так кажется, что последний вариант будет самым аккуратным из мною предложеных
...
Рейтинг: 0 / 0
в чем глюк?
    #32087674
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
из vba обращение к базе каким нить образом прописывать нужно?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087682
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
КСТАТИ КАК БЫТЬ С ЛОГИЧЕСКИМИ ПОЛЯМИ
...
Рейтинг: 0 / 0
в чем глюк?
    #32087686
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а до этого как обращалась???

>КСТАТИ КАК БЫТЬ С ЛОГИЧЕСКИМИ ПОЛЯМИ

через равно пиши false/true или 0/-1
...
Рейтинг: 0 / 0
в чем глюк?
    #32087689
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dim qdf As DAO.QueryDef
Dim rst As DAO.Recordset

StrSQL = "SELECT AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER,AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER],AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, AVTO.PERSONAL , AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING FROM AVTO WHERE "
If Me.GNOMER <> "" Then
StrSQL = StrSQL + "AVTO.GNOMER Like " * " & Forms!AVTO!GNOMER & " * ""
End If
If Me.MARKA <> "" Then
StrSQL = StrSQL + "AVTO.MARKA_AVTO Like " * " & Forms!AVTO!MARKA & " * ""
End If
If Me.DRIVER <> "" Then
StrSQL = StrSQL + "AVTO.DRIVER Like " * " & Forms!AVTO!DRIVER & " * ""
End If

Set qdf = CurrentDb.QueryDefs(StrSQL)
'qdf.Parameters("MyText") = "То что мы хотим найти"
Set rst = qdf.OpenRecordset

Set qdf = Nothing
Set rst = Nothing

не отрабатывает... на димах ругаться начинает...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087694
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dim StrSQL as string

Me.GNOMER может лучше записать так Me.GNOMER.Value

и проверять IsEmty и/или IsNull

по эксперементируй
...
Рейтинг: 0 / 0
в чем глюк?
    #32087702
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ясно но с вба как быть? там ведь запрос в БД адресовать надо какая форма для этого? не подскажешь?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087709
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
если тебе нужон реальный запрос с каким то именем, то
Код: plaintext
CurrentDb.CreateQueryDef  "SumLen" , StrSQL 

если для внутренней работы используй recordset
если для контролов recordsourse/rowsourse

извени, но мне пора:(
...
Рейтинг: 0 / 0
в чем глюк?
    #32087710
Фотография Cooper
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 яяя

Ничего себе у тебя тут активная деятельность!!! Я помочь не могу, потому как незнам как. Но поддерживаю морально!
...
Рейтинг: 0 / 0
в чем глюк?
    #32087713
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Sfagnym... большой спасибо за огромную помощь...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087726
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Верно ли я понял, что за время моего отсутствия проблема решилась?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087883
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не до конца...

чем vba не нарвится тип: стринг в:
Dim StrSQL As String
'* = AVTO.GNOMER, AVTO.MARKA_AVTO, AVTO.DRIVER,AVTO.AVANS, AVTO.DATE, AVTO.GAZOLINE, AVTO.[PRIC E_FOR_LITTER],AVTO.COL_OF_GAZOLINE, AVTO.DATE_OF_PRICE, AVTO.SVA, AVTO.TBS, AVTO.PERSONAL , AVTO.OPT, AVTO.AKVA, AVTO.TD, AVTO.TREIDING
StrSQL = "SELECT * FROM AVTO WHERE "
MsgBox ((StrSQL))
If Me.SVA.Value <> 0 Then
StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ")
MsgBox Err.Description
End If

на StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ") - он ругается "type mismatch"
...
Рейтинг: 0 / 0
в чем глюк?
    #32087907
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
StrSQL = (StrSQL) + ("AVTO.SVA = " * " & Forms!AVTO!SVA & " * " ")
Код: plaintext
StrSQL=StrSQL &  "AVTO.SVA = '*" & Forms!AVTO!SVA & "*'" 


MsgBox Err.Description

Код: plaintext
1.
2.
Ну зачем же так пессимистично  ; 0 )
Можно хотя бы задать условие
If err.Number<> 0 
...
Рейтинг: 0 / 0
в чем глюк?
    #32087915
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
радость ты моя чтоб я без тебя делала? СПАСИБО ОГРОМНОЕ... с меня ящик пива...

еще вопрос: QueryDefs.Delete "SumLen" на попытку удалить существующий запрос с этим именем.... пишет переполнение... почему?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087930
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
CurrentDb.QueryDefs.Delete "SumLen"
...
Рейтинг: 0 / 0
в чем глюк?
    #32087933
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
еще раз спасибо... и последний вопрос (чесное слово самый последний) есть ли функция в аксесс для того чтобы по этому запросу формировался отчет или делать рыбу с обращением к этому запросу от лица отчета?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087954
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> чесное слово самый последний

Да ладно уж... Сколько было этих "честных"-то...

Надо на основе этого запроса построить отчет. Чего тут сложного-то? Аксесс как раз и создан для таких действий, мастеров полно...
А дальше из кода, после того как сформировался нужный запрос, открывать отчет:
DoCmd.OpenReport "MyReport"

Кстати, пива ждать в каком формате? BMP или JPG?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087955
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а ты где находишься... если в пределах досягаемости то можно и в живую...))
...
Рейтинг: 0 / 0
в чем глюк?
    #32087965
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это когда как ;0)
Работаю в Алтуфьево, живу на Щелковской

Но это не главное. С отчетом-то как, разобралась?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087967
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
если я на ","
напишу что-то типа:
If Len(params) <> 0 Then
Left (params) + ", "
End If
оно отработает?
...
Рейтинг: 0 / 0
в чем глюк?
    #32087969
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почти... сейчас ковыряю...
...
Рейтинг: 0 / 0
в чем глюк?
    #32087973
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Left (params) + ", "

Нет. params=Left$(params) + ", "
...
Рейтинг: 0 / 0
в чем глюк?
    #32087974
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
точно-точно ... сиб-сиб...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088012
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 AlexJujice

хотя не совсем так правильно :
If Len(params) <> 0 Then
params = params & ", "
End If

.... так что я еще не совсем потерянный для общества человек... главное работает...
SHE'S A LIVE..., A LIVE...!!!
...
Рейтинг: 0 / 0
в чем глюк?
    #32088020
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
If Len(params) <>  0  Then 
params = params &  ", "  
End If 


Ну так смотря что нужно:
если вся строка, то так, а если первые n символов, то
Left$(params, n)

Код: plaintext
SHE'S A LIVE..., A LIVE...!!!

Поздравляю!
Но мобыть все-таки правильнее ALIVE??? (типа жыф)
...
Рейтинг: 0 / 0
в чем глюк?
    #32088024
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
может и так... спасибо за ликбез по англу...))) уряяяяяяяяяяяя.....!!!!!!!! главное заработало...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088027
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
гы....... рано радовалась... он теперь на пустые обьекты при обходе ругаться начал... почему?...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088048
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот я и грю - рано честными словами разбрасываисси!

Поподробнее можно?
...
Рейтинг: 0 / 0
в чем глюк?
    #32088067
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пример:
If Me.TBS.Value <> 0 Then- ест
If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.TBS = -1 "

If Me.OPT.Value <> 0 Then-давится и при =0 и при = -1...

If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.OPT = -1 "

End If

If Me.AKVA.Value = -1 Then-давится и при =0 и при = -1...
If Right(StrSQL, 6) = "WHERE " Then
Else
StrSQL = StrSQL & " AND "
End If
StrSQL = StrSQL & "AVTO.AKVA = -1"
End If
End If

почему понять не могу... изврат... бросаю аксесс... возвращаюсь в скулл...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088072
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
говорит что не содержит значения... тогда как оно там есть...(((
...
Рейтинг: 0 / 0
в чем глюк?
    #32088073
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так после первого If'a End где?
И вообще, чем делать пустой If, лучше
If Left$(Me.ttt.Value,6)<>"WHERE " Then
И не надо никакого Esle, и попонятнее будет.
...
Рейтинг: 0 / 0
в чем глюк?
    #32088076
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тьфу ты, есть End If, недоглядел...
Ну так что, бросаешь окончательно? Тогда пойду пиво пит... И водку жрат... (шютка)
...
Рейтинг: 0 / 0
в чем глюк?
    #32088080
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
с закрытием ифов все нормально... почему он не обрабатывает
If Me.OPT.Value <> 0 Then -если она полная... и не обходит если пустая? (-1/0)
не поняла..((
...
Рейтинг: 0 / 0
в чем глюк?
    #32088082
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ШЮТНИК!!!!!!!...)))
...
Рейтинг: 0 / 0
в чем глюк?
    #32088084
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
что делать-то?
...
Рейтинг: 0 / 0
в чем глюк?
    #32088105
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А OPT какого типа? Случаем, не один из переключателей в группе?
...
Рейтинг: 0 / 0
в чем глюк?
    #32088114
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это свободный переключатель... а что?
...
Рейтинг: 0 / 0
в чем глюк?
    #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
в чем глюк?
    #32088123
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тогда надо было бы смотреть Value группы.
А так - не понимаю...
Поставь точку останова на этой строке (щелкни слева от окна кода, должна появиться жирная коричневая точка) и когда остановится, посмотри какое значение показывает (наведи курсор)
...
Рейтинг: 0 / 0
в чем глюк?
    #32088130
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
исправила... теперь глюк в CurrentDb.CreateQueryDef "SumLen", StrSQL--пишет:
ошибочное или пропущенное слово в инструкции select...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088132
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да я что, гадатель на кофейной гуще, что ли?
Не знаю ни как исправила, ни какая получается инструкция...
StrSQL посмотри в режиме останова!
Ctrl+G - окно отладки. В нем пишешь:
?StrSQL,
жмешь Энтер, получаешь StrSQL, постишь сюда.
...
Рейтинг: 0 / 0
в чем глюк?
    #32088137
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
блин это я недосмотрела... не ругай меня сильно, пожалуйста, мне и так совестно что я тебе ТАК надоедаю... все в порядке... СПАБИБО... с меня пиво...
...
Рейтинг: 0 / 0
в чем глюк?
    #32088164
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Что ж, рад за тебя!
Пиво принимается по адресу alexjuice@mtu-net.ru
А Аксесс не бросай, если что, поможем (пока пиво не кончится ;0)))
Впрочем, я сейчас работаю на связке Access 2000 + SQL Server 2000.
...
Рейтинг: 0 / 0
в чем глюк?
    #32088195
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
еще раз спасибо....!!!! что бы я без Вас делала...???
...
Рейтинг: 0 / 0
в чем глюк?
    #32088262
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну вот, пока помогал, так на ты, а как всё - так на Вы сразу...
Или это ко всем? Тогда с маленькой буквы надоть
...
Рейтинг: 0 / 0
в чем глюк?
    #32089369
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
и без вас всех, и без тебя конкретно...))
...
Рейтинг: 0 / 0
в чем глюк?
    #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
в чем глюк?
    #32089381
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
в чем глюк?
    #32089383
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
СИБ-СИБ...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089384
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
с тегами напутал ссори\\r
ссылка /topic/177
...
Рейтинг: 0 / 0
в чем глюк?
    #32089390
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
мне надо посчитать количество записей в форме, как это сделать?
можно ли отчеты лепить динамически по запросу, а не использовать шаблон?
...
Рейтинг: 0 / 0
в чем глюк?
    #32089400
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
в чем глюк?
    #32089413
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это отработало... спасибо...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089416
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как сделать так, чтобы результат запроса сливался в определенное поле в форме?...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089425
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
назначить его rowsourse'ем
...
Рейтинг: 0 / 0
в чем глюк?
    #32089446
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
еще раз по-русски...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089449
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как это сделать?
...
Рейтинг: 0 / 0
в чем глюк?
    #32089471
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
me.ПолеName.RowSourse = "SQLвыражение"
или
me.ПолеName.RowSourse = перменная с SQLвыражением/имя запроса/имя таблицы
...
Рейтинг: 0 / 0
в чем глюк?
    #32089473
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
требования по формату поля есть?
...
Рейтинг: 0 / 0
в чем глюк?
    #32089474
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
т.е.
...
Рейтинг: 0 / 0
в чем глюк?
    #32089479
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
текст, поле со списком, надпись..
...
Рейтинг: 0 / 0
в чем глюк?
    #32089482
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
поле со списком - точно да,
текст - более проблемно там что-то с кол-вом записей,
надпись - точно нет.
...
Рейтинг: 0 / 0
в чем глюк?
    #32089499
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
на поле со списком не отрабатывает...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089506
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1ое т.е. не обрабатывается?
2ое me.ПолеName.Requery
...
Рейтинг: 0 / 0
в чем глюк?
    #32089520
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Sourse -> SOURCE !!!!!!!!!!!!!!!!
...
Рейтинг: 0 / 0
в чем глюк?
    #32089522
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И еще:
между прочим, количество записей у не-табличного рекордсета будет показываться правильно только после
rst.MoveLast
...
Рейтинг: 0 / 0
в чем глюк?
    #32089532
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почему на

ret = "INSERT INTO AVTO_STAT(GNOMER, MARKA_AVTO, DRIVER, AVANS,"
ret = ret & "DATES, GAZOLINE, [PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, "
ret = ret & "SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING)"
ret = ret & "SELECT GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE,"
ret = ret & "[PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, SVA, TBS, "
ret = ret & "PERSONAL, OPT, AKVA, TD, TREIDING "
ret = ret & " FROM SHABLON GROUP BY GNOMER;"

MsgBox (ret)

CurrentDb.Execute ret

ругается:попытка выполниьт запрос который не включает выражение как часть статической группы...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089536
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
патамушта...
Ты же вроде хотела "возвращаться к скулю"...
Если уж группировка в запросе, то все поля в селекте должны быть обработаны функциями группировки
...
Рейтинг: 0 / 0
в чем глюк?
    #32089540
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а если мне нужно групировать только по номеру авто и литражу- что делать?
...
Рейтинг: 0 / 0
в чем глюк?
    #32089542
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
адрес давай по которому пыво слать...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089547
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно глупый совет?
всё равно дам:-) отлаживай запросы в DesignQuery

To AlexJuice
страдаю хроническими очепятками и безграмотностью:(
и ещё в моей функции решалась другая проблема, а про rst.MoveLast как то забылось
...
Рейтинг: 0 / 0
в чем глюк?
    #32089559
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 Sfagnum:
Насчет конструктора - полностью поддерживаю.
Насчет очепяток:
а вот я как-то раз по ошибке (страдал всегда хронически - напишу большую обработку рекордсета, а MoveNext в конце забуду написать) на один комп в сетке устроил нечто вроде DDOS-атаки! Я туда циклически файл с базой посылал...

2 яяя:
Я ж сказал: alexjuice@mtu-net.ru
На самом деле дело не в пиве, ессно!
Просто работы подвалили... ДА еще топики плодишь... Замучился бегать!
...
Рейтинг: 0 / 0
в чем глюк?
    #32089564
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
> а если мне нужно групировать только по номеру авто и литражу- что делать?

Есть такие функции в Аксессе - First() и Last(), специально для нас, ленивых...
Кстати, в SQL Serv. такого нет ;0)
...
Рейтинг: 0 / 0
в чем глюк?
    #32089566
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вообще-то группировка по одному полю в таком запросе - верный знак того, что что-то тут не так...
Попробуй так:

ret = "INSERT INTO AVTO_STAT(GNOMER, MARKA_AVTO, DRIVER, AVANS," _
& "DATES, GAZOLINE, [PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, " _
& "SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING)" _
& "SELECT DISTINCT GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE," _
& "[PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, SVA, TBS, " _
& "PERSONAL, OPT, AKVA, TD, TREIDING " _
& " FROM SHABLON;"
...
Рейтинг: 0 / 0
в чем глюк?
    #32089570
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А куда пробельчик перед Селектом подевался?
Точнее, вот так.

ret = "INSERT INTO AVTO_STAT(GNOMER, MARKA_AVTO, DRIVER, AVANS," _
& "DATES, GAZOLINE, [PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, " _
& "SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING) " _
& "SELECT DISTINCT GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE," _
& "[PRIC E_FOR_LITTER],DATE_OF_PRICE, COL_OF_GAZOLINE, SVA, TBS, " _
& "PERSONAL, OPT, AKVA, TD, TREIDING " _
& " FROM SHABLON;"

А группировки по литражу я тут не вижу
...
Рейтинг: 0 / 0
в чем глюк?
    #32089574
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ему параметров мало... требует 2....
...
Рейтинг: 0 / 0
в чем глюк?
    #32089575
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если то же самое - да в конструктор запросов???
...
Рейтинг: 0 / 0
в чем глюк?
    #32089577
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
дык мне ж надо собрать в кучу данные с одинаковым номером... а не вывести все уникальные...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089579
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну тогда - все поля из селекта перечислять в GROUP BY
...
Рейтинг: 0 / 0
в чем глюк?
    #32089582
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это как? не ругайся... сильно... меня тут отвлекают... поэтому сообразить сложно...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089599
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ага, у меня та же история :0)

Так что значит "собрать в кучу"?
Вывести по одной строчке для каждого GNOMER?
Тогда все остальные поля в селекте надо обернуть в First() или Last():
вместо MARKA_AVTO - First(MARKA_AVTO) и т.д.
Все, окончательно запутался... Хелп! ;0)
...
Рейтинг: 0 / 0
в чем глюк?
    #32089602
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
нужно - один номер авто + сумма литров по всем записям с этим номером за месяц... блин... весь хелп перерыла... нет ничего подходящего...((
если у тебя подобное сделано скажи как?)))
...
Рейтинг: 0 / 0
в чем глюк?
    #32089605
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну для суммы вполне естественно использовать функцию Sum()
...
Рейтинг: 0 / 0
в чем глюк?
    #32089609
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Возможно, так?

SELECT GNOMER, Sum([Литраж_или_как_его_там]), Month(Date) As Mn FROM SHABLON GROUP BY GNOMER, Mn
...
Рейтинг: 0 / 0
в чем глюк?
    #32089621
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
гы... а с групом как быть... ОН на фест и сум ругается...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089625
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не пошло... не суммирует...((((
...
Рейтинг: 0 / 0
в чем глюк?
    #32089628
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ышшо раз (надеюсь, последний), повторяю:
надобно прошерстить все поля из селекта. Которые в группировке есть - пусть живут. Которых нет - обернуть в функции (Sum, First etc по вкусу) или включить в группировку (поставить после GROUP BY)
Для группировки даты по месяцам я использую функцию Month(), как уже написал.
...
Рейтинг: 0 / 0
в чем глюк?
    #32089629
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
И ваще: запрос (в очуредной раз) - в штудию!
Теперь, когда мы разобрались, что нам нужно, разбремся, как это сделать ;0)
...
Рейтинг: 0 / 0
в чем глюк?
    #32089632
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Либо я чего то не понимаю либо это выглядит примерно так:
SELECT Sum([Литраж_или_как_его_там]) AS Litrazh FROM SHABLON
WHERE GNOMER=значение, Month=значение
как вариант Month выберать через between
...
Рейтинг: 0 / 0
в чем глюк?
    #32089637
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
запрос этот елки-палки вот:

ret = "INSERT INTO AVTO_STAT ( GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, "
ret = ret & "COL_OF_GAZOLINE, SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING )"
ret = ret & "SELECT GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, Sum([COL_OF_GAZOLINE]),"
ret = ret & "SVA , TBS, PERSONAL, OPT, AKVA, TD, TREIDING FROM SHABLON"
ret = ret & "GROUP BY GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, COL_OF_GAZOLINE, "
ret = ret & "SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING;"

CurrentDb.Execute ret
заковырял он меня... !!! подряд он все пишет.... не складывая...

(ты на меня не ругайся сильно, но аксесс вижу всего 2 неделю... до этого писала только на скуле... а он так на акс не похож...)
...
Рейтинг: 0 / 0
в чем глюк?
    #32089642
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вот этот отработал...
INSERT INTO AVTO_STAT ( GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, COL_OF_GAZOLINE, SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING )
SELECT GNOMER, first(MARKA_AVTO), first(DRIVER), first(AVANS), first(DATES), first(GAZOLINE), Sum(COL_OF_GAZOLINE), first(SVA), first(TBS), first(PERSONAL), first(OPT), first(AKVA), first(TD), first(TREIDING)
FROM SHABLON
GROUP BY GNOMER;

но почему-то он все записи после правильной обработки продублировал...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089647
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Так если сумма в селекте - в группировку не надо добавлять поле!

Вот так?
ret = "INSERT INTO AVTO_STAT ( GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, " _
& "COL_OF_GAZOLINE, SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING ) " _
& "SELECT GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, Sum([COL_OF_GAZOLINE])," _
& "SVA , TBS, PERSONAL, OPT, AKVA, TD, TREIDING FROM SHABLON" _
& "GROUP BY GNOMER, MARKA_AVTO, DRIVER, AVANS, DATES, GAZOLINE, " _
& "SVA, TBS, PERSONAL, OPT, AKVA, TD, TREIDING;"
...
Рейтинг: 0 / 0
в чем глюк?
    #32089653
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну и фёсты добавь, ессно...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089656
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
уже все в порядке...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089659
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если дела у вас идут хорошо, значит, вы чего-то не замечаете!
(Один из законов сами знаете кого)
Так что ждем снова в гости...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089661
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда в тему:
если хочешь быть застрахованным от больших неприятностей, утром, пред выходом из дома съешь лягушку, тогда ты будешь уверен, что ничего хоже в этот день уже не произойдет...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089662
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в смысле хуже...))
...
Рейтинг: 0 / 0
в чем глюк?
    #32089675
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну что ж, если мы перешли на "просто треп", похоже, вопрос закрыт, можно возвращаться к работе... Счастливо!
...
Рейтинг: 0 / 0
в чем глюк?
    #32089685
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
и тебе!!!
...
Рейтинг: 0 / 0
в чем глюк?
    #32089692
Фотография mahoune
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я смотрю у вас тут топик на двоих!
...
Рейтинг: 0 / 0
в чем глюк?
    #32089726
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
завидовать дурно...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089741
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему, еще Sfagnum иногда заходит на огонек...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089751
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почему на:
ret = "DELETE AVTO_STAT.* FROM AVTO_STAT WHERE DATES between '" & (DATE - 30) & "' and '" & DATE & "' ;"
ругается? чего ей не того?
...
Рейтинг: 0 / 0
в чем глюк?
    #32089759
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А дата в каком формате? Access правильно это понимает, вообще он любит такие даты #" & Date & "# и не дай бог ему что в формате не понравиться
или & Format(Дата,"mm-dd-yyyy") &
...
Рейтинг: 0 / 0
в чем глюк?
    #32089760
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Есть такая функция - DateAdd, она подойдет (только прибавлять отрицательные значения)
...
Рейтинг: 0 / 0
в чем глюк?
    #32089765
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
я сравниваю с системной...
nb = DATE
bn = DATE - 30
ret = "DELETE * FROM AVTO_STAT WHERE DATES between #" & bn & "# and #" & nb & "# ;"
CurrentDb.Execute ret
а ей не нравится...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089777
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
что? не ндравиться
и опять же поробуй конструктор может идеи появяться
...
Рейтинг: 0 / 0
в чем глюк?
    #32089784
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
гы... дык в конструкторе все работает...
DELETE AVTO_STAT.*
FROM AVTO_STAT
WHERE DATES between (now()-30) and now();

при переводе в ВБ глюки появляются...
...
Рейтинг: 0 / 0
в чем глюк?
    #32089789
яяя
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а вот тут давится:ret = "DELETE * FROM AVTO_STAT WHERE DATES between #" & DATE - 30 & "# and #" & DATE & "#;"
...
Рейтинг: 0 / 0
в чем глюк?
    #32089802
Фотография AlexJuice
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Посмотри, в каком формате он возвращает эту DATE там и там
Возможно, поможет
Код: plaintext
Format(Date, "dd.mm.yyyy" )
...
Рейтинг: 0 / 0
180 сообщений из 180, показаны все 8 страниц
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / в чем глюк?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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