如何创建隐藏IP地址的最后一项的函数

　　软件环境：
　　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>