ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / генерация отчета в HTML
6 сообщений из 6, страница 1 из 1
генерация отчета в HTML
    #35170036
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
Добрый день!
Задача такая: нужно что по нажатию кнопки в клиентской части генерился отчет в html-формате. У меня такой вопрос: как проще это сделать, создать хранимую процедуру, кот будет формировать отчет и вызывать её, или можно создать отчет с помощью какого-нить мастера типа Report Server , Report Manager и т.п.
Клиент Delphi7, БД SQL Server 2005
...
Рейтинг: 0 / 0
04.03.2008, 15:24
| Ответить | Цитировать | Написать  
генерация отчета в HTML
    #35170041
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
отчет должен формироваться по параметру дата, с такое-то по такое-то
...
Рейтинг: 0 / 0
04.03.2008, 15:25
| Ответить | Цитировать | Написать  
генерация отчета в HTML
    #35170134
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
и еще вопрос: Report Service Configuration нужно отдельно устанавливать? у меня sql Server 2005, установлена SQL management studio
...
Рейтинг: 0 / 0
04.03.2008, 15:43
| Ответить | Цитировать | Написать  
генерация отчета в HTML
    #35171780
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
кто-нибудь помогите с процедурой %( выборку я написала, а как теперь это отправить в html файл
...
Рейтинг: 0 / 0
05.03.2008, 10:17
| Ответить | Цитировать | Написать  
генерация отчета в HTML
    #35171836
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
в процедуре это никак не реализовать, только в клиентской части получается
...
Рейтинг: 0 / 0
05.03.2008, 10:33
| Ответить | Цитировать | Написать  
генерация отчета в HTML
    #35173286
Фотография /Anna/
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
/Anna/
Участник
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, ADODB, RzPanel, ExtCtrls, StdCtrls, ComCtrls;

type
TForm1 = class(TForm)
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
ADOQuery1: TADOQuery;
RzStatusBar1: TRzStatusBar;
RzToolbar1: TRzToolbar;
Button1: TButton;
ListView1: TListView;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
str :string;
Item :TListItem;
begin
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.SetText('MDB_selectResult 166');
ADOQuery1.Open;
ADOQuery1.First;
while not ADOQuery1.Eof do
begin
Item := ListView1.Items.Add;
Item.Caption := ADOQuery1.FieldByName('Nameaerodrome').AsString;
Item.SubItems.Add(ADOQuery1.FieldByName('flightnomer').AsString);
Item.SubItems.Add(ADOQuery1.FieldByName('rnomer').AsString);
Item.SubItems.Add(ADOQuery1.FieldByName('typeliner').AsString);

ADOQuery1.Next;
end;
ADOQuery1.Close;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
i :Integer;
Item :TListItem;
SL :TStringList;
str :string;
begin

SL := TStringList.Create;

SL.Add('<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">');
SL.Add('<HTML><HEAD><TITLE>' + 'Àâèàêîìïàíèÿ N166' + '</TITLE>');
SL.Add('<META content="text/html; charset=windows-1251" http-equiv=Content-Type></HEAD>');
SL.Add('<BODY><FONT face=Arial size=2>');

for i:=0 to ListView1.Items.Count-1 do
begin
Item := ListView1.Items ;
SL.Add('<P align=center>');

str := Item.Caption + ' ' +
Item.SubItems[0] + ' ' +
Item.SubItems[1] + ' ' +
Item.SubItems[2];
SL.Add(str);

SL.Add('</P>');
end;
SL.Add('</FONT></BODY></HTML>');
SL.SaveToFile('test.html');
SL.Free;

end;

end.
...
Рейтинг: 0 / 0
05.03.2008, 16:12
| Ответить | Цитировать | Написать  
6 сообщений из 6, страница 1 из 1
Форумы / Отчетные системы [игнор отключен] [закрыт для гостей] / генерация отчета в HTML
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]