ReSQL.ru
     
powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / DLookup и 2-а критерия. Возможно?
18 сообщений из 43, страница 2 из 2
  2  все
DLookup и 2-а критерия. Возможно?
    #36879607
qwrqwr_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
qwrqwr_
Гость
Владимир Санычёты серьёзно думаеш, что ТС, у себя в программе оперирует датой 30.12.1899 ?
Вполне могу представить себе ситуацию, что программа заносит 0 (ноль, он же нуль) в поле типа дата.ВС +1
Например, если в поле datetime надо хранить только время . И это время может быть 00:00.
...
Рейтинг: 0 / 0
04.10.2010, 09:39
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #36879801
ё
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ё
Гость
alvkОбязательное поле - я же написал, какие Null?
...
...это - красссиво ! )))
поле - обязательное для заполнения, но заполнять можно всякой хнёй типа неимеющей никакого смысла датой 30.12.1899
...
Рейтинг: 0 / 0
04.10.2010, 11:23
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #36879824
alvk
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alvk
Участник
ё,

Вообще-то я уже всё рассказал, что не понятно? Был перенос данных из одной базы в другую, в новой существует дополнительное поле с датой, пустым оставить его нельзя, это всё-равно временно, количество строк около 200. И записывать туда всякую хню невозможно вообще-то, оно автоматом заполняется из другой базы, не надо передёргивать.
...
Рейтинг: 0 / 0
04.10.2010, 11:34
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
DLookup и 2-а критерия. Возможно?
    #39752613
Фотография Rikozenit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rikozenit
Участник
Здравствуйте!
Необходимо применить 3 условия в критерии функции dlookup:
Код: vbnet
1.
min_stroka_bloka = DLookup("№строки", "Онлайн", "[Заказ_№] = '" & zakaz & "' AND [№_Прибора] = " & №_tek_pribor AND [№_Блока] = " & №_tek_blok)


но вот этот код вызывает ошибку Expexted: list separator or )
Подскажите, пожалуйста, как исправить?
...
Рейтинг: 0 / 0
25.12.2018, 09:38
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752616
Serg197311
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Serg197311
Участник
Код: sql
1.
& №_tek_pribor !!!!!!!!!!! AND [№_Блока]


Там где воскл знаки чего-то не хватает
...
Рейтинг: 0 / 0
25.12.2018, 09:46
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752617
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Rikozenit, по сути ты формируешь строку запроса, точнее секцию WHERE. Как правильно её сформировать смотри фак - http://www.sql.ru/faq/faq_topic.aspx?fid=157
...
Рейтинг: 0 / 0
25.12.2018, 09:47
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752629
Фотография Rikozenit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rikozenit
Участник
Панург, не могу найти как правильно составить эту строку(
Код: sql
1.
2.
3.
min_stroka_bloka.Value = СurrentProject.Connection.Execute("SELECT Min(Онлайн.[№строки]) AS [Min-№строки] " _
& " FROM Онлайн GROUP BY Онлайн.[Заказ_№], Онлайн.[№_Прибора], Онлайн.[№_Блока] " _
& " HAVING (((Онлайн.[Заказ_№]) Like " * 1355 - 3 * ") AND ((Онлайн.[№_Прибора])=1) AND ((Онлайн.[№_Блока])=1))").Fields(0)
...
Рейтинг: 0 / 0
25.12.2018, 10:07
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752642
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Rikozenit, мне кажется почему-то, что ты не сильно и старался. Статья, к которой я отослал тебя не сильно то и большая, можно было прочитать тщательно.

Rikozenitне могу найти как правильно составить эту строку(К тому же это уже не строка.
И где всё это написано? Что будет если не найдётся минимальное значение?

Для VBA
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
...
    With СurrentProject.Connection.Execute("SELECT Min([Онлайн].[№строки]) AS [Min-№строки] " _
        & " FROM Онлайн GROUP BY Онлайн.[Заказ_№], [Онлайн].[№_Прибора], [Онлайн].[№_Блока] " _
        & " WHERE [Онлайн].[Заказ_№] Like '%1355 - 3%' AND [Онлайн].[№_Прибора]=1 AND [Онлайн].[№_Блока]=1")
            If Not .EOF then
                Me.min_stroka_bloka=.Fields(0)
            Else
                Me.min_stroka_bloka=Null'?
            End if
        .Close
    End With
...
...
Рейтинг: 0 / 0
25.12.2018, 10:31
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752684
Фотография Rikozenit
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Rikozenit
Участник
Панург, спасибо!
With C urrentProject.Connection.Execute - только в твоём коде тут буква C русская закралась почему-то( (на всяк случ)
в статье я не нашёл вот эту конструкцию:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
    With СurrentProject.Connection.Execute(SQL)
            If Not .EOF then
                x=.Fields(0)
            Else
                x=Null '?
            End if
        .Close
    End With



Использую это в модуле формы, чтобы набивать спецификацию заказа. Искомое минимальное значение ограничивает потом работу цикла.
...
Рейтинг: 0 / 0
25.12.2018, 11:40
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752750
Swa111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swa111
Гость
Панург,

У Вас что то запросом, Where после Group, и эта хитрая конструкция не нужна так как агрегатная функция над пустой таблицой вернет null, то же самое что Вы потом программно делаете

Из собственного опыта для отладки советую добавлять символы перевода строки при делении на строки. И предварительно запрос сохранять в строке, что бы можно было посмотреть что собралось в окне Immediate

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
sSQL = "SELECT Min([Онлайн].[№строки]) AS [Min-№строки] " & vbCrLf _ 
     & "FROM Онлайн" & vbCrlf _
     & "WHERE [Онлайн].[Заказ_№] Like '%" & zakaz & "%' "  & vbCrLf _ 
              "AND [Онлайн].[№_Прибора]= " & me![№_tek_pribor] & vbCrLf _ 
              "AND [Онлайн].[№_Блока]=" &  me![№_tek_blok]

debug.print (sSQL) 'Вывести запрос в окно отладки

With СurrentProject.Connection.Execute(sSQL) 'Если здесь будет ошибка то лезем в окно отладки 
  Me.min_stroka_bloka=.Fields(0)
  .Close
End With



Если произошла ошибка то копируем запрос из окна отладки и вставляем в запрос в режиме sql, пробуем запустить. В этом случае проще локализовать ошибку.
...
Рейтинг: 0 / 0
25.12.2018, 13:14
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752794
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Swa111У Вас что то запросом, Where после Groupнедоглядел. я просто скопировал и не выкинул лишнее
...
Рейтинг: 0 / 0
25.12.2018, 14:19
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752796
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Swa111
Код: vbnet
1.
Me.min_stroka_bloka=.Fields(0)

тут тоже будет ошибка если запрос не вернёт строк
...
Рейтинг: 0 / 0
25.12.2018, 14:20
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752799
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Rikozenitв статье я не нашёл вот эту конструкцию:это надо смотреть там же другую статью - http://www.sql.ru/faq/faq_topic.aspx?fid=410
...
Рейтинг: 0 / 0
25.12.2018, 14:22
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752802
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
RikozenitWith C urrentProject.Connection.Execute - только в твоём коде тут буква C русская закралась почему-то( (на всяк случ)Эт не у мну закралась, эт у тюбю 21772697 .
...
Рейтинг: 0 / 0
25.12.2018, 14:25
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39752913
Swa111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swa111
Гость
Панург,

но кокретно данный запрос всегда вернет одну строку
...
Рейтинг: 0 / 0
25.12.2018, 16:26
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39753012
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Swa111Панург,

но кокретно данный запрос всегда вернет одну строкуС чего бы? Если ни одна запись не соответствует условию, то и записей не будет
...
Рейтинг: 0 / 0
25.12.2018, 18:25
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39753084
Swa111
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swa111
Гость
Панург,

это свойство агрегатных функций, если нет строк то взвращается null
...
Рейтинг: 0 / 0
25.12.2018, 20:23
| Ответить | Цитировать | Написать  
DLookup и 2-а критерия. Возможно?
    #39753191
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
Swa111Панург,

это свойство агрегатных функций, если нет строк то взвращается nullСогласен - был неправ.
...
Рейтинг: 0 / 0
26.12.2018, 04:09
| Ответить | Цитировать | Написать  
18 сообщений из 43, страница 2 из 2
  2  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / DLookup и 2-а критерия. Возможно?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=39752616&tid=1610944]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 47ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 52ms
get tp. blocked users:
 1ms
others: 299ms
total:  442ms
созд. / загр.: 442ms
x
x
Закрыть


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