|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
由于MySQL数据库已经如此普及,对企业来说它无疑是一个更好的选择。oracle|工具
way1:
经由过程spool输入到文件:
setserveroutputon
spoolc:log.txt
DECLARE
v_textVARCHAR2(1000);
--inumber(3):=0;
CURSORcurIS
SELECTtext
FROMsys.DBA_SOURCE
WHEREOWNER=SCOTT
ANDNAME=TESTCCB;
BEGIN
OPENcur;
LOOP
FETCHcur
INTOv_text;
--DBMS_OUTPUT.PUT_LINE(cityname=||v_name||count=||i);
DBMS_OUTPUT.put_line(v_text);
--i:=i+1;
EXITWHENcur%NOTFOUND;
ENDLOOP;
CLOSEcur;
END;
/
spooloff
way2:
使用utl_file包间接写出到文件
请求oracle用户对os文件体系有操纵权限
DECLARE
v_textVARCHAR2(1000);
v_dirVARCHAR2(256);
v_ownerVARCHAR2(128);
v_objVARCHAR2(128);
l_outpututl_file.file_type;
CURSORcurIS
SELECTtext
FROMdba_source
WHEREOWNER=v_owner
ANDNAME=v_obj;
BEGIN
v_owner:=SCOTT;
v_obj:=EMP;
SELECTt.directory_pathINTOv_dirFROMall_directoriest;
l_output:=utl_file.fopen(v_dir,tab.txt,w);
utl_file.new_line(l_output);
utl_file.put_line(l_output,
--outputowner:||v_owner||object:||
v_obj);
OPENcur;
LOOP
FETCHcur
INTOv_text;
EXITWHENcur%NOTFOUND;
utl_file.new_line(l_output);
utl_file.put_line(l_output,v_text);
ENDLOOP;
utl_file.new_line(l_output);
utl_file.put_line(l_output,--outputfinished!);
utl_file.fclose(l_output);
CLOSEcur;
END;
/
怀疑这些功能在MySQL5.0中的成熟性。充其量它们在MySQL中被支持的时间也就一年左右,而在MySQL学习教程其他关系型数据库中则已经存在了近10年的时间。 |
|