adodb.recordset.source=select на 1000 символов :)

[uzer_@]

уточнить хотел, не выполню я селект на 1000 символов из vba кода?
надо таблицу в ворде заполнить , ворд и в слиянии этот селект не видит
ps - с слиянием разобрался - не видит из-за uniona, можно слить с unionом из-под accessa, но это не то что нужно, хотелось по recordsety циклом пройти и таблицу в ворде заполнить

[iGrok]

Если проблема разовая - вылить в аксессе в отдельную таблицу, и уже работать с ней. Если надо полностью автоматически, и постоянно.. Хм..
У меня adodb отказался выполнять запрос на 3.5к символов.
Так, чтобы ему 1к не нравился.. Да ещё и из-за унионов.. Как-то странно.

[$€rg]

да не c accessom все впорядке, открываю mdb файл из vba и там sourcу recordsetа подсовываю селект на 1000 символов получаю в результате на recordset.open runtime error и в source урезанный селект висит до 19Х символов около 200 короче, похоже на ограничениe stringa вот я и спрашиваю возможно ли че как, а то 70 таблиц создавать нехочется

[Andrey Fedorov]

похоже на ограничениe stringa вот я и спрашиваю возможно ли че как, а то 70 таблиц создавать нехочется

Ограничение String-a:

There are two kinds of strings: variable-length and fixed-length strings.

A variable-length string can contain up to approximately 2 billion (2^31) characters.

A fixed-length string can contain 1 to approximately 64K (2^16) characters.

Ограничение на длину Source Recordset-a для MDB-шек уже не помню... Но возможно что ты напоролся на него, тогда надо оптимизировать запрос.

[$€rg]

нечего там опримизировать 5 связных таблиц c inner joinами, сейчас как раз сижу ищу по sourcy ченить

[Andrey Fedorov]

нечего там опримизировать 5 связных таблиц c inner joinами, сейчас как раз сижу ищу по sourcy ченить

Собственно текст запроса покажи.

[$€rg]

со строкой все ок, это я наложал - не там длину смотрел в debug.print все ok

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

rs2.Source = "SELECT  DISTINCTROW bug.bug_date, norma.norma_text," & _
    "who.who_fio & who.who_org & who.who_dolg, place.place_name, " & _
    "norma.norma_date+bug.bug_date FROM norma INNER JOIN (who INNER JOIN " & _
    "((place INNER JOIN bug ON place.place_id = bug.place_id) INNER JOIN " & _
    "[cross] ON place.place_id = cross.place_id) ON who.who_id = bug.who_id)" & _
    "ON norma.norma_id = bug.norma_id where bug.bug_date Between #5/15/2008# And " & _
    "#6/15/2008# and cross.place_id in (select place_id from cross  where street1_id=10)" & _
    "union SELECT  DISTINCTROW bug.bug_date, norma.norma_text, who.who_fio & who.who_org & who.who_dolg AS Âûðàæåíèå1," & _
    "place.place_name, norma.norma_date+bug.bug_date AS Âûðàæåíèå2 FROM norma INNER JOIN (who INNER JOIN" & _
    "((place INNER JOIN bug ON place.place_id = bug.place_id) INNER JOIN [adress] ON place.place_id = " & _
    "adress.place_id) ON who.who_id = bug.who_id) ON norma.norma_id = bug.norma_id where bug.bug_date Between " & _
    "#5/15/2008# And #6/15/2008# and adress.place_id in " & _
    "(select place_id from adress  where street_id=10);"



run-time error '-2147467259 (80004005)':
method 'Open' of '_Recordset' failed

пойду посмотрю что ето


http://support.microsoft.com/kb/238243 - сходил, посмотрел

[$€rg]

ура, cross надо было в [] взять всем спасибо вопрос решен