| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
ADO поиск
777 © (2002-04-11 18:37:00)Имеется DB MSSQL (>140000 записей),коннект через ADO, надо организовать быстрый поиск.
К сожалению на данный момент в SQL я ориентируюсь
на уровне SELECT *, пытался использовать ADOTable.Lookup, Locate
- всё работает, но ОЧЧень медленно.
Delirium (2002-04-12 12:28:00) [1]Вообще RecordSet-ы могут быть "проидексированы", как результат такой "локальной индексации" поиск с помощью Locate ускоряется в несколько раз. Для этого необходимо проделать следущее:
ADOQuery1.Close;
ADOQuery1.SQL.Text:="select id_name,c_name from r_names";
ADOQuery1.Open;
// А вот и "индексация" - опимизация RecordSet-а по конкретному полю
ADOQuery1.Recordset.Fields["id_name"].Properties["Optimize"].Value:=True;
ADOQuery1.Locate("id_name","17517",[loPartialKey]);
Johnmen (2002-04-12 11:55:00) [2]SELECT * FROM TBL WHERE FLD LIKE....
для символьных полей.
777 (2002-04-12 11:43:00) [3]А как всё-таки быть с динамическим поиском,
а-ля FindNearest?
777 (2002-04-11 20:37:00) [4]
> Aleksandr ©
спасибо!
Aleksandr (2002-04-11 20:33:00) [5]ЗЫ: У меня через такое дело таблицы в 600 000 записей в секунду укладываются... Можно также сделать формированием строки Filter у компоненты. Предпоследнюю строку запроса туда. Истчо быстрее будет, потому как фильтр работает с уже пришедшим набором данных, что его неслабо ускоряет. Тот же эффект будет, если набор данных у тебя был уже открыт, и в вышеуказанный код после Connection вставляешь:
DataSet:=MyOpenedQuery;
Aleksandr (2002-04-11 20:28:00) [6]Организовывай через формирование запроса:
with TADOQuery.Create(nil) do try
Connection:=MyConnection;
SQL.Add("SELECT * FROM "+TableName);
SQL.Add("WHERE ID1="+IntToStr(SearchId)+" AND Name1="+SearchName);
SQL.Add("ORDER By ID1");
try
Open;
DoSomething;
Close
except
end
finally
Free
end
| |
