ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проблема в sql коде на VB (2)
5 сообщений из 5, страница 1 из 1
проблема в sql коде на VB (2)
    #36455706
vladAnco
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vladAnco
Гость
http://www.sql.ru/Forum/actualthread.aspx?tid=721213
в этой теме мне помогли и решили мою проблему... все класно все работоло... но когда я захотел использовать это в другом месте почему то не работает (((
выдает ощибку:
Код: plaintext
1.
run-time error'1004':
[Microsoft][ODBC SQL Server Driver][SQL Server]Line  3 : Incorrect syntax near ' 00 '.

вот код моего SQL кода
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
With ActiveWorkbook.PivotCaches.Add(SourceType:=xlExternal)
        .Connection = _
        "ODBC;DSN=sklad;UID=gabrielyan.v;APP=Microsoft Office 2003;WSID=VLAD;DATABASE=Sklad;Network=DBMSSOCN;Trusted_Connection=Yes"
        .CommandType = xlCmdSql
        .CommandText = Array( _
        "SELECT DIFKPP.KODS, DIFKPP.KODT, DIFKPP.KOLV, DIFKPP.KOLO, DIFKPP.DATS, SKLAD.KODS, SKLAD.NAZV, TOVAR.KODT, TOVAR.NAZV" & Chr( 13 ) & "" & Chr( 10 ) & "FROM Sklad.dbo.DIFKPP DIFKPP, Sklad.dbo.SKLAD SKLAD, Sklad.dbo.TOVAR TOVAR" & Chr( 13 ) & "" & Chr( 10 ) & "WHER" _
        , _
        "E SKLAD.KODS = DIFKPP.KODS AND TOVAR.KODT = DIFKPP.KODT AND ((DIFKPP.DATS>=#" & aaa & "#) AND (DIFKPP.DATS<=#" & bbb & "#))" _
        )
        .CreatePivotTable TableDestination:="[Êíèãà1]Ëèñò1!R3C1", TableName:= _
        "ÑâîäíàÿÒàáëèöà1", DefaultVersion:=xlPivotTableVersion10
    End With
aaa и bbb задаются так же как и в старом моём примере
Код: plaintext
1.
2.
3.
4.
5.
  Dim SH As Worksheet
    Set SH = ThisWorkbook.Worksheets("Ëèñò1")
    
    aaa = Format(SH.Cells( 1 ,  2 ), "YYYY-MM-DD")
    bbb = Format(SH.Cells( 2 ,  2 ), "YYYY-MM-DD")

как и в предедушей теме, если не вставлять в запрос значение из переменых, запрос и макрос выполняется правильно
...
Рейтинг: 0 / 0
08.02.2010, 15:49
| Ответить | Цитировать | Написать  
проблема в sql коде на VB (2)
    #36455716
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vladAnco,

Код: plaintext
1.
    aaa = Format(SH.Cells( 1 ,  2 ), "mm/dd/yyyy")
    bbb = Format(SH.Cells( 2 ,  2 ), "mm/dd/yyyy")
...
Рейтинг: 0 / 0
08.02.2010, 15:53
| Ответить | Цитировать | Написать  
проблема в sql коде на VB (2)
    #36455724
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
А СТОП!

SQL-сервер!
он не понимает решетки
должно быть так:

DIFKPP.DATS>='" & aaa & "'

то бишь вместо решеток - апострофы
а форматирование даты можете оставить в АНСИ
...
Рейтинг: 0 / 0
08.02.2010, 15:55
| Ответить | Цитировать | Написать  
проблема в sql коде на VB (2)
    #36455770
vladAnco
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vladAnco
Гость
Shocker.Pro:
спс добрйы человек
Код: plaintext
1.
DIFKPP.DATS>='" & aaa & "'
помогло...
зы просто непонятно а почему в прошлый раз работало норм
...
Рейтинг: 0 / 0
08.02.2010, 16:07
| Ответить | Цитировать | Написать  
проблема в sql коде на VB (2)
    #36455775
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
vladAncoзы просто непонятно а почему в прошлый раз работало норм

Потому что вы с другим драйвером работали. Синтаксис SQL отличается у разных СУБД.
...
Рейтинг: 0 / 0
08.02.2010, 16:10
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / проблема в sql коде на VB (2)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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