[Tolabzik]

Добрый.такой вопрос.запрос в аксессе работает нормально .
предлагает задать переменные и выводит результат.
а в делфи выводит пустое окно с полями из запроса,а результата нету.
подозреваю что с типом параметров что то .
код стоит на адо квери

SELECT 'Всего новых клиентов' AS wer, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM Договор
WHERE (((Договор.[дата начала]) Between :1 And :2))
GROUP BY 'Всего новых клиентов';
UNION SELECT 'Заявок принятно' AS wer, Count([Копия Обращения].[Номер записи]) AS [Count-Номер записи]
FROM [Копия Обращения]
WHERE ((([Копия Обращения].[дата обращения]) Between :1 And :2))
GROUP BY 'Заявок принятно';
UNION SELECT [Виды Услуг].название, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM [Виды Услуг] LEFT JOIN Договор ON [Виды Услуг].[номер услуги] = Договор.[вид услуги]
WHERE (((Договор.[дата начала]) Between :1 And :2))
GROUP BY [Виды Услуг].название;


на батон код
form12.qry1.Active:=false;
form12.qry1.Parameters[1].Value:=edt1.text;
form12.qry1.Parameters[2].Value:=edt2.Text;
form12.qry1.Active:=true;

где что подркрутить подскажите..
с дата соурос нормально содинено .в дб грид другие простые запросы выводил нормально .

[M.A.D.M.A.N.]

Тип параметра попробуй указать.

[Tolabzik]

там стаит widestring
а какой надо ?

[Tolabzik]

ставил datatime тоже самое выдает

[M.A.D.M.A.N.]

Имя параметра указано? В запросе точно ошибок нет?

[Tolabzik]

Сообщение от M.A.D.M.A.N.

Имя параметра указано? В запросе точно ошибок нет?

специально зделал попроше имя 1 и 2 что бы не спутаться.в аксесе запрос работает нормально

[M.A.D.M.A.N.]

Нумерация обычно идет с нуля. или у тебя там >= 3 параметра?

[Tolabzik]

[Ildar-tsr]

Придется тебе так делать:

Код:

SELECT 'Всего новых клиентов' AS wer, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM Договор
WHERE (((Договор.[дата начала]) Between :1 And :2))
GROUP BY 'Всего новых клиентов';
UNION SELECT 'Заявок принятно' AS wer, Count([Копия Обращения].[Номер записи]) AS [Count-Номер записи]
FROM [Копия Обращения]
WHERE ((([Копия Обращения].[дата обращения]) Between :3 And :4))
GROUP BY 'Заявок принятно';
UNION SELECT [Виды Услуг].название, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM [Виды Услуг] LEFT JOIN Договор ON [Виды Услуг].[номер услуги] = Договор.[вид услуги]
WHERE (((Договор.[дата начала]) Between :5 And :6))
GROUP BY [Виды Услуг].название;
...
form12.qry1.Active:=false;
form12.qry1.Parameters.ParamByName('1').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('2').Value:=edt2.text;
form12.qry1.Parameters.ParamByName('3').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('4').Value:=edt2.text;
form12.qry1.Parameters.ParamByName('5').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('6').Value:=edt2.text;
form12.qry1.Active:=true;

P.S. Тип у параметров должен быть ftString!

[M.A.D.M.A.N.]

Сообщение от Ildar-tsr

P.S. Тип у параметров должен быть ftString!

ВайдСтринг и Стринг там ща разные?
Добавил 300 наносекунд спустя
Ааа... пардон, дельфи 7.

[Tolabzik]

Сообщение от Ildar-tsr

Придется тебе так делать:

Код:

SELECT 'Всего новых клиентов' AS wer, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM Договор
WHERE (((Договор.[дата начала]) Between :1 And :2))
GROUP BY 'Всего новых клиентов';
UNION SELECT 'Заявок принятно' AS wer, Count([Копия Обращения].[Номер записи]) AS [Count-Номер записи]
FROM [Копия Обращения]
WHERE ((([Копия Обращения].[дата обращения]) Between :3 And :4))
GROUP BY 'Заявок принятно';
UNION SELECT [Виды Услуг].название, Count(Договор.[Номер договора]) AS [Count-Номер договора]
FROM [Виды Услуг] LEFT JOIN Договор ON [Виды Услуг].[номер услуги] = Договор.[вид услуги]
WHERE (((Договор.[дата начала]) Between :5 And :6))
GROUP BY [Виды Услуг].название;
...
form12.qry1.Active:=false;
form12.qry1.Parameters.ParamByName('1').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('2').Value:=edt2.text;
form12.qry1.Parameters.ParamByName('3').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('4').Value:=edt2.text;
form12.qry1.Parameters.ParamByName('5').Value:=edt1.text;
form12.qry1.Parameters.ParamByName('6').Value:=edt2.text;
form12.qry1.Active:=true;

P.S. Тип у параметров должен быть ftString!

спасибо.заработало даже без изменения типа.