|
|
Re: Send file to client [message #606994 is a reply to message #606903] |
Fri, 31 January 2014 15:27 |
|
Lalilulelo
Messages: 3 Registered: January 2014
|
Junior Member |
|
|
I found it!
PROCEDURE download (file IN VARCHAR2) AS
l_blob_content documents.blob_content%TYPE;
l_mime_type documents.mime_type%TYPE;
BEGIN
SELECT blob_content,
mime_type
INTO l_blob_content,
l_mime_type
FROM documents
WHERE name = file;
OWA_UTIL.mime_header(l_mime_type, FALSE);
HTP.p('Content-Length: ' || DBMS_LOB.getlength(l_blob_content));
OWA_UTIL.http_header_close;
WPG_DOCLOAD.download_file(l_blob_content);
EXCEPTION
WHEN no_data_found THEN
HTP.p('<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">');
HTP.htmlopen;
HTP.headopen;
HTP.title('404 Not Found');
HTP.headclose;
HTP.bodyopen;
HTP.header(1, 'Not Found');
HTP.print('<p>The requested URL /'||file||' was not found on this server.</p>');
HTP.bodyclose;
HTP.htmlclose;
|
|
|