参考加密存储过程如何加密Oracle中的存储过程,从而在schema下看不到其源码?  
软件环境: 
1、操作系统:Windows 2000 Server
2、数 据 库:Oracle 8i R2 (8.1.7) for NT 企业版
3、安装路径:C:\ORACLE实现方法: 
1、D:\>set NLS_LANG=AMERICAN_AMERICA.USACII7或D:\>set NLS_LANG=AMERICAN_AMERICA.WE8ISO8859P1 D:\>set直接打set命令可以查看环境变量 2、在D:\下创建a.sql文件,内容如下:create or replace procedure test1(i in number) asbegindbms_output.put_line('输入参数是'||to_char(i));end; 3、D:\>wrap iname=a.sql PL/SQL Wrapper: Release 8.1.7.0.0 - Production on Tue Nov 27 22:26:48 2001 Copyright (c) Oracle Corporation 1993, 2000.  All Rights Reserved. Processing a.sql to a.plb 4、打开a.plb,现在它的内容如下:create or replace procedure test1 wrapped 0abcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcdabcd378106000140 82 :e:1TEST1:1I:1NUMBER:1DBMS_OUTPUT:1PUT_LINE:1输入参数是:1||:1TO_CHAR:0 001f20 1d 9a 8f a0 b0 3d b455 6a :2 a0 6b 6e 7e :2 a0 a5b b4 2e a5 57 b7 a4 b111 68 4f 17 b5 1f20 3 4 1d 19 18 25 152a 2e 32 36 3a 3d 42 4549 4d 4e 50 51 56 57 5c5e 62 64 70 74 76 7f 1f20 1 b 11 16 :2 11 10 :3 1:2 d 16 22 24 2c :2 24 :2 16 :a 1 1f20 :9 1 :d 3 :2 2 :3 1 4 :2 1 814:4 0 1 :a 0 1b1 :4 0 5 :2 0:2 3 :3 0 2 :7 05 4 :3 0 7:2 0 1b 2 8:2 0 4 :3 0 5:3 0 a b 06 :4 0 7 :2 08 :3 0 2 :3 07 f 11 9e 13 :3 0 :2 c15 :2 0 17 101a :3 0 1a 01a 19 17 18:6 0 1b :2 0 28 1a 1d :2 01 1b 1e :8 0 134:3 0 1 3 16 1 10 2d 12 1 141 16 2 161c 140 1d0114120 0 0 0 0 0 0 00 0 0 0 0 0 0 00 0 0 0 2 0 13 1 00 / 5、运行a.plbSQL> @d:\a.plb 过程已创建。 6、运行存储过程SQL> set serveroutput onSQL> execute test1(1);输入参数是1 PL/SQL 过程已成功完成。 7、查看存储过程的代码SQL> select name,text from all_source where type='PROCEDURE' and name='TEST1'; 结果:看不到其原码