Datenbank Formularnavigation

[Martin45527]

Hallo Leute,

ich habe eine Datenbank mit später ca. 20 Tabellen. Jetzt suche ich eine Möglichkeit, den zugriff darauf zu steuern, d. h. eine Art Steuer-Formular zu erstellen, von dem aus ich die weiteren Formulare (z. B. zur Erfassung neuer Datensätze) aufrufen kann. Eine Button-Aktion scheint es hierfür nicht zu geben, wie kann ich das realisieren? Gibt es evtl. auch Pull-Down-Menutes für Formulare ?

VG

Martin

[komma4]

Vielleicht hilft Dir das weiter:

Extension: Switchboard
Tutorial/Handbuch dazu


Oder eine Makro-Lösung: Wechseln zum Formular gleichen Namens wie die Schaltfläche

Code: Alles auswählen

Sub openFormWithButtonName( oEvent ) 
 
' ANPASSEN !
sDatenbank = "hsqldb" ' registrierter Datenbankname
 
 
sFormName_Open = oEvent.Source.Model.Label ' Beschriftung der Schaltfläche
 
'
oDBContext = createUnoService( "com.sun.star.sdb.DatabaseContext" )
oDatenbank = oDBContext.getByName( sDatenbank )
oDatenbankDok = oDatenbank.DatabaseDocument
 
oConnection = oEvent.Source.getModel().getParent().ActiveConnection
dim aOpenArgs(1) as new com.sun.star.beans.PropertyValue
aOpenArgs(0).Name = "OpenMode"
aOpenArgs(0).Value = "open"
aOpenArgs(1).Name = "ActiveConnection"
aOpenArgs(1).Value = oConnection
 
oDatenbankDok.FormDocuments.loadComponentFromURL( sFormName_Open, "_blank", 0, aOpenArgs() )
 
 
End Sub

Quelle: Original-Posting

[Martin45527]

Herzlichen Dank für die schnelle Antwort. Das sieht gut aus, ich werde es ausprobieren - mir scheint, ich sollte erst mal mehr mit den Makros machen, bevor ich hier allen auf die Nerven gehe

VG

Martin

p.s.: Was muss ich tun, um den Konfigurationswizward aufzurufen ?

[Martin45527]

Weiss irgendwer, wie man das Konfigurationswindow vom Switchboard benutzen kann, wenn man die Icons nicht sieht ??

Martin