ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ошибка синтаксиса
14 сообщений из 14, страница 1 из 1
ошибка синтаксиса
    #34770763
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
rs.Open "SELECT SUM(S1), SUM(S2) FROM " + _
"((select sum(dp.akt_rasx) As S1 ,sum(dp.summa) As S2 " + _
"from d_point dp, " + _
"LEFT JOIN " + _
"d_sabon ds on dp.k_sabon=ds.k_sabon " + _
"and ds.k_Month= " + month_ + _
"and ds.Year= " + year_ + _
"and (ds.k_f46=1 or ds.k_f46=27) " + _
"where dp.k_Month = " + month_ + _
"And dp.Year = " + year_ + _
"And (dp.k_f46 = 1 Or dp.k_f46 = 27) " + _
"and dp.k_tov > 0 and dp.k_pred <> 45) " + _
"Union ALL " + _
"select sum(dps.rasx_a) As S1,sum(dps.summa) As S2 " + _
"from d_dopsum dps " + _
"where dps.k_pred <> 45 And dps.k_Month = " + month_ + _
"And dps.Year = " + year_ + _
"And (dps.k_f46 = 1 Or dps.k_f46 = 27)) T1", cn, adOpenStatic, adLockReadOnly

на что VBA выдает, ошибка синтаксиса в операции Join

если кто знает подскажите в чем дело????
в QA запрос работает
...
Рейтинг: 0 / 0
03.09.2007, 09:45
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34770773
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
marvan
Участник
на первый взгляд:
rs.Open "SELECT SUM(S1), SUM(S2) FROM " + _
"((select sum(dp.akt_rasx) As S1 ,sum(dp.summa) As S2 " + _
"from d_point dp, " + _
"LEFT JOIN " + _
"d_sabon ds on dp.k_sabon=ds.k_sabon " + _
"and ds.k_Month= " + month_ + _
"and ds.Year= " + year_ + _
"and (ds.k_f46=1 or ds.k_f46=27) " + _
"where dp.k_Month = " + month_ + _
"And dp.Year = " + year_ + _
"And (dp.k_f46 = 1 Or dp.k_f46 = 27) " + _
"and dp.k_tov > 0 and dp.k_pred <> 45) " + _
"Union ALL " + _
"select sum(dps.rasx_a) As S1,sum(dps.summa) As S2 " + _
"from d_dopsum dps " + _
"where dps.k_pred <> 45 And dps.k_Month = " + month_ + _
"And dps.Year = " + year_ + _
"And (dps.k_f46 = 1 Or dps.k_f46 = 27)) T1", cn, adOpenStatic, adLockReadOnly
...
Рейтинг: 0 / 0
03.09.2007, 09:48
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34770799
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
нет, не работает(((((
...
Рейтинг: 0 / 0
03.09.2007, 09:57
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34770849
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
marvan
Участник
Пробелов не хватает :)
rs.Open "SELECT SUM(S1), SUM(S2) FROM " + _
" ((select sum(dp.akt_rasx) As S1 ,sum(dp.summa) As S2 " + _
" from d_point dp " + _
" LEFT JOIN " + _
" d_sabon ds on dp.k_sabon=ds.k_sabon " + _
" and ds.k_Month= " + month_ + _
" and ds.Year= " + year_ + _
" and (ds.k_f46=1 or ds.k_f46=27) " + _
" where dp.k_Month = " + month_ + _
" And dp.Year = " + year_ + _
" And (dp.k_f46 = 1 Or dp.k_f46 = 27) " + _
" and dp.k_tov > 0 and dp.k_pred <> 45) " + _
" Union ALL " + _
" select sum(dps.rasx_a) As S1,sum(dps.summa) As S2 " + _
" from d_dopsum dps " + _
" where dps.k_pred <> 45 And dps.k_Month = " + month_ + _
" And dps.Year = " + year_ + _
" And (dps.k_f46 = 1 Or dps.k_f46 = 27)) T1", cn, adOpenStatic, adLockReadOnly
...
Рейтинг: 0 / 0
03.09.2007, 10:18
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34770899
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
не работает((((((((
...
Рейтинг: 0 / 0
03.09.2007, 10:36
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34770917
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
marvan
Участник
Кроме выше перечисленного (это точно были причины ошибок)
Надо вывести запрос в строку:
s = "SELECT SUM(S1), SUM(S2) FROM " + _
"((select sum(dp.akt_rasx) As S1 ,sum(dp.summa) As S2 " + _
"from d_point dp, " + _
"LEFT JOIN " + _
"d_sabon ds on dp.k_sabon=ds.k_sabon " + _
"and ds.k_Month= " + month_ + _
"and ds.Year= " + year_ + _
"and (ds.k_f46=1 or ds.k_f46=27) " + _
"where dp.k_Month = " + month_ + _
"And dp.Year = " + year_ + _
"And (dp.k_f46 = 1 Or dp.k_f46 = 27) " + _
"and dp.k_tov > 0 and dp.k_pred <> 45) " + _
"Union ALL " + _
"select sum(dps.rasx_a) As S1,sum(dps.summa) As S2 " + _
"from d_dopsum dps " + _
"where dps.k_pred <> 45 And dps.k_Month = " + month_ + _
"And dps.Year = " + year_ + _
"And (dps.k_f46 = 1 Or dps.k_f46 = 27)) T1"
И ещё раз внимательно на него посмотреть.
Может переменные пустые.
...
Рейтинг: 0 / 0
03.09.2007, 10:42
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771108
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
не пойму в чем дело.....[SRC vba][/SRC]
...
Рейтинг: 0 / 0
03.09.2007, 11:39
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771112
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
[SRC vba][/SRC]
...
Рейтинг: 0 / 0
03.09.2007, 11:39
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771115
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
Код: plaintext
???
...
Рейтинг: 0 / 0
03.09.2007, 11:40
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771166
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
marvan
Участник
Как запрос в виде стоки выглядит?
...
Рейтинг: 0 / 0
03.09.2007, 11:53
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771300
1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1
Участник
А твои переменные month_, year_ они числовые или строковые?
...
Рейтинг: 0 / 0
03.09.2007, 12:30
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771305
1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1
Участник
если числовые, то тебе надо плюсы на & поменять
...
Рейтинг: 0 / 0
03.09.2007, 12:31
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34771383
Klera
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Klera
Гость
Код: plaintext
спасибо всем разобралась
...
Рейтинг: 0 / 0
03.09.2007, 12:52
| Ответить | Цитировать | Написать  
ошибка синтаксиса
    #34772412
ZeusTheTrueGod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ZeusTheTrueGod
Участник
Ну вот, опять девушки вопросы задают, а потом "спасибо, разобралась"
Даже если это access, неужели так сложно использовать параметры?
зачем городить такой запрос, соединять с переменными путём cstr?
кроме того , специально для такиз придуманы view с параметрами (select a,b from table1 where c = ? and d = ?)

получается что-то вида
rs.command = "select a,b from view1"
param1 = rs.createparameter("?",12)
param2 = rs.createparameter("?","asd")
rs.command.paramers.add(param1)
rs.command.paramers.add(param2)

и не надо мозги парить со скобками, ковычками и скл-инъекциями
...
Рейтинг: 0 / 0
03.09.2007, 16:50
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ошибка синтаксиса
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&msg=34771108&tid=2163462]:
 0ms
get settings:
 8ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 20ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 60ms
get tp. blocked users:
 2ms
others: 224ms
total:  353ms
созд. / загр.: 353ms
x
x
Закрыть


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