wrap加密包：

SQL> @E:\get_rowid_info.txt;

  7  /

过程已创建。

 

 

E:\get_rowid_info 内容如下：

  create or replace procedure get_rowid_info(l_rowid in rowid)

 as

  begin

   dbms_output.put_line('所在的文件号是:'||dbms_rowid.ROWID_RELATIVE_FNO(l_rowid));

   dbms_output.put_line('所在的行号是:'||dbms_rowid.ROWID_ROW_NUMBER(l_rowid));

 end;

 

 

 SQL> exec get_rowid_info('AAAM4xAAEAAAAAcAAI');

所在的文件号是:4

所在的行号是:8

 

 SQL> select text from user_source where name='GET_ROWID_INFO';

TEXT

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

procedure get_rowid_info(l_rowid in rowid)

 as

  begin

   dbms_output.put_line('所在的文件号是:'||dbms_rowid.ROWID_RELATIVE_FNO(l_rowid));

   dbms_output.put_line('所在的行号是:'||dbms_rowid.ROWID_ROW_NUMBER(l_rowid));

 end;

已选择6行。

 

 

 Drop procedure get_rowid_info;

 

 运行加密工具：

 

C:\DocumentsandSettings\Administrator>wrap iname=E:\get_rowid_info.plb oname=E:\get_rowid_info.plb

 

注意在使用前设置环境变量：

 

 Set nls_lang=simplified chinese.china.zhs16gbk

 

然后我们就可以删除原来的脚本了。

 

SQL> @E:\get_rowid_info.plb

过程已创建。

SQL> select text from user_source where name='GET_ROWID_INFO';

TEXT

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

procedure get_rowid_info wrapped

a000000

352

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

abcd

7

e1 e7

aJFMIAvYFHbFeP5qe/zcq5E75DMwg5nnm7+fMr2ywFxarmL0lpeWcln0ckcM2bGl9CibKP71

zKXSXqaCIb6Odta+jo5ucVUAc6mgrG23ILg0qhFaZxHjHC/G+DCSvidNT/lCQzw878FKijrE

Hn0mhiv8KipwMnDv0t2Rz8gK0AvjF3X2NBNPJEerLi725smHU6kForWlMJ1pD0mxyo5OcXNx

2IimwSguYg==

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

转载于:http://blog.itpub.net/23102627/viewspace-660040/