ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB.Recordset и String
12 сообщений из 12, страница 1 из 1
ADODB.Recordset и String
    #33552357
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Есть ADODB.Recordset и есть SQL запрос более 256 символов, формируется он в виде l_strSQL = ... & ... & ... все зависит от параметров. Так вот как мне передать этот запрос, если он обрезается типом String. Есть ли какие-нибудь идеи как реализовать запрос более содержащий более 256 символов.
...
Рейтинг: 0 / 0
17.02.2006, 14:55:59
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552386
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
это что за string такой у тебя, если не секрет?
...
Рейтинг: 0 / 0
17.02.2006, 15:02:09
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552436
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Не знаю, что за String ))) Но в Debugger'е часть запроса обрезана почемуто.
...
Рейтинг: 0 / 0
17.02.2006, 15:13:40
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552508
Пользователь2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Пользователь2
Гость
1ndig0Не знаю, что за String )))


Приведи исходный код полностью. :)
...
Рейтинг: 0 / 0
17.02.2006, 15:26:04
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552533
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Вот собственно и он

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
        l_strSQL = "SELECT DISTINCT "

        For j =  0  To UBound(arrListOfTables(i).arrSchemaFields) -  1 
            l_strSQL = l_strSQL & arrListOfTables(i).strName & "." & arrListOfTables(i).arrSchemaFields(j).strTableField & ", "
        Next j

l_strSQL = l_strSQL & arrListOfTables(i).strName & "." & arrListOfTables(i).arrSchemaFields(j).strTableField & " " & _
                   "FROM " & arrListOfTables(i).strName & ", " & ConnectionParam.strTJL & ", " & ConnectionParam.strTTS & " " & _
                   "WHERE " & arrListOfTables(i).strName & ".dbid=" & ConnectionParam.strTJL & ".dbid " & _
                   ".AND. " & arrListOfTables(i).strName & ".recid=" & ConnectionParam.strTJL & ".recid " & _
                   ".AND. " & ConnectionParam.strTTS & ".tablename=" & "'" & arrListOfTables(i).strName & "' " & _
                   ".AND. " & ConnectionParam.strTTS & ".tableid=" & ConnectionParam.strTJL & ".tableid " & _
                   ".AND. " & ConnectionParam.strTJL & ".state>=0 " & _
                   l_strSQLCenters


        '<<>><<>><<>><<>><<>><<>><<>><<>><<>><<>><<>><<>>
        l_objRecordSet.Open l_strSQL & " .AND. (" & _
                                        ConnectionParam.strTJL & ".act='A'" & _
                                        " .OR. " & _
                                        ConnectionParam.strTJL & ".act='I') ", _
                                        l_objDBCConnection, adOpenForwardOnly, adLockReadOnly
        If (l_objRecordSet.State = adStateOpen) Then
                ...
        End If
        ...
        ...

На мелкой базе работал вполне.
...
Рейтинг: 0 / 0
17.02.2006, 15:31:20
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552561
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Сорри, возможно ошибка в другом, просто деббагер показывал часть строки, я на нее и подумал. Но тогда непонятно почему запрос не выполняется, т.к. написан верно (был проверен на других базах, но помельче).
...
Рейтинг: 0 / 0
17.02.2006, 15:36:28
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552806
Melkiades
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Melkiades
Участник
Ну так а где сам запрос-то?
...
Рейтинг: 0 / 0
17.02.2006, 16:34:01
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33552963
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
В вышепредставленном коде 8)
...
Рейтинг: 0 / 0
17.02.2006, 17:11:22
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33553007
Фотография Konst_One
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Konst_One
Участник
а это что?

.AND.
...
Рейтинг: 0 / 0
17.02.2006, 17:22:29
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33554847
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
.AND. это для Фокса так принято, для принудительного окончания разбора строки (если не ошибаюсь). Не в AND'ах дело.

Даже вот такая тривиальная вещь не проходит почему-то (((

Код: plaintext
1.
2.
3.
SELECT DISTINCT plan_p.izak, plan_p.kod_o, plan_p.kod_k, plan_p.kod_e, plan_p.mat, plan_p.marka, plan_p.kol_plan, plan_p.kol_fakt, plan_p.st_plan, ;
plan_p.bild, plan_p.firma, plan_p.prim_2, plan_p.prim_3, plan_p.dras, plan_p.koef, plan_p.st_fakt, plan_p.spisan, plan_p.who, plan_p.dbid, plan_p.recid FROM plan_p

Неужели это из-за размеров запроса?!
...
Рейтинг: 0 / 0
20.02.2006, 08:34:01
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33554870
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Наверно всех уже запутал 8) Sorry. Предыдущий запрос работает, в одном месте забыл пробел поставить просто. Буду пошагово все выполнять до возникновения ошибки.
...
Рейтинг: 0 / 0
20.02.2006, 08:51:11
| Ответить | Цитировать | Написать  
ADODB.Recordset и String
    #33554882
1ndig0
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1ndig0
Гость
Нашел ошибку. Все оказалось довольно банально 8) В запросе сравнивались две символьные строки одна была в верхнем регистре, а другая в нижнем, и как результат, запрос оказывался пустым, хотя и написан на первый взгляд правильно.
...
Рейтинг: 0 / 0
20.02.2006, 09:04:39
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / ADODB.Recordset и String
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=292&tid=2166347]:
 0ms
get settings:
 10ms
get forum list:
 18ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 44ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 243ms
total:  375ms
созд. / загр.: 375ms
x
x
Закрыть


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