ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Бонально - запрос с датой
10 сообщений из 10, страница 1 из 1
Бонально - запрос с датой
    #39182146
*\/*#*
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
*\/*#*
Гость
Открываю рекордсет к присоединенной таблице (таблица присоединена из MSQL Server через ODBC)

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Dim db As Database, strSQL As String, strSQLins As String
Dim rs As DAO.Recordset, kbk As String
Dim rsF As DAO.Recordset, f_date As Date
Set db = CurrentDb
strSQL = "DELETE * from tmp_P_F_R"
f_date = Forms!frm_OTCHETS!f_date
db.Execute strSQL
Set rs = db.OpenRecordset("SELECT Sum(dbo_R_R.SUMM_1Q) AS [Sum-SUMM_1Q], [CVD_MF] & [CPR] & [CCS_FULL] & [CVR] AS KBK, dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID" & _
" FROM (dbo_R_R INNER JOIN dbo_K_LSR ON dbo_R_R.K_LSRID = dbo_K_LSR.K_LSRID) INNER JOIN dbo_K_DEP ON dbo_K_LSR.K_DEPID = dbo_K_DEP.K_DEPID" & _
" WHERE  dbo_R_R.DU  < #" & f_date & _
"# GROUP BY [CVD_MF] & [CPR] & [CCS_FULL] & [CVR], dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID;", dbOpenDynaset, dbSeeChanges)
...



dbo_R_R.DU - поле формата дата время

выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'

Ткните пожалуйста носом, что делаю не так?
...
Рейтинг: 0 / 0
01.03.2016, 10:07
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182164
ROI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ROI
Участник
*\/*#*Открываю рекордсет к присоединенной таблице (таблица присоединена из MSQL Server через ODBC)

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Dim db As Database, strSQL As String, strSQLins As String
Dim rs As DAO.Recordset, kbk As String
Dim rsF As DAO.Recordset, f_date As Date
Set db = CurrentDb
strSQL = "DELETE * from tmp_P_F_R"
f_date = Forms!frm_OTCHETS!f_date
db.Execute strSQL
Set rs = db.OpenRecordset("SELECT Sum(dbo_R_R.SUMM_1Q) AS [Sum-SUMM_1Q], [CVD_MF] & [CPR] & [CCS_FULL] & [CVR] AS KBK, dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID" & _
" FROM (dbo_R_R INNER JOIN dbo_K_LSR ON dbo_R_R.K_LSRID = dbo_K_LSR.K_LSRID) INNER JOIN dbo_K_DEP ON dbo_K_LSR.K_DEPID = dbo_K_DEP.K_DEPID" & _
" WHERE  dbo_R_R.DU  < #" & f_date & _
"# GROUP BY [CVD_MF] & [CPR] & [CCS_FULL] & [CVR], dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID;", dbOpenDynaset, dbSeeChanges)
...




dbo_R_R.DU - поле формата дата время

выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'

Ткните пожалуйста носом, что делаю не так?
Тынц:
http://www.sql.ru/forum/274061-2/fak-stereotipy-i-tipy-dannyh
...
Рейтинг: 0 / 0
01.03.2016, 10:18
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182166
ROI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ROI
Участник
*\/*#*,

В догонку:
http://www.sql.ru/forum/280745/formirovanie-sql-vyrazheniya#2544051
...
Рейтинг: 0 / 0
01.03.2016, 10:19
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182170
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
*\/*#*выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'
Что, и отсутствие в цитируемом фрагменте закрывающего диеза не насторожило?
...
Рейтинг: 0 / 0
01.03.2016, 10:20
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182178
ROI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ROI
Участник
Akina*\/*#*выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'
Что, и отсутствие в цитируемом фрагменте закрывающего диеза не насторожило?
диез на следующей строке.
...
Рейтинг: 0 / 0
01.03.2016, 10:29
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182187
*\/*#*
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
*\/*#*
Гость
ROI,

СПС разобрался

итоговый код

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Dim db As Database, strSQL As String, strSQLins As String
Dim rs As DAO.Recordset, kbk As String
Dim rsF As DAO.Recordset, f_date As String
Set db = CurrentDb
strSQL = "DELETE * from tmp_P_F_R"
f_date = Format(Forms!frm_OTCHETS!f_date, "MM\/DD\/YYYY")
db.Execute strSQL
Set rs = db.OpenRecordset("SELECT Sum(dbo_R_R.SUMM_1Q) AS [Sum-SUMM_1Q], [CVD_MF] & [CPR] & [CCS_FULL] & [CVR] AS KBK, dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID" & _
" FROM (dbo_R_R INNER JOIN dbo_K_LSR ON dbo_R_R.K_LSRID = dbo_K_LSR.K_LSRID) INNER JOIN dbo_K_DEP ON dbo_K_LSR.K_DEPID = dbo_K_DEP.K_DEPID" & _
" WHERE  dbo_R_R.DU  < #" & f_date & _
"# GROUP BY [CVD_MF] & [CPR] & [CCS_FULL] & [CVR], dbo_K_DEP.K_DEPID, dbo_R_R.K_LSRID;", dbOpenDynaset, dbSeeChanges)



Дело было в формате я изначально пробовал f_date = Format(Forms!frm_OTCHETS!f_date, "DD\/MM\/YYYY")
а надо f_date = Format(Forms!frm_OTCHETS!f_date, "MM\/DD\/YYYY")
...
Рейтинг: 0 / 0
01.03.2016, 10:40
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182188
OLEG_ZH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OLEG_ZH
Гость
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
'
'преобразование даты в формат SQL
'
Public Function sqlDate(ByVal parDate As Date, Optional bSQL As Boolean = False) As String
    If bSQL Then
        sqlDate = Format$(parDate, "'yyyymmdd'")
    Else
        sqlDate = Format$(parDate, "\#mm\/dd\/yy\#")
    End If
End Function
...
Рейтинг: 0 / 0
01.03.2016, 10:42
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182190
OLEG_ZH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OLEG_ZH
Гость
Код: vbnet
1.
& sqlDate((f_date) &


И не забыть убрать все #
...
Рейтинг: 0 / 0
01.03.2016, 10:43
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182239
Фотография Slavinag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Slavinag
Участник
А что, функцию DateValue уже запретили? Или каким-то акцизом обложили?
...
Рейтинг: 0 / 0
01.03.2016, 11:19
| Ответить | Цитировать | Написать  
Бонально - запрос с датой
    #39182281
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
ROIдиез на следующей строке
Не показатель. Он на следующей строке кода ФОРМИРОВАНИЯ - что вовсе даже не означает, что в итоговой строке запроса он следует непосредственно за литералом даты. Более того - цитата фрагмента в ошибке заставляет подозревать наличие там чего-то лишнего... вот кабы ТС ВСЕГДА придерживался правильной методики - сперва формировать строку запроса, потом выполнять - но в приведённом фрагменте кода его на второй раз уже нехватило.
...
Рейтинг: 0 / 0
01.03.2016, 11:41
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Бонально - запрос с датой
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1613864]:
 0ms
get settings:
 13ms
get forum list:
 12ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 36ms
get topic data:
 12ms
get first new msg:
 7ms
get forum data:
 2ms
get page messages:
 47ms
get tp. blocked users:
 1ms
others: 11ms
total:  147ms
созд. / загр.: 147ms
x
x
Закрыть


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