Insert Word File in Oracle 8i database

Question

Can any one help me to insert one MS-Word File created thru a VB Application into Oracle Table.

Answer 1

Hi,
u can use pl/sql procedure to insert doc into database
Have a look
store microsoft doc into oracle database by clob
SQL> desc test
Name Null? Type
NO NUMBER
FILE_DATA CLOB
SQL> select * from all_directories;
OWNER DIRECTORY_NAME
DIRECTORY_PATH
SYS DIR_FILE
/oradata4/upd
create or replace procedure doc_insert(file_name varchar2)
as
f_lob bfile;
c_lob clob;
begin
insert into test (no,file_data) values
(1,empty_clob())
return file_data into c_lob;
f_lob := bfilename( 'DIR_FILE', file_name );
dbms_lob.fileopen(f_lob, dbms_lob.file_readonly);
dbms_lob.loadfromfile
( c_lob, f_lob, dbms_lob.getlength(f_lob) );
dbms_lob.fileclose(f_lob);
commit;
end;
Procedure created.
SQL> exec doc_insert('lob_case.doc');
PL/SQL procedure successfully completed.
SQL>
select dbms_lob.getlength(FILE_DATA),file_data from test;
DBMS_LOB.GETLENGTH(FILE_DATA)
FILE_DATA
46592
ÐÏ à¡± á > þÿ V X þÿÿÿ U
================================================
Retrive doc from oracle database
declare
clob_loc CLOB;
buffer VARCHAR2(32767);
buffer_size CONSTANT BINARY_INTEGER := 32767;
amount BINARY_INTEGER;
offset NUMBER(38);
file_handle UTL_FILE.FILE_TYPE;
directory_name CONSTANT VARCHAR2(80) := '/oradata4/upd/all';
new_xml_filename CONSTANT VARCHAR2(80) := 'lob_case.doc';
BEGIN
DBMS_OUTPUT.ENABLE(100000);
-- GET CLOB LOCATOR
SELECT file_data INTO clob_loc
FROM test
WHERE no = 1;
file_handle := UTL_FILE.FOPEN(
location => directory_name,
filename => new_xml_filename,
open_mode => 'w',
max_linesize => buffer_size);
amount := buffer_size;
offset := 1;
-- READ FROM CLOB / WRITE OUT NEW XML TO DISK
WHILE amount >= buffer_size
LOOP
DBMS_LOB.READ(
lob_loc => clob_loc,
amount => amount,
offset => offset,
buffer => buffer);
offset := offset + amount;
UTL_FILE.PUT(
file => file_handle,
buffer => buffer);
UTL_FILE.FFLUSH(file => file_handle);
END LOOP;
UTL_FILE.FCLOSE(file => file_handle);
END;
Thanks
Kuljeet