oracle dbms_ddl.wrap,DBMS_DDL加密脚本.

在10G版本, 有一个新的package DBMS_DDL,它提供脚本加密的功能。同时10G也增强了字符窜的处理方式，通常情况在字符窜里有单引号的话，要用两个单引号才能在字符窜里显示一个单引号，１０Ｇ有了新的方法处理这一情形了。下面的示例结合dbms_ddl显示这个功能，感觉跟perl里的q//一样(perl里也可以q[])

下面是测试示例:[@more@]

SQL>declare

2 fun varchar2(200);

3 begin

4 fun:=q'[create or replace function f_test1 return date

5 is

6 begin

7 return sysdate-1;

8 end;

9 ]';

10 dbms_ddl.create_wrapped(fun);

11 end;

12 /

PL/SQL procedure successfully completed.

SQL>select sysdate from dual;

SYSDATE

-------------------

2009-06-26 11:31:23

SQL>select f_test1 from dual;

F_TEST1

-------------------

2009-06-25 11:31:28

SQL>select text from dba_source where name='F_TEST1';

TEXT

--------------------------------------------------------------------------------

function f_test1 wrapped

a000000

1

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

TEXT

--------------------------------------------------------------------------------

abcd

abcd

abcd

abcd

abcd

abcd

abcd

8

3e 71

CH+uT+R04BlXOhuIlBxQVVM0BLwwg8eZgcfLCNL+XlptlqFi0X/D58CyvbKbXrhSdFJDm3SL

wMAy/tKGrJ45gDnW2zKyO75xc3HYvgSmlvEvnw==

DBMS_DDL里有三个子过程，来处理各种情况的加密。

另一个用Oracle提供的工具,wrap命令。用下面的格式:

wrap iname= oname=.

然后在sqlplus跑