[kingmax54212008, zjcxc, 大虾们] 请教job 调用 DTS 问题 Error = -2147220482 (800403FE)

Question

碰到个跟kingmax54212008以前差不多的问题。请kingmax54212008，各位大虾方便回答一下。错误如下：
DTSRun OnStart:  DTSStep_DTSActiveScriptTask_4
DTSRun OnError:  DTSStep_DTSActiveScriptTask_4, Error = -2147220482 (800403FE)
   Error string:  ActiveX Scripting encountered a Run Time Error during the execution of the script.
   Error source:  Microsoft Data Transformation Services (DTS) Package
   Help file:  sqldts80.hlp
   Help context:  4500Error Detail Records:Error:  -2147220482 (800403FE); Provider Error:  0 (0)
   Error string:  ActiveX Scripting encountered a Run Time Error during the execution of the script.
   Error source:  Microsoft Data Transformation Services (DTS) Package
   Help file:  sqldts80.hlp
   Help context:  4500DTSRun OnFinish:  DTSStep_DTSActiveScriptTask_4程序代码：
Function Main() Dim fso, srcFile, destFile
Dim sDT

sDT = convertDT(DTSGlobalVariables("ProcessDate").Value)

set fso = CreateObject("Scripting.FileSystemObject")

' file 2
' move output file to archive directory
srcFile = DTSGlobalVariables("WorkingDrive").Value &  DTSGlobalVariables("OutputFilePath").Value &"\" & DTSGlobalVariables("OutputFileName3").Value 
destFile = DTSGlobalVariables("WorkingDrive").Value &  DTSGlobalVariables("ArchiveFilePath").Value & "\" & Left(DTSGlobalVariables("OutputFileName3").Value, len(DTSGlobalVariables("OutputFileName3").Value) -4) & "_" & sDT & replace(formatdatetime(DTSGlobalVariables("ProcessDate").Value, 4), ":", "") & ".txt" If fso.fileexists(srcFile) then
fso.copyfile srcFile, destFile
End If Main = DTSTaskExecResult_Success
End Function

Answer 1

DTSGlobalVariables("WorkingDrive").Value   ----------------------????

Answer 2

检查获取DTSRun传入的参数这儿是否正常

Answer 3

DTS job 中Function   Main() 对应DTSStep_DTSActiveScriptTask_4。
Main主要作用就是fso.copyfile   srcFile,   destFile 做备份。
其实job 中也有类似source code,但是就是这个有问题。
会不会是resource 问题？大牛们有好的见解么？

Answer 4

To happyflystone,
检查获取DTSRun传入的参数这儿没有问题。
因为大部分时间这个job 是正常的，1个星期有一两次有问题

Answer 5

排除排参的可以后
' 取得当前DTS包对象
Set oPackage = DTSGlobalVariables.Parent

Answer 6

To   happyflystone, 
应该不是参数问题。
因为参数都是写死的。大部分时间这个job   是正常的。
大虾们，能告诉我
Error:     -2147220482   (800403FE)
是什么错误么？
在MS SQL sqldts80.hlp 找不到。