VPF::парамметрический SQL-запрос - Форум программистов

Dolphinchik

Дата 12.9.2006, 05:51 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 47
Регистрация: 24.7.2006
Где: Филлипины

Репутация: нет
Всего: нет

Очень нужна помощь.

такой код:

Код


insert into [B]D08.dbf[/B]
select * from D.dbf
where data_o >=[B]'01.08.06'[/B] and data_o<=[B]'31.08.06'[/B]

Здесь до начала выполнения создана таблица D08.dbf.
Из общей таблицы D.dbf выбираем данные помещаем в таблицу D08.dbf
Мне нужно реализовать парамметрический запрос так, чтобы везде фигурировал месяц.
И таблица не заполнялась, а создавалась!

На вход задаём, к примеру Form1.Edit1.Text:='9';
Нужно так передать Form1.Edit1.Text, чтобы было:

Код


insert into [B]D09.dbf[/B]
select * from D.dbf
where data_o >=[B]'01.09.06'[/B] and data_o<=[B]'31.09.06'[/B]

и для создания таблицы, если я не ошибаюсь, нужно select into D09.dbf а не insert выполнять.

Вот...собственна, если у вас есть варианты решения, мысли, напишите пожалуйста.

Добавлено @ 05:56
эм...

insert into D08.dbf
select * from D.dbf
where data_o >='01.08.06' and data_o<='31.08.06'

и

insert into D09.dbf
select * from D.dbf
where data_o >='01.09.06' and data_o<='31.09.06'

вот так правильнее..

а может быть мне кто-нибудь скажет как вытащить из DateTimePicker месяц??
может я немножко по другому тогда смогу сделать..я новичок)

SergeBS

Дата 12.9.2006, 07:41 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1111
Регистрация: 10.6.2005
Где: Владимир

Репутация: 11
Всего: 22

Цитата

Обязательно указание:
1. Базы данных (Paradox, Oracle и т.п.)
2. Способа доступа (ADO, BDE и т.д.)

Savek

Дата 12.9.2006, 08:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 355
Регистрация: 10.4.2006
Где: Воронеж

Репутация: 7
Всего: 7

Код


SQL.Add('insert into D0'+Form1.Edit1.Text+'.dbf');
SQL.Add('select * from D.dbf');
SQL.Add('where data_o between :startdate and :enddate');
ParametersParamByName('startdate').value:=StartOfAMonth(2006,StrToInt(Form1.Edit1.Text)); 
ParametersParamByName('enddate').value:=EndOfAMonth(2006,StrToInt(Form1.Edit1.Text));

Примерно так.. Sorry, если гдето опчатался

Dolphinchik

Дата 12.9.2006, 11:38 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 47
Регистрация: 24.7.2006
Где: Филлипины

Репутация: нет
Всего: нет

оооо, спасибо, сейчас попробую.

SergeBS, BDE, FOXPRO.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Базы данных и репортинг \| Следующая тема »