VPF::проблем из listbox в запрос(отчет)

ABPOPA

Дата 9.5.2007, 18:15 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

такое дело.

есть форма с лисбоксом,по листбоксу делаю множественный выбор, записываю в строку все что выделено через "or".

отдельной функцией беру строку.

как условие передаю строку из функции в запрос.

так вот собственно трабла в том что строка "23 Or 24 Or 25" записывается и передается.но запрос её не воспринемает в условиях.а если просто "25" то все норм.

подскажите как сделать?

Akina

Дата 9.5.2007, 22:47 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

Телепаты у нас нынче в отпуске.
Текст - в студию.

--------------------

О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

ABPOPA

Дата 10.5.2007, 17:32 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

Сори не догодался срузу выложить код.

Код


Public Function SpisokOsnov() As String
Dim varItem As Variant
Dim strRez As String
For Each varItem In spisok.ItemsSelected
strRez = strRez & spisok.ItemData(varItem) & ";"
Next varItem
If Len(strRez) = 0 Then SpisokOsnov = "": Exit Function
strRez = Left$(strRez, Len(strRez) - 1)
strRez = "In(" & strRez & ")"
SpisokOsnov = strRez
End Function

Код


Public Function GetValue()
GetValue = Form_Форма1.SpisokOsnov
End Function

Код


SELECT таблица.id, таблица.[Счет получателя], таблица.Плательщик, таблица.Основание
FROM таблица
WHERE (((таблица.id)=GetValue()));

собственно формиру строку из всех выбраных элементов ЛистБокса.
Передаю строку в модуль.
Строку из модуля использую как условие в запросе.

пробывал строку In(72;73;74) и 72 Or 73 Or 74. Воспринемает только когда выделяеш один элемент например передается 73.

Хелп плиз.мозг сломал ужо smile

Это сообщение отредактировал(а) ABPOPA - 10.5.2007, 17:33

Akina

Дата 10.5.2007, 18:01 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

А ты попробуй в свой запрос подставить ТОЧНО ту строку, которую возвращает функция. А потом посмотри, как полученный запрос соотносится с синтаксисом MS Jet SQL...

--------------------

ABPOPA

Дата 10.5.2007, 18:15 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

строка из функции In(73;74;75) не работает.
строка в условии In(73;74;75) работатет.

в том то и проблема.

Akina

Дата 10.5.2007, 22:13 (ссылка)

(нет голосов)

Загрузка ...

Советчик

Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454

Цитата(ABPOPA @ 10.5.2007, 19:15

)

строка из функции In(73;74;75) не работает.
строка в условии In(73;74;75) работатет.

Правильно. Там где в построителе точка с запятой, в функции должна быть запятая...

--------------------

ABPOPA

Дата 11.5.2007, 00:33 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

в том то и проблема что с запятой тож не хочет :(
пробавал еше в самом начале.

должен но не хочет :(:(:(:(

системный разделитель у меня "зпт"
вовсяком случае возврашеет вот это

Код


Public Function GetDecimalSeparator() As String
GetDecimalSeparator = Format(0#, ".")
End Function

"зпт"

из-за него наверное

Это сообщение отредактировал(а) ABPOPA - 11.5.2007, 00:59

ABPOPA

Дата 11.5.2007, 12:58 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

мож кто знает?
как решить траблу?

или можите подсказать как сделать отчет(запрос) другим способом.

bopoha

Дата 12.5.2007, 08:37 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1283
Регистрация: 10.5.2006
Где: Беларусь, Минск

Репутация: 21
Всего: 21

Синтаксис такой:

Код


... WHERE имя_поля In (значение1, значение2, значение 3, ...)

--------------------

Как создавать приложения на MS Access

ABPOPA

Дата 12.5.2007, 23:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 12
Регистрация: 30.3.2005

Репутация: нет
Всего: нет

Цитата(bopoha @ 12.5.2007, 08:37)

Синтаксис такой:

Код


... WHERE имя_поля In (значение1, значение2, значение 3, ...)

вопрос не в том.да не важно уже.

спс всем решил вопрос програмным созданием запроса.
спасибо за внимание.тему мона закрыть.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| MS Access \| Следующая тема »