我目前正在尝试将一系列用于将数据从远程 Oracle DB 源(我们的供应商)加载到我们(现在)Oracle 11g R2 实例中的非常麻烦的 VBScript 迁移。基于此的脚本在以前的 Oracle 10g 实例(完全不同的机器)上运行良好,并且 DDL 本身在我在 CN 字符串中使用的同一用户下手动运行时运行良好。
主机操作系统: Windows 2008 R2 64 位企业版
主机数据库: Oracle 11g R2 64 位
脚本:
Option explicit
Dim CN
Dim fso, objFile
Const strOutputFile = "\\<server>\<path>\<to>\LOGS\LOAD_DATA.LOG"
Set CN = CreateObject("ADODB.CONNECTION")
CN.Open "Driver={Oracle in OraDb11g_home1};Dbq=<tnsname>;Uid=<uid>;Pwd=<pwd>;"
Set fso = CreateObject("SCRIPTING.FileSystemObject")
Set objFile = fso.OpenTextFile(strOutputFile, 2, True)
objFile.WriteBlankLines(2)
objFile.WriteLine "*** Start Load_Data.vbs Log - " &Now() &" ***"
Call SBB_BASE()
objFile.WriteLine "*** End Load_Data.vbs Log - " &Now() &" ***"
objFile.WriteBlankLines(2)
objFile.Close
Set objFile = Nothing
Set fso = Nothing
CN.Close
Sub SBB_BASE()
On Error Resume Next
CN.Execute "TRUNCATE TABLE DATA.SBB_BASE"
CN.Execute "DROP TABLE DATA.SBB_BASE"
CN.Execute "CREATE TABLE DATA.SBB_BASE STORAGE (INITIAL 20000 NEXT 1024 PCTINCREASE 0 MINEXTENTS 1 MAXEXTENTS 121) NOLOGGING TABLESPACE DATA AS SELECT * FROM SBB_BASE@<vendor>"
CN.Execute "CREATE INDEX DATA.IDX_SBB_SUB_ACCT_NO ON DATA.SBB_BASE(SUB_ACCT_NO_SBB) TABLESPACE DATA_IDX NOLOGGING"
CN.Execute "CREATE INDEX DATA.IDX_SBB_HSE_KEY ON DATA.SBB_BASE(HSE_KEY_SBB) TABLESPACE DATA_IDX NOLOGGING"
CN.Execute "CREATE INDEX DATA.IDX_SBB_EXT_STAT ON DATA.SBB_BASE(EXT_STAT_SBB) TABLESPACE DATA_IDX NOLOGGING"
CN.Execute "CREATE INDEX DATA.IDX_SBB_CUST_ACCT_NO ON DATA.SBB_BASE(CUST_ACCT_NO_SBB) TABLESPACE DATA_IDX NOLOGGING"
End Sub
当我从命令行运行 .vbs 时,它首先提示有关不受信任的脚本的警告(尝试从 Windows 任务计划程序运行此无人值守时可能会导致问题,但一次出现一个问题),然后它似乎执行没有任何明显的错误 - 但只有前两个CN.Execute
语句执行 -TRUNCATE TABLE
和DROP TABLE
DDL 命令 - 似乎没有其他处理。我知道是这种情况,因为表和所有索引都从架构中消失了。
但是,当我从每一CN.Execute
行获取 DDL 并将它们作为代码块手动执行时,它们工作得很好。我在 Oracle 服务器上找不到任何可以指示问题所在的错误日志。
有什么想法吗?
编辑:喘口气后,我想出了如何在 DDL 语句中添加一些额外的日志记录,以尝试弄清楚发生了什么 - 事实证明,问题与DBLINK
CT-AS DDL 中使用的有关,因为我们的供应商非常友好地设置了SESSIONS_PER_USER
上限。
但是,对于具有不同用户的同一供应商,我总共有四个不同DBLINKS
的用户可以用于数据加载,我真的很想在脚本中构建一些功能,可以检查这些连接中的任何一个是否会返回一条SESSIONS_PER_USER
消息,以及第一个不用于后续数据加载的。由于这是一个完全独立的问题,我将创建一个不同的问题。