| View previous topic :: View next topic |
| Author |
Message |
Dave Krajcar Guest
|
Posted: Thu Aug 12, 2004 3:47 am Post subject: Reports under web broker |
|
|
Has anyone out there ever used quickreports to create pdffiles in a web
broker app and then sent the pdf file back to the requestor. I can get this
to work using the web debugger but not the dll under IIS. (The browser gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
| Back to top |
|
 |
Dave Krajcar Guest
|
Posted: Thu Aug 12, 2004 1:39 pm Post subject: Re: Reports under web broker |
|
|
Jesus:
Thanks for responding. I actually think my problem is that the quick report
never runs. When I try to create it and execute it is when the 500 type
error happens. I'm not sure if it is because the quick report thinks it has
visual components or what. Have you ever created a quick report in a web
broker application?
Thanks!
-DAve
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote
| Quote: | Here is an example :
procedure TWebModule1.WebModule1ActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
FileStream : TFileStream;
begin
// after you export your report to pdf put this
// value of FileName is c:inetpubwwwroottemp20041212.pdf
FileStream := nil;
try
Response.Title := 'Download File ...';
Response.CustomHeaders.Add('Content-Disposition=filename=' +
ExtractFileName(FileName) );
Response.ContentType := 'application/pdf';
FileStream := TFileStream.Create( FileName , fmOpenRead +
fmShareDenyNone);
Response.ContentStream := FileStream;
Response.SendResponse;
except
on E: Exception do
begin
FreeAndNil(FileStream);
ErrorDialog(E.Message);
end;
end;
Regards
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411ae83a (AT) newsgroups (DOT) borland.com...
Has anyone out there ever used quickreports to create pdffiles in a web
broker app and then sent the pdf file back to the requestor. I can get
this
to work using the web debugger but not the dll under IIS. (The browser
gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
|
| Back to top |
|
 |
Dave Krajcar Guest
|
Posted: Thu Aug 12, 2004 10:12 pm Post subject: Re: Reports under web broker |
|
|
When I try to open this I get:
Receipt: Failure
The action you attempted did not succeed:
Cannot open file "f:inetpubwwwrootdbf200408121711.pdf". The system
cannot find the file specified
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote
| Quote: | Yes, check this
http://reportes.grupo-ed.com/scripts/project1.dll/xlswrite
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411b7301$1 (AT) newsgroups (DOT) borland.com...
Jesus:
Thanks for responding. I actually think my problem is that the quick
report
never runs. When I try to create it and execute it is when the 500 type
error happens. I'm not sure if it is because the quick report thinks it
has
visual components or what. Have you ever created a quick report in a
web
broker application?
Thanks!
-DAve
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411b1798$1 (AT) newsgroups (DOT) borland.com...
Here is an example :
procedure TWebModule1.WebModule1ActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
FileStream : TFileStream;
begin
// after you export your report to pdf put this
// value of FileName is c:inetpubwwwroottemp20041212.pdf
FileStream := nil;
try
Response.Title := 'Download File ...';
Response.CustomHeaders.Add('Content-Disposition=filename=' +
ExtractFileName(FileName) );
Response.ContentType := 'application/pdf';
FileStream := TFileStream.Create( FileName , fmOpenRead +
fmShareDenyNone);
Response.ContentStream := FileStream;
Response.SendResponse;
except
on E: Exception do
begin
FreeAndNil(FileStream);
ErrorDialog(E.Message);
end;
end;
Regards
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411ae83a (AT) newsgroups (DOT) borland.com...
Has anyone out there ever used quickreports to create pdffiles in a
web
broker app and then sent the pdf file back to the requestor. I can
get
this
to work using the web debugger but not the dll under IIS. (The
browser
gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
|
| Back to top |
|
 |
Dave Krajcar Guest
|
Posted: Fri Aug 13, 2004 1:35 am Post subject: Re: Reports under web broker |
|
|
Jesus:
Were these done with quickreports under delphi? WHich version of Delphi?
Can I look over the source code? I need to see how you got the report into
the page.
Thanks!
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote
| Quote: | Try it again, please ...
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411beb3f$1 (AT) newsgroups (DOT) borland.com...
When I try to open this I get:
Receipt: Failure
The action you attempted did not succeed:
Cannot open file "f:inetpubwwwrootdbf200408121711.pdf". The system
cannot find the file specified
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411bbdf0$1 (AT) newsgroups (DOT) borland.com...
Yes, check this
http://reportes.grupo-ed.com/scripts/project1.dll/xlswrite
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411b7301$1 (AT) newsgroups (DOT) borland.com...
Jesus:
Thanks for responding. I actually think my problem is that the
quick
report
never runs. When I try to create it and execute it is when the 500
type
error happens. I'm not sure if it is because the quick report thinks
it
has
visual components or what. Have you ever created a quick report in
a
web
broker application?
Thanks!
-DAve
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411b1798$1 (AT) newsgroups (DOT) borland.com...
Here is an example :
procedure TWebModule1.WebModule1ActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled:
Boolean);
var
FileStream : TFileStream;
begin
// after you export your report to pdf put this
// value of FileName is c:inetpubwwwroottemp20041212.pdf
FileStream := nil;
try
Response.Title := 'Download File ...';
Response.CustomHeaders.Add('Content-Disposition=filename=' +
ExtractFileName(FileName) );
Response.ContentType := 'application/pdf';
FileStream := TFileStream.Create( FileName , fmOpenRead +
fmShareDenyNone);
Response.ContentStream := FileStream;
Response.SendResponse;
except
on E: Exception do
begin
FreeAndNil(FileStream);
ErrorDialog(E.Message);
end;
end;
Regards
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411ae83a (AT) newsgroups (DOT) borland.com...
Has anyone out there ever used quickreports to create pdffiles
in
a
web
broker app and then sent the pdf file back to the requestor. I
can
get
this
to work using the web debugger but not the dll under IIS. (The
browser
gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
|
| Back to top |
|
 |
Dave Krajcar Guest
|
Posted: Fri Aug 13, 2004 1:39 am Post subject: Re: Reports under web broker |
|
|
One additional thought...I create the report based on input from the
incoming message from the browser. So I never know what thy will ask for by
way of accounts to include. So I need to generate the pdf file based on
their input parms.
-D
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote
| Quote: | Try it again, please ...
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411beb3f$1 (AT) newsgroups (DOT) borland.com...
When I try to open this I get:
Receipt: Failure
The action you attempted did not succeed:
Cannot open file "f:inetpubwwwrootdbf200408121711.pdf". The system
cannot find the file specified
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411bbdf0$1 (AT) newsgroups (DOT) borland.com...
Yes, check this
http://reportes.grupo-ed.com/scripts/project1.dll/xlswrite
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411b7301$1 (AT) newsgroups (DOT) borland.com...
Jesus:
Thanks for responding. I actually think my problem is that the
quick
report
never runs. When I try to create it and execute it is when the 500
type
error happens. I'm not sure if it is because the quick report thinks
it
has
visual components or what. Have you ever created a quick report in
a
web
broker application?
Thanks!
-DAve
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411b1798$1 (AT) newsgroups (DOT) borland.com...
Here is an example :
procedure TWebModule1.WebModule1ActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled:
Boolean);
var
FileStream : TFileStream;
begin
// after you export your report to pdf put this
// value of FileName is c:inetpubwwwroottemp20041212.pdf
FileStream := nil;
try
Response.Title := 'Download File ...';
Response.CustomHeaders.Add('Content-Disposition=filename=' +
ExtractFileName(FileName) );
Response.ContentType := 'application/pdf';
FileStream := TFileStream.Create( FileName , fmOpenRead +
fmShareDenyNone);
Response.ContentStream := FileStream;
Response.SendResponse;
except
on E: Exception do
begin
FreeAndNil(FileStream);
ErrorDialog(E.Message);
end;
end;
Regards
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411ae83a (AT) newsgroups (DOT) borland.com...
Has anyone out there ever used quickreports to create pdffiles
in
a
web
broker app and then sent the pdf file back to the requestor. I
can
get
this
to work using the web debugger but not the dll under IIS. (The
browser
gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
|
| Back to top |
|
 |
Dave Krajcar Guest
|
Posted: Fri Aug 13, 2004 11:53 pm Post subject: Re: Reports under web broker |
|
|
Jesus:
I'm not sure what you mean by see your code in .attachments. Where is that?
or could you just email it to me directly as an attachment and not go
through the newsgroup?
Sorry to be so much trouble, but I do appreciate the assist.
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote
| Quote: | See my code in .attachments
Regards ...
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411c1bbe$1 (AT) newsgroups (DOT) borland.com...
One additional thought...I create the report based on input from the
incoming message from the browser. So I never know what thy will ask
for
by
way of accounts to include. So I need to generate the pdf file based on
their input parms.
-D
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411c0349$1 (AT) newsgroups (DOT) borland.com...
Try it again, please ...
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411beb3f$1 (AT) newsgroups (DOT) borland.com...
When I try to open this I get:
Receipt: Failure
The action you attempted did not succeed:
Cannot open file "f:inetpubwwwrootdbf200408121711.pdf". The
system
cannot find the file specified
-Dave
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411bbdf0$1 (AT) newsgroups (DOT) borland.com...
Yes, check this
http://reportes.grupo-ed.com/scripts/project1.dll/xlswrite
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411b7301$1 (AT) newsgroups (DOT) borland.com...
Jesus:
Thanks for responding. I actually think my problem is that the
quick
report
never runs. When I try to create it and execute it is when the
500
type
error happens. I'm not sure if it is because the quick report
thinks
it
has
visual components or what. Have you ever created a quick report
in
a
web
broker application?
Thanks!
-DAve
"Jesus Cardenas" <jesusc (AT) tfs (DOT) grupo-ed.com> wrote in message
news:411b1798$1 (AT) newsgroups (DOT) borland.com...
Here is an example :
procedure TWebModule1.WebModule1ActionAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled:
Boolean);
var
FileStream : TFileStream;
begin
// after you export your report to pdf put this
// value of FileName is
c:inetpubwwwroottemp20041212.pdf
FileStream := nil;
try
Response.Title := 'Download File ...';
Response.CustomHeaders.Add('Content-Disposition=filename='
+
ExtractFileName(FileName) );
Response.ContentType := 'application/pdf';
FileStream := TFileStream.Create( FileName , fmOpenRead
+
fmShareDenyNone);
Response.ContentStream := FileStream;
Response.SendResponse;
except
on E: Exception do
begin
FreeAndNil(FileStream);
ErrorDialog(E.Message);
end;
end;
Regards
"Dave Krajcar" <raider (AT) ispwest (DOT) com> wrote in message
news:411ae83a (AT) newsgroups (DOT) borland.com...
Has anyone out there ever used quickreports to create
pdffiles
in
a
web
broker app and then sent the pdf file back to the requestor.
I
can
get
this
to work using the web debugger but not the dll under IIS.
(The
browser
gets
a 500 type error message).
Anyone ever get this to work?
Thanks for any assistance!
-Dave
|
|
|
| Back to top |
|
 |
|