Hi Frank,
thanks again for your help. For the archives, here's the working code
to open the DSB:
Sub openDSB()
doc = ThisComponent
frame = doc.getCurrentController().getFrame()
urlTransformer = createUnoService("com.sun.star.util.URLTransformer")
Dim url as new com.sun.star.util.URL
url.Complete = ".component:DB/DataSourceBrowser"
urlTransformer.parseStrict(url)
dispatcher =
frame.queryDispatch(url,"_beamer",com.sun.star.frame.FrameSearchFlag.CHILDREN
+ com.sun.star.frame.FrameSearchFlag.CREATE)
dispatcher.dispatch(url, Array() )
End Sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
