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)