Есть справочник контрагенты. Там есть поле реквизит Адрес

Как с можно искать?

Например есть адрес:
5 мкр. дом 6  кв.52
Я хочу в строке поиска обработки забить
5 6 52
и чтоб мне выдало где встречается одновременно 5 6 52, по идее в списке будет нужный мне адрес

Или вот еще адрес: Московская ул. дом 162  кв.9
Я хочу написать в поиске Московс 162 9

И чтоб в результате был нужный мне адрес.

Как реализовать?

1с++

Используй функцию Найти("где ищем","что ищем")

(1) TSQL

Она долго ищет

поиск нашел вот такое
http://1clancer.ru/article/_otbor_po_podstroke_rekvizitov_v_forme_spiska_spravochnika_ala_vosmerka_s_ispolzovaniem_pryamykh_zaprosov_k_baze._726

(4) А тебе насколько быстрее нужно, для быстрого поиска создаются индексы. Или оптимизация

(4) 1sqlite

Я щас вот так сделал.
Но хочется быстрее искать.

Справочник 200000 записей.

Процедура НайтиЭл()
    Ра = Разобрать(Врег(СловоПоиска));
    Если Ра.КоличествоСтрок() < 2 Тогда
        Предупреждение("Нужно хотябы два слова",3);
        Возврат;
    КонецЕсли;
    СписокРезультатов = СоздатьОбъект("СписокЗначений");
    Спр = СоздатьОбъект("Справочник.Абоненты");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент() = 1 Цикл
        НетЭтогоСлова = 0;
        Ра.ВыбратьСтроки();
        Пока Ра.ПолучитьСтроку() = 1 Цикл
            Адрес = Врег(Спр.АДРЕС);
            Если Найти(Адрес,Ра.Слово) = 0 Тогда
                НетЭтогоСлова = 1;
                Прервать;
            КонецЕсли;
        КонецЦикла;
        Если НетЭтогоСлова=1 Тогда
            Продолжить;
        КонецЕсли;
        СписокРезультатов.ДобавитьЗначение(Спр.ТекущийЭлемент(),Спр.АДРЕС);        
    КонецЦикла;
    Выб="";
    СписокРезультатов.СортироватьПоПредставлению();
    Если СписокРезультатов.ВыбратьЗначение(Выб,"Результат поиска",,20)=1 Тогда
        Сообщить(ТипЗначенияСтр(Выб));
    КонецЕсли;
КонецПроцедуры    // НайтиЭл

(5) там юзается 1с++ (1cpp.dll.) о которой тебе еще в (1) сказали

(8) Делай через запрос

В запросе условие  с фунцией поиска работает быстрее

(9) не путай меня с ТС

(0) переходите на восьмерку. там есть полнотекстовый поиск...

(12) восьмёрка - сырое неделанное подели.

Пока еще актуально.

(8) Тебе по двум словам, которые есть одновременно надо искать? По любому вхождению?

по всем словам сразу

По вхождению?

нашлось

вася пупкин лимитед
киндзадза астрероид инк

набрано

ас кин

так?

да

(17) Простым запросом делал?

(0) Создать доп поле в которое при заполнении адреса будет заносится:5 6 52

(18) Самое простое и тупое - сделать like 2 раза, первый раз запихнув во временную таблицу :)
(19) По-разному делал

все украдено до вас....
http://s020.radikal.ru/i716/1311/f3/da4656d2888e.jpg
http://i024.radikal.ru/1311/c7/23f2a63dec63.jpg

Ему по двум фрагментам сразу надо

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

(23) на верхней картинке - по двум (точнее, хоть по скольки)
а на нижней - по контрагенту (класс почти один и тот же).
лень картинки скриншотить...

Делал без ВК, принцип такой:
Раскладываем строку на несколько.
Делаем запрос по каждой строке через условие "И".
В базе SQL на справочнике номенклатуры 90 тыс ищет 1-2 сек.
Как то так:

    СтрПоиска = нрег(СокрЛП(СтрокаПоиска));
    
    ТекстУсловия="";
    
    Для К=1 По 100 цикл
        Н=Найти(СтрПоиска," ");
        Если Н=0 Тогда
            Слово=СокрЛП(СтрПоиска);
            Если ПустаяСтрока(Слово)=0 Тогда
                ТекстУсловия = ТекстУсловия+"
                |Условие("""+Слово+""""+ " в нрег(Наименование));";
            КонецЕсли;
            Прервать;
        КонецЕсли;
        Слово=СокрЛП(Сред(СтрПоиска,1,Н-1));
        СтрПоиска = Сред(СтрПоиска,Н+1);
        Если ПустаяСтрока(Слово)=0 Тогда
            ТекстУсловия = ТекстУсловия+"
            |Условие("""+Слово+""""+ " в нрег(Наименование));";
        КонецЕсли;
    КонецЦикла;
    
    ТекстЗапроса =
    "//{{ЗАПРОС(Сформировать)
    |Наименование = Справочник.Товары.Наименование;
    |ТекущийЭлемент = Справочник.Товары.ТекущийЭлемент;
    |Группировка ТекущийЭлемент без групп;
    |Без итогов;";
    ТекстЗапроса = ТекстЗапроса + ТекстУсловия+"
    |"//}}ЗАПРОС
    ;
    // Если ошибка в запросе, то выход из процедуры
    Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
        Возврат;
    КонецЕсли;



(26)
раскладывать ничего не надо надо просто делать справочник улиц, его даже и делать не надо он должен быть и так если у вас есть зарплата то там выгрузка в пенсионный там даже справочник свой жесткий был КЛАДР.. вы даже похоже этого не знаете спецы млин.

(27) речь может идти не обязательно об адресном справочнике.

(27) Это к чему было? Причем тут улицы?

(26) Похоже на поиск в инете :) Следующий шаг - web-броузер на 1С :))))))
(29) Ну, не понял человек, чего надо :))))

(30) "на 1с" не делаи, а вот "в 1с" - делали

(22) ощень нама интересно как такое сделать...

(32) с учетом "Возникла необходимость закрыть исходный код конфигурации.
Продаю конфигурацию и не хочу чтоб ее изменяли без меня." - могу продать. :-)