Строка запроса не помещается в String

[Лексей]

Подскажите, плиз, пути решения!
Строка SQL запроса для открытия набора записей не помещается в переменную типа String, какие пути решения можно применить?
Заранее благодарен всем!

[alibek]

В 2 гигобайта??? Да тогда никаких путей решения не существует.

[Лексей]

у меня почему то хватает только на 252 символа

[Sedge]

А с какими симптомами она не помещается в String?
И неплохо было бы код посмотреть.

[Лексей]

Ну например вот формирование строки, которая должна использоваться в открытии набора записей:

Код: Выделить всё

strSelect = "SELECT * FROM (" & _
         rs.Source & ") WHERE " & strSelect & " ORDER BY tblDoc.DSortOrder;"

rs.Open strSQL, cn, adOpenDynamic, adLockOptimistic

если условия предыдущего набора записей слишком длинные, то вот что получается в строке:
"SELECT * FROM (SELECT DISTINCTROW tblDoc.DCode, tblDoc.DName, tblDoc.ISID, tblDoc.DChoose, tblDoc.DPage FROM tblDoc INNER JOIN tblRefer ON tblDoc.DCode = tblRefer.DCode WHERE ((tblDoc.DCode) LIKE '%условие%') ORDER BY tblDoc.DSortOrder;) WHERE ((tblDc"

то есть полная строка обрезается где то на 252 символе и с конце приклеивается еще какойто символ (всегда разный - в данном случае - с)

[alibek]

Перед rs.Open добавь Debug.Print strSelect и посмотри, чему равна эта строка. Если обрезана она, значит проблемы в декларациях. Если строка не обрезана, значит это ограничение Access, используй сохраненные подзапросы.

[Лексей]

строка обрезается еще до rs.Open, т.е. во время конкатенации.
переменная декларируется обычно
dim strSelect as String

[codemaster]

Ну например вот формирование строки, которая должна использоваться в открытии набора записей:
strSelect = "SELECT * FROM (" & _
rs.Source & ") WHERE " & strSelect & " ORDER BY tblDoc.DSortOrder;"

см. выделенные места

так запросы не пишут

[Лексей]

Вопрос не об этом.
И чем выделенное не нравится?

[alibek]

codemaster, и правда, я как-то не посмотрел

[Лексей]

В чем ошибка то?Я идиот! Убейте меня, кто-нибудь!???

[Sedge]

Я, кстати, тоже никакого криминала в коде не вижу. Ну крутит человек вложенные запросы...
Чего нашли-то, поделитесь с общественностью.

2Лексей - а у тебя этот код в цикле исполняется? Ты нигде recordset в Nothing не выставляешь? И можешь описать вкратце, в чем задача состоит? И покажи процедуру целиком. Где у тебя, допустим, strSelect инициализируется?

[codemaster]

Я, кстати, тоже никакого криминала в коде не вижу. Ну крутит человек вложенные запросы...
Чего нашли-то, поделитесь с общественностью.

1. что есть изначально strSelect ?
2. rs.Source - Variant со всеми последствиями неговоря уже.....
3. "результат " выпонения кода ....

и т.д. и т.п.


Вообще за подобные "запросы" надо брать логарифмическую линейку и бить писавшего по пальцам.

[Sebas]

да не будет хавать аксес больше 255 символов
Точка.

А запрос им не нравиться, если юзер принимает участие в выборке, можешь встрять. Если нет - забей.

[Sedge]

2. rs.Source - Variant со всеми последствиями неговоря уже.....

Неа. Source возвращает String.
http://msdn.microsoft.com/library/defau ... source.asp

Вообще за подобные "запросы" надо брать логарифмическую линейку и бить писавшего по пальцам.

Может, прежде чем "линейкой по рукам", имеет смысл выяснить а) в чем состоит задача, б) можно ли предложить лучшее решение?

[codemaster]

2. rs.Source - Variant со всеми последствиями неговоря уже.....

Неа. Source возвращает String.
http://msdn.microsoft.com/library/defau ... source.asp

это старый баян
посмотри в Object Browser ADODB -> Recordset -> Source ( Lib 2.7)
потом тщательнее прочитай (переведи) статью MSDN

[Лексей]

Задача состоит в следующем:

есть список отображающий некоторый набор записей, который заполняется на основе рекордсета ADO, источник которого - строка SQL запроса со всякими условиями (все работает).
должен выполняться поиск (в смысле отображение записей удовлетворяющих заланным новым условиям, а не переход от записи к записи удовлетворяющим этим самым условиям) из этих записей.

Для этого я строю запрос на основе предыдущей строки запроса и добавляю к нему новые условия.

Все работает нормально, если строка запроса не превышает 252 символов и дело тут вроде не в способе открытия рекордсета, не в аце (кстати, он прекрасно хавает запросы, если он создан в его конструкторе) а в том, что В STRING НЕ ВЛАЗИТ СТРОКА ДЛИННЕЕ 252 СИМВОЛОВ.

Изначально strSelect - построенные для строки запроса условия.
Sourse прекрасно присваевается переменной типа String.

А за что линейкой мне - так и не понял (ну разве, что очень сложный запрос, но время на его обработку тратиться в рамказх разумного)

[Лексей]

Может подскажите другие пути реализации данной задачи???

[codemaster]

мда.

как вариант Recordset.Filter смотреть не пробывал?

http://msdn.microsoft.com/library/defau ... filter.asp

[Лексей]

как понимать МДА?

Дак сколько же символов влазит в String?

[GSerg]

Чуть больше 2 млрд.

[codemaster]

как понимать МДА?

OK!

Сколько символов влазит см. выше

Итак исходя из задачи

ты формируеш запрос исходя из "всяких" условий
и наверное выводиш результат пользователю в таблицу.

Затем требуется наложить фильтр на этот запрос и обновить таблицу
пользователя?

[Лексей]

Данные выводятся не в таблице, а в ListView, более того набор записей, на основе которого был построен список постоянно открыт и в дальнейшем используется для модификации данных в записяз (изменение, удаление и т.п.)

[Лексей]

Почему у меня же больше 252 символов не влазит - пробовал даже просто две длинные строчки объединитьт - обрезает гад и все!

[codemaster]

Данные выводятся не в таблице, а в ListView, более того набор записей, на основе которого был построен список постоянно открыт и в дальнейшем используется для модификации данных в записяз (изменение, удаление и т.п.)

тут это не в количестве символов дело !
тут в консерватории поправить надо.

и совсем не к чему держать постоянно открытым recordset

Попробуй поменяй дизайн программы.

[Sedge]

это старый баян
посмотри в Object Browser ADODB -> Recordset -> Source ( Lib 2.7)
потом тщательнее прочитай (переведи) статью MSDN

Ну не знаю насчет баяна... Может кому он и известен, но я привык доверять своим глазам.

...Sets a String value or Command object reference; returns only a String value that indicates the source of the Recordset....

и далее

...However, reading the Source property does not return a Command object; instead, it returns the CommandText property of the Command object to which you set the Source property...

Как это можно по-другому перевести?
То что это свойство может иметь тип Variant я не спорю. Но возвращает оно всегда String, а следовательно его (свойства) использование в операции конкатенации является вполне правомерным.
В догонку:

http://msdn.microsoft.com/library/defau ... ourcex.asp
MsgBox "rstTitles source: " & vbCr & _
rstTitles.Source & vbCr & vbCr & _
"rstPublishers source: " & vbCr & _
rstPublishers.Source & vbCr & vbCr & _
"rstPublishersDirect source: " & vbCr & _
rstPublishersDirect.Source & vbCr & vbCr & _
"rstTitlesPublishers source: " & vbCr & _
rstTitlesPublishers.Source

Или авторов MSDN тоже по рукам надо?

2Лексей - для того что тебе нужно, такая конструкция действительно очень мало подходит. Думаю, что твою выборку из вложенных подзапросов прекрасно можно заменить манипуляцией с условиями клаузы WHERE, или, как советует codemaster, накладывая ограничения на уже сформированный Recordset с помощью свойства Filter....
И выложи полный текст процедуры. Если у тебя строка режется до обращения к Access'у, то это уже косяк в коде.

[SHURUP]

Почему у меня же больше 252 символов не влазит - пробовал даже просто две длинные строчки объединитьт - обрезает гад и все!

В смысле, даже не касаясь запросов? А ты чем проверяешь?
Попробуй вот такой код, что выдает?

Код: Выделить всё

Private Sub Command1_Click()
    A = String(200, "A")
    b = String(200, "B")
    SSS = A & b
    MsgBox Len(SSS)
End Sub

А то проверять можно чем угодно, вот MSGBOX у меня урезает все, что после 1203 символа.

[GSerg]

Небось строку объявил как string*252?

[Лексей]

УРА!!!!!!!!!!!!!!!!!!!! Все работает!!!!!

Ошибка была вот в чем - при конкатенации строк предыдущий запрос вставлялся целиком (вместе с ; на конце, посмотрел с утреца на свежую голову, убрал - все в порядке!

Source - возвращает ПО УМОЛЧАНИЮ STRING!
Построенные запрос работает прекрасно, а на счет длины строки стормозил (извините, если можно) - при ошибке взял получившуюся строку из окна наблюдения (там же она обрезается!) - ну тормоз, что ж сказать.

Фильтр иногда кстати работает не совсем корректно, а на постоянно открытом запросе экономится время - что кретично в данном случае.

А на счет дизайна проги, так я думаю прогу надо писать под необходимый дизайн, а не дизайн перестраивать под наработанные коды!