如何在IntraWeb用Crystal Report顯示報表 |
缺席
|
apple12
一般會員 發表:28 回覆:23 積分:10 註冊:2003-05-10 發送簡訊給我 |
請各位高手賜教。 本人現用Delphi 2005、IntraWeb 7.23、Crystal Report 10,會用Crystal Report 制造pdf報表,再用IntraWeb顯示。
問題是GServerController.FilesDir和WebApplication.AppURLBase不是指同一位址。如何找到WebApplication的檔案放在那裡? 我曾download Intraweb RaveDemo,執行無問題,因 GServerController.FilesDir和WebApplication.AppURLBase是指同一位址 With Crpe1 do
begin
Clear;
Printer.Orientation := orPortrait;
Connect.ServerName := 'localhost';
Connect.UserID := 'root';
Connect.Password := '';
Connect.DatabaseName := 'ABC';
reportname:=Extractfilepath(Application.ExeName) 'RPT\abc.rpt';
DiscardSavedData;
ExportOptions.Destination := toFile;
ExportOptions.FileType := AdobeAcrobatPDF; ExportOptions.FileName := GServerController.FilesDir WebApplication.AppID '\' 'abc.pdf';
//Make sure the directory exists
ForceDirectories(ExtractFileDir(GServerController.FilesDir WebApplication.AppID '\' 'abc.pdf'));
end;
Crpe1.Export; //Prepare a popup window that shows the Report-PDF
LWindowName := 'Report';
LOptions := 'scrollbars=yes,width=400,height=600';
LURL := WebApplication.AppURLBase '/files/' WebApplication.AppID '/' 'abc.pdf';
AddToInitProc('NewWindow("' LURL '", "' LWindowName '","' LOptions '");');
|
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |