Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поиск в содержимом поля / 9 сообщений из 9, страница 1 из 1
20.05.2009, 16:15
    #35996994
Kamely
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Добрый день!
Подскажите пожалуйста как мне отобрать все записи содержащие введенную посдстроку и отобразить их на форме.
Я пишу следующим образом:
SELECTtab1
LOCATE FOR ATC (ALLTRIM (THISFORM.PAGEFRAME1.PAGE1.EDIT6.VALUE), designation)>0
DO WHILE FOUND ()
INSERT INTO tmp_tabl (designation,notes) VALUES (tab1.designation,tab1.notes)
CONTINUE
ENDDO

Выводит только первую запись, содержащую введенную подстроку.
...
Рейтинг: 0 / 0
20.05.2009, 17:37
    #35997316
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Create Cursor tt (value v( 100 ))
Insert into tt values ('dddfewe14444rtger')
Insert into tt values ('dddfeweA14444rA1tger')
Insert into tt values ('dddfewe1444aa4rtger')
Insert into tt values ('dddfewaae14444rtger')
Insert into tt values ('dddfewe14444rtgA1er')
Insert into tt values ('dddfewe14444rtger')

Select * ;
	from tt ;
	where value Like "%A1%"
...
Рейтинг: 0 / 0
21.05.2009, 11:37
    #35998530
Kamely
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
я пробовала и таким образом, только в select подставляла не конкретное значение, а переменную, содержащую введенную подстроку в поле ввода.

vubor=ThisForm.Pageframe1.Page1.Edit6.Value
SELECT designation,note FROM tabl1 WHERE designation like "%vubor%"

Но у меня ничего не выводит, если подставляю конкретное значение, то выводит.
Помогите пожалуйста разобраться
...
Рейтинг: 0 / 0
21.05.2009, 11:42
    #35998548
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Create Cursor tt (value v( 100 ))
Insert into tt values ('dddfeweiii14444rtger')
Insert into tt values ('dddfeweA14444rA1tger')
Insert into tt values ('dddfewe1444aa4rtger')
Insert into tt values ('dddiiifewaae144444rtger')
Insert into tt values ('dddfewe14444rtgA1er')
Insert into tt values ('dddfewe1444444rtger')


Local lcStr 

lcStr = "%44444%"
Select * ;
	from tt ;
	where value Like (lcStr)


lcStr = "%iii%"
Select * ;
	from tt ;
	where value Like (lcStr)
...
Рейтинг: 0 / 0
21.05.2009, 11:44
    #35998555
Tohan_ORA
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Kamelyя пробовала и таким образом, только в select подставляла не конкретное значение, а переменную, содержащую введенную подстроку в поле ввода.
vubor=ThisForm.Pageframe1.Page1.Edit6.Value
SELECT designation,note FROM tabl1 WHERE designation like "%vubor%"
Но у меня ничего не выводит, если подставляю конкретное значение, то выводит.
Помогите пожалуйста разобраться
Попробуйте так:
Код: plaintext
SELECT designation,note FROM tabl1 WHERE designation like "%"+vubor+"%"
...
Рейтинг: 0 / 0
21.05.2009, 11:46
    #35998565
Tohan_ORA
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
и если в переменной есть ненужные пробелы, то обрежем их:
Код: plaintext
SELECT designation,note FROM tabl1 WHERE designation like "%"+alltrim(vubor)+"%"
...
Рейтинг: 0 / 0
21.05.2009, 11:57
    #35998599
прошелмимо
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Код: plaintext
1.
2.
3.
local vubor
vubor="%"+allt(ThisForm.Pageframe1.Page1.Edit6.Value)+"%"
SELECT designation,note FROM tabl1 WHERE designation like vubor
...
Рейтинг: 0 / 0
21.05.2009, 13:43
    #35999024
Kamely
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
Спасибо большое, все получилось.
...
Рейтинг: 0 / 0
21.05.2009, 16:26
    #35999716
glamis
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Поиск в содержимом поля
прошелмимо
Код: plaintext
1.
2.
3.
local vubor
vubor="%"+allt(ThisForm.Pageframe1.Page1.Edit6.Value)+"%"
SELECT designation,note FROM tabl1 WHERE designation like vubor


А так не проще?
SELECT designation,note FROM tabl1;
WHERE allt(ThisForm.Pageframe1.Page1.Edit6.Value) $ designation
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Поиск в содержимом поля / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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