Call business objects

[jtodd]

Hi , I am calling bo from an access database with the following code
Private Sub Label15_Click()
Dim BOApp As busobj.Application
Dim Doc As busobj.Document
Dim Rpt As busobj.Report
Set BOApp = New busobj.Application
BOApp.Visible = False
Call BOApp.LoginAs("logon", "password", True)
Set Doc = BOApp.Documents.Open("S:Jim Todd\Intransit\Outstanding TN's.rep")
'Doc.Variables("date").Value = Format(Date - 92, "dd/mm/yyyy")
BOApp.Interactive = False
Doc.Refresh
'BOApp.Interactive = True
For Each Rpt In Doc.Reports
Call Rpt.ExportAsText(Doc.Path & "\" & Rpt.name)
Next Rpt
BOApp.Quit
Set BOApp = Nothing
On Error GoTo 0
DoCmd.RunMacro "Macro1"
Exit Sub
err:
MsgBox "917 update failed"

End Sub

Which works fine but even when I enter valid username and password I still get the bo logon screen (with the data filled in )but I still have to click ok,
I need to automate this procedure so need BO to open without any intervension (do not have to click ok) so bo opens runs the report saves it and closes automatically .

 

[Micron]

Not sure anyone will be able to solve given that we can't see the code after this call: BOApp.LoginAs("logon", "password", True). Appears you're passing the values to something that requires a button click in the BO app. I'm guessing you can't modify the BO in anyway. If not, maybe you can use SendKeys to the BO to cause the button click. I've never used SendKeys in Automation.

If the BO's opening routine will allow you to code for a switch, you can pass a custom switch from Access in your path. For example, in one of my projects I had to tell Access that it's a PC opening the database and not a person. The command line ended with /Otto Mayshun (bad joke, right?). This passes the switch to Access to the Command property. Wondering what you BO is and whether or not you can bypass the login form in the same manner.

 

[jtodd]

Thanks for your help , I will get on to our BO team and see if they can sort it for me.

Not sure anyone will be able to solve given that we can't see the code after this call: BOApp.LoginAs("logon", "password", True). Appears you're passing the values to something that requires a button click in the BO app. I'm guessing you can't modify the BO in anyway. If not, maybe you can use SendKeys to the BO to cause the button click. I've never used SendKeys in Automation.

If the BO's opening routine will allow you to code for a switch, you can pass a custom switch from Access in your path. For example, in one of my projects I had to tell Access that it's a PC opening the database and not a person. The command line ended with /Otto Mayshun (bad joke, right?). This passes the switch to Access to the Command property. Wondering what you BO is and whether or not you can bypass the login form in the same manner.