Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка при выполнении запроса [D7, XP]


fedpavel ©   (2006-06-23 13:54:00) 

Приветствую Вас Мастера. БД в Pervasive 8.
У меня вопрос: при выполнении запроса выскакивает ошибка: List Index out of bounds(0). Подскажите пожалуйста, что я делаю не так.
Пример кода:
Function Tfrm_Main.f_LoadPrihod(dat_Date:String):Boolean;
var str_Date:String;
begin
 str_Date:='SELECT *FROM tbl_Podrazdel INNER JOIN (tbl_People INNER JOIN tbl_Prihod ON tbl_People.PeopleID = tbl_Prihod.PeopleID) ON tbl_Podrazdel.PodrazdelID = tbl_Prihod.PodrazdelID Where tbl_Prihod.DateIN=DIN';
  with data_1.q_Soft do begin
   Close;
   SQL.Clear;
   Connection:=data_1.ADO_Con1;
   SQL.Text:=str_Date;
    Parameters[0].Value:=dat_Date;Именно на этой строке
   str_Date:=str_Date+ 'ORDERBY TimeIN';
   Open;
  end;


fedpavel   (2006-06-23 14:02:00) [1]


> Плохиш

Огромное Спасибо...


Плохиш   (2006-06-23 13:58:00) [2]


> двоиточие

двоеточие, конечно же :-)


Сергей М.   (2006-06-23 13:57:00) [3]


> при выполнении запроса


Нет тут никакого "выполнения запроса".

Запрос выполняется при вызове метода Open(), а у тебя до него даже дело не доходит.


> Именно на этой строке


Потому что список параметров пуст.


Плохиш   (2006-06-23 13:57:00) [4]


>  str_Date:='SELECT *FROM tbl_Podrazdel INNER JOIN (tbl_People
> INNER JOIN tbl_Prihod ON tbl_People.PeopleID = tbl_Prihod.
> PeopleID) ON tbl_Podrazdel.PodrazdelID = tbl_Prihod.PodrazdelID
> Where tbl_Prihod.DateIN=DIN';

И хде здеся параметры? К слову, перед параметром в SQL-запросе ставиться двоиточие.


Наверх

Титульная страница Поиск, карта сайта Написать письмо