当前位置: 首页 > 图文教程 > 数据库 > Oracle > Oracle中如何直接运行OS命令(下)

Oracle
常见的一些Oracle初学者的问题
ORACLE认证系统概述
数据库考试简介：Oracle认证
Oracle认证基础知识介绍
ADO连接Oracle Access示例及记录集处理源码
SQL Server和MySQL的安全性分析
用Oracle和SQL Server数据库组合利弊分析
Oracle 11g分区功能新革命
Flashback Query 恢复误删除的数据
基于Oracle高性能动态SQL程序开发
怎样在Oracle 9i中正确的转换时区
Oracle 10g导出的数据库能否导入Oracle 9i？
增加Distinct后查询效率反而提高
Oracle限制返回结果集的大小
Java语言数据库操作的基本流程
美国甲骨文(ORACLE)公司入驻渝中区大都会商厦
RHEL AS4上安装oracle 10R2 的方法
DB中如何查询Table占用空间的大小
编写高质量高性能的MySQL语法
Oracle数据库自动备份的具体实现步骤

No. « 12 13 14 15 »

技术文章搜索

关键字

Oracle中如何直接运行OS命令(下)

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-10-31   浏览: 104 ::
收藏到网摘: n/a

　　EXEC SQL WHENEVER SQLERROR CONTINUE；
　　sqlglm（msg_buffer， &buffer_size， &msg_length）；
　　printf（"Daemon error while connecting:\n"）；
　　printf（"%.*s\n"， msg_length， msg_buffer）；
　　printf（"Daemon quitting.\n"）；
　　exit（1）；
　　} 

　　void 
　　sql_error（） 
　　{ 
　　char msg_buffer[512]；
　　int msg_length；
　　int buffer_size = 512；

　　EXEC SQL WHENEVER SQLERROR CONTINUE；
　　sqlglm（msg_buffer， &buffer_size， &msg_length）；
　　printf（"Daemon error while executing:\n"）；
　　printf（"%.*s\n"， msg_length， msg_buffer）；
　　printf（"Daemon continuing.\n"）；
　　} 
　　main（） 
　　{ 
　　EXEC SQL WHENEVER SQLERROR DO connect_error（）；
　　EXEC SQL CONNECT :uid；
　　printf（"Daemon connected.\n"）；

　　EXEC SQL WHENEVER SQLERROR DO sql_error（）；
　　printf（"Daemon waiting...\n"）；
　　while （1） { 
　　EXEC SQL EXECUTE 
　　BEGIN 
　　/*接收deamon发来的字符*/ 
　　:status := DBMS_PIPE.RECEIVE_MESSAGE（'daemon'）；
　　IF :status = 0 THEN 
　　/*取出字符*/ 
　　DBMS_PIPE.UNPACK_MESSAGE（:command）；
　　END IF；
　　END；
　　END-EXEC；
　　IF （status == 0） 
　　{ 
　　command.arr[command.len] = '\0'；
　　/*如果是stop，该进程就退出*/ 
　　IF （!strcmp（（char *） command.arr， "STOP"）） 
　　{ 
　　printf（"Daemon exiting.\n"）；
　　break；
　　} 

　　ELSE IF （!strcmp（（char *） command.arr， "SYSTEM"）） 
　　{ 
　　EXEC SQL EXECUTE 
　　BEGIN 
　　DBMS_PIPE.UNPACK_MESSAGE（:return_name）；
　　DBMS_PIPE.UNPACK_MESSAGE（:value）；
　　END；
　　END-EXEC；
　　value.arr[value.len] = '\0'；
　　printf（"Will execute system command '%s'\n"， value.arr）；
　　/*运行os命令*/ 
　　status = system（value.arr）；
　　EXEC SQL EXECUTE 
　　BEGIN 
　　DBMS_PIPE.PACK_MESSAGE（'done'）；
　　DBMS_PIPE.PACK_MESSAGE（:status）；
　　:status := DBMS_PIPE.SEND_MESSAGE（:return_name）；
　　END；
　　END-EXEC；

　　IF （status） 
　　{ 
　　printf 
　　（"Daemon error while responding to system command."）；
　　printf（" status: %d\n"， status）；
　　} 
　　} 
　　ELSE 
　　{ 
　　printf 
　　（"Daemon error: invalid command '%s' received.\n"，  command.arr）；
　　} 
　　} 
　　ELSE 
　　{ 
　　printf（"Daemon error while waiting for signal."）；
　　printf（" status = %d\n"， status）；
　　} 
　　} 
　　EXEC SQL COMMIT WORK RELEASE；
　　exit（0）；
　　} 

　　以上代码起名为daemon.pc，用proc预编译: 

　　proc iname=daemon.pc userid=用户名/密码@服务名 sqlcheck=semantics 

　　得到daemon.c，在用c进行编译，注意在NT上要把orasql8.lib加上，否则编译通过，连接没法通过。 

　　3、在服务器上运行daemon.exe 

　　4、在sqlplus运行测试语句: 

　　SQL> variable rv number 
　　SQL> execute :rv := DAEMON.EXECUTE_SYSTEM（'ls -la'）；
　　PL/SQL 过程已成功完成。 
　　SQL> execute :rv := DAEMON.EXECUTE_SYSTEM（'dir'）；
　　PL/SQL 过程已成功完成。 
　　SQL> 

　　DBMS_PIPE的用法见oracle的文档。