1、操作系统：Windows 2000 Server
　　2、数 据 库：Oracle 8i R2 (8.1.7) for NT 企业版
　　3、安装路径：C:\ORACLE

　　实现方法：

　　Create or replace Function iphide(data varchar2) return varchar2 is

　　tmp varchar2(20);

　　tmp1 varchar2(20);

　　begin

　　tmp:=data;

　　tmp1:=substrb(tmp,1,instrb(tmp,''.'',-1))||''*'';

　　return tmp1;

　　End iphide;

　　/

　　SQL> select iphide(''192.125.125.166'') from dual;

　　IPHIDE(''192.125.125.166'')

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

　　192.125.125.*

　　SQL> select iphide(''192.1.1.1'') from dual;

　　IPHIDE(''192.1.1.1'')

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

　　192.1.1.*

　　SQL> variable tmp varchar2(20)

　　SQL> call iphide(''192.1.1.1'') into :tmp;

　　调用完成。

　　SQL> print tmp;

　　TMP

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

　　192.1.1.*

　　SQL>