windows用批处理调用Oracle脚本

SPOOL时间的SQL脚本： 
   

spool time.txt
select sysdate from dual; ----获取系统时间
spool off exit

    文件命名为time.sql，保存在D盘根目录下。 
BAT文件： 
    命名为test.bat sqlplus LIFE/LIFE_PWD@o122g4 @d:time.sql 
执行完成后，产生一个time.txt文件： 

SYSDATE
--------------
24-12月-09

Usage: SPOOL { <file> | OFF | OUT }
where <file> is file_name[.ext] [CRE[ATE]|REP[LACE]|APP[END]]
SQL> exit

那么执行多个sql脚本该怎么处理呢？下面做个实例:我们需要删除多个表，首先判断表是否存在，不存在的话直接create,否则drop table，这里有三个任务（CREATECONTRACTMASTER.SQL/CREATECONTRACTPRODUCT.SQL/CREATEGROUPPRODUCT.SQL）;
一 准备SQL脚本： 
1.CREATECONTRACTMASTER.SQL: 

SPOOL CONTRACTMST.LOG
DECLARE
   M_COUNT NUMBER;
 IF EXISTS(SELECT COUNT(1) INTO M_COUNT FROM ALL_ALL_TABLES WHERE TABLE_NAME = UPPER('T_CONTRACT_MASTER')) THEN
   DROP TABLE T_CONTRACT_MASTER;
 ELSE
   CREATE TABLE T_CONTRACT_MASTER(
   POL_ID NUMBER(10),
   POL_CODE VARCHAR2(20),
   CREATE_USER VARCHAR2(10),
   CREATE_DATE DATE,
   UPDATE_USER VARCHAR2(10),
   UPDATE_TIME DATE
  );
 END IF;
 SPOOL OFF
 EXIT;

2.CREATECONTRACTPRODUCT.SQL: 
 

SPOOL CONTRACTPROD.LOG
  DECLARE
   M_COUNT NUMBER;
 IF EXISTS(SELECT COUNT(1) INTO M_COUNT FROM ALL_ALL_TABLES WHERE TABLE_NAME = UPPER('T_CONTRACT_PRODUCT')) THEN
   DROP TABLE T_CONTRACT_PRODUCT;
 ELSE
   CREATE TABLE T_CONTRACT_PRODUCT(
   PRD_ID NUMBER(10),
   PRD_NAME VARCHAR2(20),
   POL_ID NUMBER(10),
   CREATE_USER VARCHAR2(10),
   CREATE_DATE DATE,
   UPDATE_USER VARCHAR2(10),
   UPDATE_TIME DATE
  );
 END IF;
 SPOOL OFF
 EXIT;

3.CREATEGROUPPRODUCT.SQL: 

SPOOL GROUPPRD.LOG
DECLARE
   M_COUNT NUMBER;
 IF EXISTS(SELECT COUNT(1) INTO M_COUNT FROM ALL_ALL_TABLES WHERE TABLE_NAME = UPPER('T_GROUP_PRODUCT')) THEN
   DROP TABLE T_GROUP_PRODUCT;
 ELSE
   CREATE TABLE T_GROUP_PRODUCT(
   PRD_ID NUMBER(10),
   POL_ID NUMBER(10),
   CREATE_USER VARCHAR2(10),
   CREATE_DATE DATE,
   UPDATE_USER VARCHAR2(10),
   UPDATE_TIME DATE
  );
 END IF;
 SPOOL OFF
 EXIT;

二 编写批处理命令文件(EXECSQL.BAT):批处理命令文件与SQL脚本最好放置在同一目录下，这样，可以设置成相对路径。否则，用绝对路径在执行时可能比较麻烦。 
 

EXECSAL.BAT:
  SQLPLUS LIFE/LIFE_PWD@o122g4;
  @CREATECONTRACTMASTER.SQL
  @CREATECONTRACTPRODUCT.SQL
  @CREATEGROUPPRODUCT.SQL
  EXIT;

  当然，通常会把所有的脚本重新用一个sql脚本组合起来，然后用批处理命令调用这个SQL脚本即可。 
  注意：如果是需要传递值，直接将参数放到SPOOL的脚本中。 
SET TERMOUT OFF ----显示脚本中的命令的执行结果，缺省为on 
SET NEWPAGE 1 
SET SPACE 0 
SET PAGESIZE 0 --输出每页行数，缺省为24,为了避免分页，可设定为0。 
SET ECHO OFF ---显示start启动的脚本中的每个sql命令，缺省为on 
SET FEEDBACK OFF --回显本次sql命令处理的记录条数，缺省为on 

SET VERIFY OFF --设置是否显示替代变量被替代前后的语句 
SET HEADING OFF ---输出域标题，缺省为on 
SET MARKUP HTML OFF  ---html 元素标签开关 打开 
SPOOL OFF 
SET TRIMSPOOL ON ---去除重定向（spool）输出每行的拖尾空格，缺省为off 
SET TRIMOUT ON  ---去除标准输出每行的拖尾空格，缺省为off 

-- spool 到当前目录中 
spool output.tmp 
spool off 
-- 构造查询语句 
@@output.tmp 
set colsep' '　---域输出分隔符 

当然，还有一种方法，就是用VBA产生脚本。以下脚本没有验证过！ 
Dim WshShell, oExec 
Set WshShell = CreateObject("WScript.Shell")'创建脚本对象 
Set oExec = WshShell.Exec("sqlplus -S LIFE/LIFE@O122G4  @D:\a.sql")'-s是不回显，然后跟用户名和密码，之后是sql语句路径 
Set oExec = WshShell.Exec("sqlplus -S scott/tiger @D:\b.sql")