实例：Oracle导出EXCEL文件

实例：Oracle导出EXCEL文件

FILENAME:='文件名.xls';
   FHND:=TEXT_IO.FOPEN(FILENAME,'W');
   LINE_BUFF:='<TAB>'||'标题名称';
   TEXT_IO.PUT_LINE(FHND,LINE_BUFF);
   LINE_BUFF:='列1<TAB>列2';
   TEXT_IO.PUT_LINE(FHND,LINE_BUFF);
   FOR RD IN TD LOOP
    LINE_BUFF:='值1'||'<TAB>'||'值2';
    TEXT_IO.PUT_LINE(FHND,LINE_BUFF);
    CNT:=CNT+1;
    SYNCHRONIZE;
   END LOOP;
   TEXT_IO.FCLOSE(FHND);
注：<TAB>为按一下键盘上的TAB键。

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

转载于:http://blog.itpub.net/15745906/viewspace-462807/