scripting engine error

  • I tries to add a script to the first step in a package that would check to see if a file exists and then continue or error on result.

    Function Main()

    Dim fso 'File system object

    Set fso = CreateObject("Scripting.FileSystemObject")

    IF (fso.FileExists("L:\VRU\XFEROUT\accttabl.txt")) THEN

    Main = DTSStepScriptResult_ExecuteTask

    ELSE

    Main = DTSStepScriptResult_DontExecuteTask

    END IF

    End Function

    but I receive the error: ActiveX Scripting was not able to initialize the script engine. Does anyone know what this means or how to fix it?Thanks in advance.

  • This was removed by the editor as SPAM

Viewing 2 posts - 1 through 1 (of 1 total)

You must be logged in to reply to this topic. Login to reply