Вниз
Скачать: CL | DM;

SQL-запрос   Найти похожие ветки 

 
Oleg_er   (2002-06-04 06:20) [0]

нужно сфоормировать хитрый запрос:
а точнее объединить 3 в одном
select aaa from tbl where q=1
select aaa from tbl where q=2
select aaa from tbl where q=3

tbl
aaa | q
--------
qw | 1
qw | 2
we | 2
sd | 3
sd | 1

и желательно получить такую табличку:

1 | 2 | 3 |
----------------
qw | qw | 0 |
sd | 0 | sd |
0 | we | 0 |
----------------


 
fnatali ©   (2002-06-04 06:29) [1]

Запрос
select aaa from tbl where q=1 or q=2 or q=3
Что значит - "получить табличку"? Если нужен отчёт в таком виде, то воспользуйся cross-отчётами во free-report (fast-report),XL-report. Или попробуй Decision-cub



 
Oleg_er   (2002-06-04 06:49) [2]

нужно эту табличку в ёксел засунуть
тогда чем пользоваться предпочтительнее???
выше перечисленными reportами не пользовался :-(


 
skiph ©   (2002-06-04 10:33) [3]

Через Иксель надо вручную все заполнять, но можно:
Var Exl:Variant;
begin
Exl:=CreateOLEObject("Excel.Application");//Создаем объект Excel
Exl.WorkBooks.add;// добавляем книжку
XL.visible:=true;// делаем видимым
Что делать дальше. Дальше открываешь сам Иксель, начинаешь записывать макрос и во время записи делаешь те действия, которые ты хочешь промоделировать программно, потом открываешь его и читаешь VBA-команды. Их и используешь, напр, для занесения в ячейку строки Exl.ActiveSheet.Cells[i,j]:=Str1;



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.009 c
1-88866
Good Man
2002-06-17 21:29
2002.06.27
Как получить TextRange конкретного фрейма в TWebBrowser?


1-88803
Shadow
2002-06-16 20:22
2002.06.27
Как сосчитать кол-во одинаковых символов в строке?


1-88863
Charlz
2002-06-17 18:09
2002.06.27
Как заменить символы в строке


6-88977
Brand
2002-04-09 14:30
2002.06.27
ICQ


1-88827
don_dampster
2002-06-14 10:33
2002.06.27
SysTray




   Наверх