Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Вставка текущей даты в БД   Найти похожие ветки 

 
Vaso ©   (2010-02-19 17:16) [0]

Пытаюсь вставить текущую дату в таблицу БД.
(CodeGear Delphi 2009, Windows 2003, MSSQL 2005, поле LSDate[DateTime])

 SQLQuery1.Active:= False;
 SQLQuery1.SQL.Text:= "update students set LSDate=:prm where ID="+#39+ID+#39; // строка 2
 SQLQuery1.Params.ParseSQL(SQLQuery1.SQL.Text, True);
 SQLQuery1.Params.ParamByName("prm").DataType:= ftDate; // строка 4
 SQLQuery1.Params.ParamByName("prm").Value:= Now; // строка 5
 SQLQuery1.ExecSQL();

Выбрасывается ошибка - DBX Error: UnsupportedFieldType
 но если это сделать "через ...", т. е. записать так:

 SQLQuery1.SQL.Text:= "update students set LSDate=2010-02-18 where ID="+#39+ID+#39; // строка 2

 то в поле LSDate таблицы появляется запись: 14.06.1905 т. е. всё ОК, хотя дата, конечно, не совсем та ...

Дату текущую записать хочется очень. Спасибо


 
12 ©   (2010-02-19 18:06) [1]


> SQLQuery1.Params.ParamByName("prm").Value:= Now; // строка
> 5

неверные типы параметров?
SQLQuery1.Params.ParamByName("prm").Value:= datetimetostr(Now)?


 
Медвежонок Пятачок ©   (2010-02-19 18:25) [2]

"update students set LSDate=getdate() where ID= :p_id"
Parameters.ParamValues["p_id"] := MyID;


 
Vaso ©   (2010-02-19 20:41) [3]

Медвежонок Пятачок ©   (19.02.10 18:25) [2]
> "update students set LSDate=getdate() where ID= :p_id"
> Parameters.ParamValues["p_id"] := MyID;

Ура. Заработало!
Правильно так:

SQLQuery1.SQL.Text:= "update students set LSDate=getdate() where ID="+#39+ID+#39; // строка 2

Спасибо всем.



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.044 c
2-1268471112
Тофер
2010-03-13 12:05
2010.08.27
Как подать звуковой сигнал с делфи?


6-1223299271
JohnKorsh
2008-10-06 17:21
2010.08.27
Работа программ с сетевыми компонентами в ОС Vista.


15-1267738204
Юрий
2010-03-05 00:30
2010.08.27
С днем рождения ! 5 марта 2010 пятница


2-1274344276
zamtmn
2010-05-20 12:31
2010.08.27
unicode->ascii


2-1268827094
Delphist
2010-03-17 14:58
2010.08.27
DBLookupListBox