utl_file使用实例

通过这个实例可以理解如何利用该包读写文件：
DECLARE
FILE_HANDLE UTL_FILE.FILE_TYPE;
BEGIN
FILE_HANDLE:=UTL_FILE.FOPEN(‘d:orant’,’tmp.txt’,’a’);
UTL_FILE.PUT_LINE(FILE_HANDLE,’HELLO WORLD’);
UTL_FILE.FCLOSE(FILE_HANDLE);
END;
DECLARE
DATA_LINE VARCHAR2(80);
FILE_HANDLE UTL_FILE.FILE_TYPE;
BEGIN
FILE_HANDLE:=UTL_FILE.FOPEN(‘d:orant’,’tmp.txt’,’r’);
UTL_FILE.GET_LINE(FILE_HANDLE,DATA_LINE);
DBMS_OUTPUT.PUT_LINE(DATA_LINE);
UTL_FILE.FCLOSE(FILE_HANDLE);
EXCEPTION
WHEN UTL_FILE.invalid_path THEN
DBMS_OUTPUT.PUT_LINE(‘invalid_path’);
UTL_FILE.FCLOSE(FILE_HANDLE);
WHEN UTL_FILE.invalid_mode THEN
DBMS_OUTPUT.PUT_LINE(‘invalid_mode’);
UTL_FILE.FCLOSE(FILE_HANDLE);
WHEN UTL_FILE.invalid_operation THEN
DBMS_OUTPUT.PUT_LINE(‘invalid_operation’);
UTL_FILE.FCLOSE(FILE_HANDLE);
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE(‘READ PAST EOF’);
UTL_FILE.FCLOSE(FILE_HANDLE);
END;[@more@]

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/18921899/viewspace-1017183/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/18921899/viewspace-1017183/