目的：將oracle HR用戶下的所有表導(dǎo)出成csv格式

從網(wǎng)上搜到一個腳本顶瞳，好用

CREATE OR REPLACE PROCEDURE SQL_TO_CSV(
    P_QUERY IN VARCHAR2, 
    P_DIR IN VARCHAR2,
    P_FILENAME IN VARCHAR2 
)
IS 
L_OUTPUT UTL_FILE.FILE_TYPE;  
L_THECURSOR INTEGER DEFAULT DBMS_SQL.OPEN_CURSOR;  
L_COLUMNVALUE VARCHAR2(4000); 
    L_STATUS INTEGER; 
    L_COLCNT NUMBER := 0; 
    L_SEPARATOR VARCHAR2(1);  
    L_DESCTBL DBMS_SQL.DESC_TAB;  
    P_MAX_LINESIZE NUMBER := 32000;
BEGIN  --OPEN FILE  
    L_OUTPUT := UTL_FILE.FOPEN(P_DIR, P_FILENAME, 'W', P_MAX_LINESIZE);  --DEFINE DATE FORMAT  
    EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_DATE_FORMAT=''YYYY-MM-DD HH24:MI:SS'''; 
    --OPEN CURSOR  
    DBMS_SQL.PARSE(L_THECURSOR, P_QUERY, DBMS_SQL.NATIVE); 
    DBMS_SQL.DESCRIBE_COLUMNS(L_THECURSOR, L_COLCNT, L_DESCTBL); 
    --DUMP TABLE COLUMN NAME  
    FOR I IN 1 ..L_COLCNT 
    LOOP    
    UTL_FILE.PUT(L_OUTPUT,L_SEPARATOR || '"' || L_DESCTBL(I).COL_NAME || '"'); 
        DBMS_SQL.DEFINE_COLUMN(L_THECURSOR, I, L_COLUMNVALUE, 4000);
        L_SEPARATOR := ','; 
        END LOOP; 
        UTL_FILE.NEW_LINE(L_OUTPUT);
        --EXECUTE THE QUERY STATEMENT 
        L_STATUS := DBMS_SQL.EXECUTE(L_THECURSOR);  
        --DUMP TABLE COLUMN VALUE  
        WHILE (DBMS_SQL.FETCH_ROWS(L_THECURSOR) > 0) LOOP    
            L_SEPARATOR := '';   
            FOR I IN 1 ..L_COLCNT LOOP      
                DBMS_SQL.COLUMN_VALUE(L_THECURSOR, I, L_COLUMNVALUE); 
                UTL_FILE.PUT(L_OUTPUT, 
                                 L_SEPARATOR || '"' || 
                                 TRIM(BOTH ' ' FROM REPLACE(L_COLUMNVALUE, '"', '""')
                                 ) || '"');     
                                 L_SEPARATOR := ',';    
                END LOOP;  
                UTL_FILE.NEW_LINE(L_OUTPUT);  
                END LOOP;  --CLOSE CURSOR 
                DBMS_SQL.CLOSE_CURSOR(L_THECURSOR);  
                --CLOSE FILE  
                UTL_FILE.FCLOSE(L_OUTPUT);
            EXCEPTION 
                WHEN OTHERS THEN    
                    RAISE;
END;
/
------  請關(guān)注最后一個“/”

這個腳本需要在你要導(dǎo)出數(shù)據(jù)的那個用戶下執(zhí)行＞凉谩ｃ碉！比如我的是HR用戶

在sys 用戶下

---創(chuàng)建導(dǎo)出目錄
SQL> create or replace directory OUT_PATH as '/home/oracle/';---后面的目錄自己定

SQL> GRANT READ ON DIRECTORY OUT_PATH to HR; 
SQL> GRANT write ON DIRECTORY OUT_PATH to HR;

在HR用戶下

 SQL> EXEC sql_to_csv('select * from employees','OUT_PATH','employees.csv');

以上命令均在SQLplus下執(zhí)行的焰络，在PL/SQL下執(zhí)行總是報錯戴甩，并不明白什么原因。

也有更簡單的方法

image.png

以上截圖是我在linux版本下oracle sqldevelop下的截圖闪彼，在要導(dǎo)出表上右擊甜孤，選擇導(dǎo)出，相應(yīng)位置的對號劃掉和選上畏腕，就可以一張表導(dǎo)出CSV缴川。