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

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

ADOquery. Что-то не нравится в параметрах или настройках.. [D7, XP]

Vlad Oshin ©   (2007-04-02 16:13:00) 

написал:

ADOquery1.Active:=false;
ADOquery1.SQL.Clear;
ADOquery1.SQL.Add('insert into tb_GlobPrice values (:p1,:p2,:p3,:p4,:p5)');
ADOquery1.Parameters.ParamByName('p1').Value := NameFile1;
ADOquery1.Parameters.ParamByName('p2').Value := paramstr(1);
ADOquery1.Parameters.ParamByName('p3').Value := datetostr(now);
ADOquery1.Parameters.ParamByName('p4').Value := SelCountry;
ADOquery1.Parameters.ParamByName('p5').Value := DateEdit1.Text;
memo1.Lines.Add(inttostr(namefile1));
memo1.Lines.Add(paramstr(1));
memo1.Lines.Add(datetostr(now));
memo1.Lines.Add(inttostr(SelCountry));
memo1.Lines.Add(DateEdit1.Text);
memo1.Lines.Add(ADOquery1.SQL.Text);
ADOquery1.ExecSQL; // тут вылетает ошибка: ODBC SQL Server Driver Дополнительная  возможность не реализована.

в мемо написано:
1
C:\Price.xls
02.04.2007
1
04.04.2007
insert into tb_GlobPrice values (:p1,:p2,:p3,:p4,:p5)

пишу запрос в другой софтине (мною же и написанной для просмотра бызы, с применением того же ADOQuery):
insert into tb_GlobPrice values (1,'C:\Price.xls','02.04.2007',1,'04.04.2007')
он отрабатывает, запись в табличку принялась, ее вижу

---

Vlad Oshin   (2007-04-02 16:35:00) [1]

нет, достаточно было оказывается написать
ADOquery1.Parameters.ParamByName('p3').DataType:=ftString;
ADOquery1.Parameters.ParamByName('p5').DataType:=ftString;
что-то с типом data глюки какие-то, хорошо хоть разворачивать не пришлось, типа такого:

> :='20070117'

---

Ega23   (2007-04-02 16:34:00) [2]

> Vlad Oshin ©   (02.04.07 16:23) [1]


Угу. Так и было.

---

Vlad Oshin   (2007-04-02 16:23:00) [3]

вот чего нашел:

> ODBC-драйвер для SQL-сервера не поддерживает параметры с
> типом datetime. Проще всего делать так:
> form2.editdatyav.Parameters.ParamByName('dat').DataType:
> =ftString;
> form2.editdatyav.Parameters.ParamByName('dat').Value:='20070117';
>  //Дата именно в таком формате
> А лучше всего выкинуть этот ODBC. Кроме этого там полно
> других глюков.

именно так и делать теперь? Что за ...

---

Наверх