DateTime error in 3.4.6?
Posted: Thu 31 Jul 2014 09:07
Hi. I'm trying to use AsDateTime in your dbExpress driver, but it doesn't seem to be working?
When I run this code I get the error: No value for parameter 'DATETIME'
Code: Select all
qry := TSQLQuery.Create(nil);
try
qry.SQLConnection := FSQLConnection;
qry.SQL.Text := 'CREATE TABLE [TEST] ('
+ ' [DATETIME] datetime NOT NULL '
+ ', [NUMBER] integer NOT NULL '
+ ', [TEXT] nvarchar(30) NULL '
+ '); ';
qry.ExecSQL;
qry.Close;
qry.SQL.Text := ' CREATE UNIQUE INDEX [PK_TEST] ON [TEST]([DATETIME], [NUMBER]); ';
qry.ExecSQL;
qry.Close;
qry.SQL.Text := 'INSERT INTO [TEST] ([DATETIME], [NUMBER], [TEXT]) '
+ ' VALUES (:DATETIME, :NUMBER, :TEXT);';
qry.Params[0].AsDateTime := Now;
qry.Params[1].AsInteger := 1;
qry.Params[2].AsString := 'Text';
qry.ExecSQL;
qry.Close;
finally
qry.Free;
end;