Oracle使用PL/SQL操作COM对象

正在看的oracle教程是:oracle使用pl/sql操作com对象。pl/sql是由oracle公司对标准sql进行扩展，专用于oracle数据库中程序设计的专用语言，属第三代过程式程序设计语言。从oracle8开始提供了直接从pl/sql中调用外部c语言过程，允许开发人员用pl/sql进行使用c语言编制的程序模块。从oracle8i开始，又引入了java程序。

　　在本文中主要介绍外部例程的基本原理以及使用条件，介绍如何通过引用外部例程来操作windows中的com对象，并做了一个操作excel对象的示例。 

　　本文的运行环境全部建立在oracle9i和windows2000。其中oracle的安装目录（oracle_home）为d:\oracle\ora92，sid为oradb，主机名为chanet。 

　　必要性 

　　扩展后的pl/sql语言已经集成了标准sql，在效率和安全上非常适合设计oracle数据库程序，但对于应用的某些功能，其它的程序设计语言比pl/sql更适合，如：使用操作系统资源，c语言在计算和引用系统对象及使用设备上优于pl/sql，而java语言在网络上的应用优于pl/sql。

　　如果在应用上要用到不适合用pl/sql语言的话，这时就要使用其它语言进行编制，然后由pl/sql作为外部例程进行调用。 

　　在oracle8之前的版本，pl/sql和其它语言的唯一通信是借助于dbms_pipe和dbms_alert包来实现，在使用之前必需建立一个oci接口或预编译器编制的监护程序，使用比较复杂。外部例程的出现，只需在pl/sql中建立一个函数映射到外部例程对应的函数，就像普通的pl/sql函数使用一样，简化了使用过程。 

　　基本原理 

　　当引用外部c语言例程时，oracle监听器将启动extproc进程，该进程将会动态地载入共享库（在windows下称为动态链接库，即是dll文件），进程起了一个缓冲的作用，当pl/sql过程调用外部函数时，进程把命令发送到共享库，之后把结果返回给pl/sql过程。 

　　进程被调用后随着共享库的使用会话（session）而存在，如果调用完毕或者关闭数据库用户会话，extproc进程会自动关闭。 

　　如下图1-1为调用外部例程的描述。 


　　使用配置 

　　在调用外部例程之前，必需进行如下设置： 

　　·配置监听器。 

　　·配置net组件服务。 

　　配置监听器，打开d:\oracle\ora92\network\admin\listener.ora 文件，修改文件参数。 


　　其中有两部份参数对于使用外部例程是很重要的。 

　　·(address_list = (address = (protocol = ipc)(key = extproc1)) 

　　设置基于ipc协议的外部例程 

　　·(sid_desc =(sid_name = plsextproc) (oracle_home = d:\oracle\ora92) (program = extproc) ) 

　　记录数据库的相关属性，sid_name在默认的情况下是plsextproc。 

　　配置net组件服务，打开d:\oracle\ora92\network\admin\tnsnames.ora文件，把如下内容保存在该文件里。 


　　重要参数说明： 

　　　·(address = (protocol = ipc)(key = extproc1)) 

　　　·(connect_data = (sid = plsextproc) (presentation = ro) 

　　两设置必需与listener.ora里的一致。

　　重启监听器，并测试服务是否可用。 

　　停止监听器：lsnrctl stop 

　　启动监听器：lsnrctl start 

　　测试服务是否可用： 


　　已使用的参数文件: 


　　已使用 tnsnames 适配器来解析别名 


　　测试extproc进程是否正常： 


　　4、使用com对象说明 

　　com对象设计都会提供了三个基本操作给开发人员使用，分别为：获取属性值，设置属性值（只读属性除外），调用方法。oracle数据库在windows的平台下提供了操作com对象的接口，属于c语言外部例程模式。 

　　工作原理如下图： 


　　在使用该功能之前，需明白如下内容： 

　　1) 创建com对象操作函数。 


　　2)配置监听器。 

　　在listener.ora文件里，添加如下内容，并重启监听器。 


　　3) pl/sql数据类型与对应的com对象类型

　　表1-1数据类型比较 


　　4) 函数说明。 

　　表1-2函数说明