Цитата:
Сообщение от TaraZZZ
Ну так я и создаю запрос в рантайме. В дизантайме у меня вообще ничего не указано.
|
Date ведь стринговая переменная? И какое значение она принимает в момент выполнения запроса?
Код:
var qry: TADOQuery;
...
qry:= TADOQuery.Create(nil);
with qry do
begin
Connection:= ADOConnection1;
SQL.Text:= 'insert into days(day, misk, silsk, all) values('+QuotedStr(date)+',0,0,0)';
ExecSQL;
Free;
end;
Если именно с параметрами надо для дальнейшего использования данного кверика, то:
Код:
var qry: TADOQuery;
...
qry:= TADOQuery.Create(nil);
with qry do
begin
Connection:= ADOConnection1;
SQL.Text:= 'insert into days(day, misk, silsk, all) values(:day,:misk,:silsk,:all)';
Parameters.ParamByName('day').DataType:= ftDateTime;
Parameters.ParamByName('misk').DataType:= ftInteger;
Parameters.ParamByName('silsk').DataType:= ftInteger;
Parameters.ParamByName('all').DataType:= ftInteger;
Parameters.ParamByName('day').Value:= date;
Parameters.ParamByName('misk').Value:= 0;
Parameters.ParamByName('silsk').Value:= 0;
Parameters.ParamByName('all').Value:= 0;
ExecSQL;
end;