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

Oracle
Oracle Jdbc的一些限制(10.2.0.1)
使用Instr()与decode()进行多条件组合查询
修改ORACLE的DATAFILE文件名
Oracle中向视图中插入数据
oracle中实现自动增长列
oracle同时向多表插入数据
建立与Oracle服务器连接的两种连接模式
oracle中的connect by 在sql server中实现
Oracle巧取指定记录与巧用外关联查询
如何杀死oracle死锁进程
Oracle数据直接导出到文本文件的方法
在ORACLE中实现SELECT TOP N的方法
教你用Oracle解析函数快速检查序列间隙
教你在Oracle中启动脚本跟踪存储过程
Oracle Peeking绑定变量的控制
在Oracle实例间移动SQL调整工具集
使用DBMS_METADATA包获得对象DDL
使用Oracle 10gMERGE语句更新数据行
在不同字符集的数据库之间导入数据的方法
介绍Oracle数据库去除别名的方法

No. « 26 27 28 29 »

技术文章搜索

关键字

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

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-10-31   浏览: 92 ::
收藏到网摘: 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的文档。