求用存储过程实现文件导入的例子！！

junion1980

各位大侠，是否有用stored procedure写的导入.csv文件的例子，需要可以在application中输入相关的parameters.
有资源的大侠，麻烦共享一下吧！
谢谢啦！

appleteam

插入一个文件到DB中
conn system/system
grant create any directory to test;
conn test/test
create table demo (id int primary key,theclob clob);
create or replace directory my_file as ‘d:’;
create or replace procedure load_a_file(p_id in number,
p_filename in varchar2) as
l_clob clob;
l_bfile bfile;
begin
insert into demo
values
(p_id, empty_clob())
returning theClob into l_clob;
l_bfile := bfilename('MY_FILES', p_filename);
dbms_lob.fileopen(l_bfile);
dbms_lob.loadfromfile(l_clob, l_bfile, dbms_lob.getlength(l_bfile));
dbms_lob.fileclose(l_bfile);
end;
exec load_a_file( 1, 'index.html' );

junion1980

这是插入一个文件的方法，怎么样读出一个数据文件（.csv文件，以‘,’分隔）的每一列的值，并将其插入呢？
谢谢！

bhbb2000

给你个简单的例子吧，我以前写的导入成本用的，比较简单，你可以参考一下

需要注意的是要设定好你要使用的数据库目录，可以通过 Select * From All_Directories 来查看当前数据库的所有文件目录以及所有者。

junion1980

感谢大虾！！！！！对我非常有用！

[ 本帖最后由 junion1980 于 2007-3-1 16:44 编辑 ]

appleteam

如果是数据导入有很多方法，比如，用PL/SQL DEVELOPER可以直接从EXCEL中COPY然后PASTE就可以了，什么程序都不用写

junion1980

因为还有程序逻辑判断，所以用存储过程 ：）

kissbye

感谢各位的东东，我收啊

pathwide

好 :) :)

toad

CSV的解析导入可以用sqlload，需要例子吗？

jeep123

希望提供例子，这个问题我也碰到过。

bhbb2000

原帖由 jeep123 于 2007-4-2 09:40 发表
希望提供例子，这个问题我也碰到过。

恩？上面给出例子了

liunan2000

PROCEDURE read_costmain_file(file_name varchar2,.......)
  IS
   vSFile       utl_file.file_type;
   vNewLine   VARCHAR2(2000);
    l_separate_sign varchar2(10); 分割符
   
  BEGIN
          l_separate_sign := 'chr(9)';
     
        vSFile:=utl_file.fopen('/usr/tmp',file_name,'r');
        IF   utl_file.is_open(vSFile)   THEN
         LOOP
           BEGIN
                 utl_file.get_line(vSFile, vNewLine);
                  
                 IF   vNewLine   IS   NULL   THEN
                       EXIT;
                 END   IF;
                  
                 insert into ........              
                        
                     
               EXCEPTION
                  WHEN   NO_DATA_FOUND   THEN
                  EXIT;
               END;
           END   LOOP;
      
           COMMIT;
        END  IF;
        utl_file.fclose(vSFile);
  EXCEPTION
      WHEN   utl_file.invalid_mode   THEN
          RAISE_APPLICATION_ERROR   (-20051,   'Invalid   Mode   Parameter');
      WHEN   utl_file.invalid_path   THEN
          RAISE_APPLICATION_ERROR   (-20052,   'Invalid   File   Location');
      WHEN   utl_file.invalid_filehandle   THEN
          RAISE_APPLICATION_ERROR   (-20053,   'Invalid   Filehandle');
      WHEN   utl_file.invalid_operation   THEN
          RAISE_APPLICATION_ERROR   (-20054,   'Invalid   Operation');
      WHEN   utl_file.read_error   THEN
          RAISE_APPLICATION_ERROR   (-20055,   'Read   Error');
      WHEN   utl_file.internal_error   THEN
          RAISE_APPLICATION_ERROR   (-20057,   'Internal   Error');
      WHEN   utl_file.invalid_maxlinesize   THEN
          RAISE_APPLICATION_ERROR(-20060,'Line   Size   Exceeds   32K');
     WHEN   others   THEN
          RAISE_APPLICATION_ERROR(-20002, sqlerrm); --(-20099,   'Unknown   UTL_FILE   Error');
  END   ;

wujihuio

学习中，谢谢

stevenyanzhi

我现在用的方法是用java存储过程实现的,通过java的excel数据包读取已经上传到数据库表或者是文件系统的EXCEL文件,解析后转存到临时表中.

xp_blue

很有帮助，非常感谢!