BusinessObjects Board

Rerun SAP BO JOB using VBS

Hi All,

I wrote the following code to rerun the failed Job in SAP BI but its now working . Kindly help me make it work . Let me know whether i need to include any SDK for VB script .

strComputerName = CreateObject("WScript.Network").ComputerName 

On Error Resume Next 

Set SessionManager = CreateObject("CrystalEnterprise.SessionMgr") 
    Set esession = SessionManager.Logon("USERNAME", "PASSWORD", strComputerName, "secEnterprise") 
    Set oInfoStore = esession.Service("", "InfoStore") 
  set oScheds = oInfoStore.Query("select top 1 * from ci_infoobjects where   si_recurring=1 and SI_NAME='"TESTJOB"'"") 

oSched = oScheds(1) 
oSched.SchedulingInfo.RightNow = True 
oSched.SchedulingInfo.Type = ceScheduleTypeOnce 

while(oSched.SchedulingInfo.Dependencies.size > 0) 
               oSched.SchedulingInfo.Dependencies.remove(0) 
wend 
          
   oInfoStore.schedule(oScheds) 

SessionManager.logoff 

WScript.Quit

satheesh_rvs (BOB member since 2019-05-02)