Datenbank-Tabelle im DatenBrowser anzeigen

[Birdy27]

Hallo,

seit dem Umstieg auf OpenOffice 2.1 (von 1.1.3) hänge ich an folgendem Problem:
Mein Code der bisher dafür sorgte, dass eine bestimmte Tabelle im DataSourceBrowser angezeigt wurde, sorgt jetzt nur noch dafür, dass in der Quellen liste jede Quelle doppelt auftaucht (das liegt am initialize), der Tabellen View bleibt leer.

Code: Alles auswählen

    frame = ThisComponent.CurrentController.Frame 
    beamer = frame.findFrame("_beamer",4) ' get DataBrowser frame 
    oDataSourcebrowser = beamer.Controller 
    params(0).Name = "DataSourceName" 
    params(0).Value = "Adressen" 
    params(1).Name = "CommandType" 
    params(1).Value = com.sun.star.sdb.CommandType.TABLE 
    params(2).Name = "Command" 
    params(2).Value = "Firmen.ADRESSEN"  
    oDataSourcebrowser.initialize(params())

Wie kann ich (in Basic) bestimmen welche Tabelle im DataSourceBrowser gezeigt wird?

Grüße
Christoph

[Birdy27]

Problem gelöst.
Diese Angabe muss schon beim öffnen des Browser angegeben werden:

Code: Alles auswählen

    Dim params(2) as new com.sun.star.beans.PropertyValue
    params(0).Name = "DataSourceName"
    params(0).Value = "Adressen"
    params(1).Name = "CommandType"
    params(1).Value = com.sun.star.sdb.CommandType.TABLE
    params(2).Name = "Command"
    params(2).Value = "Firmen.ADRESSEN"  
    Dim url As new com.sun.star.util.URL
    cntrlr = ThisComponent.getCurrentController()
    frame1 = StarDesktop.getCurrentFrame()
    url.Complete = ".component:DB/DataSourceBrowser"
    dispatcher = frame1.queryDispatch(url, "_beamer", 12)
    dispatcher.dispatch(url, params)