Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Бонально - запрос с датой / 10 сообщений из 10, страница 1 из 1
01.03.2016, 10:07
    #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:18
    #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:19
    #39182166
ROI
ROI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бонально - запрос с датой
*\/*#*,

В догонку:
http://www.sql.ru/forum/280745/formirovanie-sql-vyrazheniya#2544051
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.03.2016, 10:20
    #39182170
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бонально - запрос с датой
*\/*#*выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'
Что, и отсутствие в цитируемом фрагменте закрывающего диеза не насторожило?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.03.2016, 10:29
    #39182178
ROI
ROI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бонально - запрос с датой
Akina*\/*#*выдает ошибку:
Дата содержит синтаксическую ошибку в выражении запроса
'dbo_R_R.DU < #29.02.2016'
Что, и отсутствие в цитируемом фрагменте закрывающего диеза не насторожило?
диез на следующей строке.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.03.2016, 10:40
    #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:42
    #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:43
    #39182190
OLEG_ZH
OLEG_ZH
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Бонально - запрос с датой
Код: vbnet
1.
& sqlDate((f_date) &


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


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