Платные хостинги     Раскрутка сайта     Книги по программированию

Параметры в запросах, ACCESS(не обязательное условие поиска)

- Работаю в ACCESSДопустим я создала запрос Select из таблицы,допустим я хочу из таблицы не все записи, а часть, но в качестве критерия поиска хочу использовать не постоянную величину, а переменную, а именно значение текстового поля из формы, откуда я и вызову затем этот запрос.Ясно, что для этого я подставлю в критерии поиска что-то вроде следующего:Код [Forms]![Form1]![txt_field1]highlightSyntax('vb0YzExO','vb'); и запрос будет выдавать записи согласно введенному мной на форме значению, это ясно.А Теперь самое главное.Что если я хочу, чтобы когда я на форме в текстовое поле ничего не введу, запрос выдавал бы мне все записи, а не искал бы записи с пустым значением соответствующего поля!Понимаете?То есть я хочу, чтобы поиск по критерию был не обязательным.И все это обязательно с помощью Query объекта.

- Да такое пробовала, только не работаетIIF([Forms]![Form1]![txt_field1] <> null,[Forms]![Form1]![txt_field1], ??здесь что)

- 1=1

- , не поняла?Это ты шутишь так?Вообще то пробовала поставить туда Like '*'Код IIF([Forms]![Form1]![txt_field1] <> null,[Forms]![Form1]![txt_field1], Like '*') highlightSyntax('vb0Y2QyZ','vb');, хотя поле Числового типа. Ну и не сработало.Хотя кода просто ввожу туда критерий без IIF, то есть просто Like '*', то выдает все записи

- Я не смеялся, просто вопроса не понял. Думал типа того чтото……SELECT Pole1 FROM Tab1WHERE IIF(LEN(@a) <> 0,Pole1 LIKE @a) – (тоже не катит, если условие не сработает вообще пусто будет)Конструкция «IIF(<condition>,<true>,<false>)» это VB а не SQL, не заметил «,<false>».А тебе нужно собирать WHERE!Я делаю тупо:Dim sWhere as StringsWhere = “WHERE 1=1” - тогда «AND» считать не нужно А далее просто проверяю все поля для выборкиsWhere = sWhere & IIF (text1.text <> “”, “AND (P1 LIKE ‘” & text1.text & “’)”, “”)sWhere = sWhere & IIF (text2.text <> “”, “AND (P2 LIKE ‘” & text2.text & “’)”, “”)…и так далее

- Что разве я не права?

- Также «IIF» можно использовать в Query.Вот примерКод Dim sTF As StringDim nText As IntegerText1.Text = "0"nText = IIf(IsNumeric(Text1.Text), Text1.Text, 0)sTF = IIf(Text1.Text = "", "False", "True")DE.rsC.CloseDE.rsC.Source = "SELECT b FROM T1 WHERE iif(" & sTF & ", b = " & nText & ", b = b)"DE.rsC.OpenhighlightSyntax('vbiYzhkY','vb');Но по мне это муторно, так прощеКод DE.rsC.Source = "SELECT b FROM T1 WHERE " & IIf((Text1.Text = "") And Not IsNumeric(Text1.Text), " b = b", "b = " & Text1.Text)highlightSyntax('vbViYWE1N','vb');А вообще IIF работает и там и там, если проблема не решена – тогда она не тут. Удачи.

- Nicka, попробуй так:WHERE IIf(([Forms]![Form1]![txt_field1]) is null , true, ПолеИзТаблицы = ([Forms]![Form1]![txt_field1]))Вместо ПолеИзТаблицы, подставь имя поля с которым идет сравнение.Все должно работать!

- Ты не так составила условие.Создай запрос с текстом ниже.Должно работать!SELECT Table1.id, Table1.nameFROM Table1WHERE IIf([Forms]![Form1]![txt] Is Null, True, name= [Forms]![Form1]![txt])

- Предлагаю вариант как я делаю:Создаю на форме дополнительное скрытое поле (напримет [txt_field2]) и при изменении [txt_field1] присваиваю ему соответствующее значение:If IsNumeric(Me.txt_field1) ThenMe.txt_field2=Me.txt_field1ElseMe.txt_field2="*"А в запросе:SELECT Table1.id, Table1.nameFROM Table1WHERE Table1.name Like [Forms]![Form1]![txt_field2];

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD