Help ActiveX Script will not execute through the Jobs

  • I am at a dead end and am not sure how to make this work. I have a simple script below:

    '**********************************************************************

    ' Visual Basic ActiveX Script

    '************************************************************************

    Function Main()

    Const HIDDEN_WINDOW = 12

    strComputer = "."

    Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

    Set objStartup = objWMIService.Get("Win32_ProcessStartup")

    Set objConfig = objStartup.SpawnInstance_

    objConfig.ShowWindow = HIDDEN_WINDOW

    Set objProcess = GetObject("winmgmts:root\cimv2:Win32_Process")

    errReturn = objProcess.Create("C:\PROGRA~1\INTERN~1\IEXPLORE.EXE http://replen.tvcinc.com/update_can.aspx", "", objConfig, intProcessID)

    Main = DTSTaskExecResult_Success

    End Function

    I can run this script in the Business Intelligence but when I schedule it to run as a job I get the following error message:

    Retrieving the file name for a component failed with error code 0x1A157A18

    I thought is was a permission problem but I verified the permissions were set correctly on the page. This script was migrated over from a SQL 2000 box so I also created another SSIS package that was native and copied the code to that and it still wouldn't run. Any input would be so helpful.

Viewing post 1 (of 1 total)

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