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

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

Заполнить дату в MS SQL [D7, MySQL]


ДмирийК ©   (2003-02-06 10:00:00) 

Добрый день!
Имеется код

DateTime := FormatDateTime("yyyymmdd hh:nn:ss",Now);
FADOCommand.CommandText := "INSERT INTO [Log] ([Date], [User], Type, Source, Computer, Text) VALUES ("+
DateTime+","""+tUser+""","""+tType+""","""+tSource+""","""+tComputer+""","""+tText+""")";

Как заставить MS SQL принять дату в таком формате?


Zev   (2003-02-06 10:51:00) [1]

SET DateFormat ymd -- установка формата даты MS SQL: yyyy.mm.dd


stone   (2003-02-06 10:11:00) [2]

... кавычки забыл
FADOCommand.CommandText := "INSERT INTO [Log] ([Date], [User], Type, Source, Computer, Text) VALUES (GetDate(),"""+tUser+""","""+tType+""","""+tSource+""","""+tComputer+""","""+tText+""")";

а чтобы с кавычками не париться, лучше использовать QuotedStr


stone   (2003-02-06 10:07:00) [3]

Правильнее будет так:

FADOCommand.CommandText := "INSERT INTO [Log] ([Date], [User], Type, Source, Computer, Text) VALUES (GetDate(),"+tUser+""","""+tType+""","""+tSource+""","""+tComputer+""","""+tText+""")";


Reindeer Moss Eater   (2003-02-06 10:05:00) [4]

А еще лучше использовать параметры.
А еще лучше вместо параметров заполнять поле даты на сервере.


Reindeer Moss Eater   (2003-02-06 10:04:00) [5]

DateTime := FormatDateTime("yyyy-mm-dd hh:nn:ss",Now);


Reindeer Moss Eater   (2003-02-06 10:02:00) [6]

В каком формате?


Наверх

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