Technorati 标签: oracle

oracle利用使用utl_file包
create or replace procedure loadfiledata(p_path varchar2,p_filename varchar2) is
v_filehandle utl_file.file_type; --定义一个文件句柄
v_text varchar2(100); --存放文本
v_name test.name%type;
v_id test.autoid%type;
v_firstlocation number;
v_secondlocation number;
v_totalinserted number;
begin
if (p_path is null or p_filename is null) then
goto to_end;
end if;
v_totalinserted:=0;
/*open specified file*/
v_filehandle:=utl_file.fopen(p_path,p_filename,'r');
loop
begin
utl_file.get_line(v_filehandle,v_text);
exception
when no_data_found then
exit;
end ;
v_firstlocation:=instr(v_text,',',1,1);
v_id:=substr(v_text,1,v_firstlocation-1);
v_name:=substr(v_text,v_firstlocation+1);
/*插入数据库操作*/
insert into test
values (v_id,v_name);
commit;
end loop;
<<to_end>;>;
null;
end loadfiledata;
================我创建表=====
3. 测试环境
首先要创建一个目标表,它用来存储文件中的数据:
CREATE TABLE TEST (
  autoid varchar2(10);
  name  varchar2(20));
==========================
declare
v_path varchar2(200);
v_filename varchar2(200);
begin
v_path:='F:\ ';
v_filename:='地址信息.txt';
loadfiledata(v_path,v_filename);
end;
/
/* 由于Oracle数据库对包创建的目录有一个安全管理的问题,所以并不是所有的文件目录能够被UTL_FILE包所访问,
   要更新这种目录设置,就得到init.ora里将UTL_FILE_DIR域设置为*,这样UTL_FILE包就可以对所有的目录文件进行访问了,UTL_FILE_DIR我设置有正确*/
=====出现错误呀提示!======
ORA-06510: PL/SQL: 无法处理的用户自定义异常事件
ORA-06512: 在"SYS.UTL_FILE", line 98
ORA-06512: 在"SYS.UTL_FILE", line 157
ORA-06512: 在"SYSTEM.LOADFILEDATA2", line 15
ORA-06512: 在line 1
==================
创建一个目标表,它用来存储文件中的数据,求救呀!不行呀!大家帮帮忙呀!若是下面的例子,把数据写到文本文件中,可以呀!
===================
declare
file_handle utl_file.file_type;
begin
    file_handle:=utl_file.fopen('c:\temp','sss.txt','A');
    utl_file.put_line(file_handle,'写入的信息');
    utl_file.fclose(file_handle);
END;
========
在init.ora中加入UTL_FILE_DIR = C:\TEMP
重起后就行了