aus Formular per Button ein weiteres Formular aufrufen

Datenbanklösungen mit AOO/LO

Moderator: Moderatoren

Kaffeetasse
Beiträge: 3
Registriert: Do, 05.03.2009 17:02

aus Formular per Button ein weiteres Formular aufrufen

Beitrag von Kaffeetasse »

Hallo :)

Ich möchte per Button ein weiteres Formular aus einem bestehenden heraus aufrufen. Dies habe ich mit folgendem Makro versucht:
...Schnipp.....

Sub Formular_aufrufen
dim sFormularName as string
dim aFormulare()
dim oDatenbank as object, oVerb as object
dim arg(1) as New com.sun.star.beans.ProbertyValue
sFormularName = "Kundenumsatz"
oContext = CreateUnoService("com.sun.star.sdb.DatabaseContext")
oDatenbank = oContext.getByName(StarDesktop.CurrentComponent.getParent.getLocation())
oVerb = oDatenbank.getConnection("","")
arg(0).Name = "OpenMode"
arg(0).Value = "open"
arg(1).Name = "ActiveConnection"
arg(1).Value = oVerb
StarDesktop.CurrentComponent.getParent.getFromDocuments().loadComponentFromURL(sFormularName, "", 0, Arg())
End Sub

..Schnapp...

Es ist wie einige evtl merken aus dem Buchen "Datenbanken mit OpenOffice.org 3" Seite 380 von Herrn Krumbein :)
Naja, es geht net so einfach... Ich bekomme die Fehlermeldung "Kein Zugriff auf Object.Ungültige Objectreferenz" und die Zeile wird markiert: "dim arg(1) as New com.sun.star.beans.ProbertyValue"

Bestimmt habe ich etwas übersehen beim Einrichten meiner Datenbank und freue mich über jede Hilfe.

Viele Grüße
Kaffeetasse
eBayer
******
Beiträge: 556
Registriert: Do, 04.12.2008 14:33
Wohnort: Augsburg

Re: aus Formular per Button ein weiteres Formular aufrufen

Beitrag von eBayer »

Hallo Kaffetasse,
schreib mal Property mit "P" :D nicht "Proberty" :D
Dann sollte es funktionieren.
Gruss eBayer
Intel(R) Core(TM)2 Quad CPU Q8200 @ 2.33GHz mit 4 GB Memory (3,2 GB aktiv)
Vista Home Premium 32 Bit
openOffice 3.1.1 mit Sun Report Builder 1.1.0 und MySql 5.1
Hauptinteresse ooBase seit 12.2008
Kaffeetasse
Beiträge: 3
Registriert: Do, 05.03.2009 17:02

Re: aus Formular per Button ein weiteres Formular aufrufen

Beitrag von Kaffeetasse »

Hallo EBayer :)

peinlich peinlich für mich aber danke für den heißen Tip :)

So jetzt werkle ich mal weiter.

Viele Grüße
Kaffeetasse
Antworten