Dimitry Timokhov,
Непонятная проблема. Нужен datetime, используйте datetime:
1.
exec sp_executesql N'select count(*) as [Count] from [Table] where [Datе] < @P1',N'@P1 datetime','2019-08-26'
1.
exec sp_executesql N'select count(*) as [Count] from [Table] where [Datе] < cast(@P1 as datetime)',N'@P1 date','2019-08-26'
Почему же непонятная?
1. Сразу насчет каста в запросе. Это понятно, что можно. Забыл сказать, что менять запрос не хотелось бы. Мне было бы достаточно нужный мне тип datetime рядом с @P1 во втором параметре sp_executesql.
2. Дабы пояснить лучше ситуацию, приведу пример.
Пример на дельфи, но он либы от дельфи не использует - все на позднем связывании прямо через OLE. Примерно это будет написано в любом языке.
Суть примера: для провайдеров SQLOLEDB и MSOLEDBSQL, для двух методов добавления параметров в ADO.Command, для четырех типов дат делает тривиальный запрос с параметром типа дата.
NB Можно выполнять на любой БД - ничего в БД не меняет.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
var
ProviderI, DatePrmTypeI, PrmMethodI: Integer;
Provider: String;
DateType: Integer;
DateTypeAsStr: String;
Cnn, Prm, Cmd: OleVariant;
begin
for ProviderI := 1 to 2 do
begin
case ProviderI of
1: Provider := 'SQLOLEDB';
2: Provider := 'MSOLEDBSQL';
end;
Cnn := CreateOleObject('ADODB.Connection');
Cnn.Open('Provider='+Provider+';Server=<server>;Database=<datebase>;Trusted_Connection=Yes;Application name=test1');
try
for PrmMethodI := 1 to 2 do
begin
for DatePrmTypeI := 1 to 4 do
begin
case DatePrmTypeI of
1: begin DateType := $00000007{adDate }; DateTypeAsStr := 'adDate' end;
2: begin DateType := $00000085{adDBDate }; DateTypeAsStr := 'adDBDate' end;
3: begin DateType := $00000086{adDBTime }; DateTypeAsStr := 'adDBTime' end;
4: begin DateType := $00000087{adDBTimeStamp}; DateTypeAsStr := 'adDBTimeStamp' end;
end;
Prm := CreateOleObject('ADODB.Parameter');
Prm.Direction := $00000001{adParamInput};
Prm.Type := DateType;
Prm.Value := Variant(EncodeDate(2019, 10, 12));
Cmd := CreateOleObject('ADODB.Command');
Cmd.ActiveConnection := Cnn;
Cmd.CommandText := '/*'+Provider+'.'+IntToStr(PrmMethodI)+'.'+DateTypeAsStr+'*/ select ?';
case PrmMethodI of
1:
begin
Cmd.Execute(Parameters := Variants.VarArrayOf([Prm]), Options := $00000080{adExecuteNoRecords}+$00000001{adCmdText});
end;
2:
begin
Cmd.Parameters.Append(Prm);
Cmd.Execute(Options := $00000080{adExecuteNoRecords}+$00000001{adCmdText});
end;
end;
end;
end;
finally
Cnn.Close;
end;
end;
end;
Посмотрите, какая интересная выдача получается (к моему вопросу не относится, просто интересный и для меня необъяснимый факт):
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
exec sp_executesql N'/*SQLOLEDB.1.adDate*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.1.adDBDate*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.1.adDBTime*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.1.adDBTimeStamp*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.2.adDate*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.2.adDBDate*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.2.adDBTime*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*SQLOLEDB.2.adDBTimeStamp*/ select @P1',N'@P1 datetime','2019-10-12 00:00:00'
exec sp_executesql N'/*MSOLEDBSQL.1.adDate*/ select @P1',N'@P1 date','2019-10-12'
exec sp_executesql N'/*MSOLEDBSQL.1.adDBDate*/ select @P1',N'@P1 date','2019-10-12'
exec sp_executesql N'/*MSOLEDBSQL.1.adDBTime*/ select @P1',N'@P1 date','2019-10-12'
exec sp_executesql N'/*MSOLEDBSQL.1.adDBTimeStamp*/ select @P1',N'@P1 date','2019-10-12'
exec sp_executesql N'/*MSOLEDBSQL.2.adDate*/ select @P1',N'@P1 datetime2(0)','2019-10-12 00:00:00'
exec sp_executesql N'/*MSOLEDBSQL.2.adDBDate*/ select @P1',N'@P1 date','2019-10-12'
exec sp_executesql N'/*MSOLEDBSQL.2.adDBTime*/ select @P1',N'@P1 time(0)','00:00:00'
exec sp_executesql N'/*MSOLEDBSQL.2.adDBTimeStamp*/ select @P1',N'@P1 datetime2(0)','2019-10-12 00:00:00'
Т.е. SQLOLEDB для любого способа добавления параметра (метод 1: сразу передавать параметры в ADO.Command.Execute; метод 2: сначала параметр добавить в ADO.Command.Parameters, а в ADO.Command.Execute ничего не передавать) параметр имеет тип datetime.
Для MSOLEDBSQL параметры для метода 1 и 2 различаются!!! Интересный факт. Что бы это значило?
Вернусь к исходному вопросу . Хотелось бы, чтобы я мог настраивать, чтобы MSOLEDBSQL также как SQLOLEDB использовал тип datetime рядом с @P1 во втором параметре sp_executesql. Можно управлять тем, какой тип параметра будет использовать ADO?
PS Для справки. Запрос select @@version дает: Microsoft SQL Server 2012 - 11.0.2100.60 (X64) Feb 10 2012 19:39:15 Copyright (c) Microsoft Corporation Developer Edition (64-bit) on Windows NT 6.2 <X64> (Build 9200: )
