LibreOffice-Forum

Hallo Leute,
nach langer zeit wage ich ich mich mal an die Programmierung und habe bei folgenden Programmschlipsen Probleme :

1 Sub Main
2 Dim objDatabaseContext as Object
3 Dim objNamen
4 Dim i as Integer
5 Dim strListe as string
6 objDatabaseContext = createUnoService("com.sun.star.sbd.DatabaseContext")
7 objNamen = objDatabaseContext.getElementNames("XXXXXXXXXXX( DB-Name )")
8 For i = 0 to UBound(objNamen())
9 strListe = tsrListe & chr(13) & objNamen(1)
10 Next
11 msgbox strListe
12
14 End Sub

Zeile 7 zeigt folgende Meldung an :
"Objekt-Variable nicht belegt."

Obwohl die DB registriert ist in LO 3.4.2 unter openSuse 11.4 .

Kann mir bitte jemand helfen und mir erklären, wo das problem liegen könnte , bzw. hat schon jemand eine Lösung gefunden ???

mfg
boser

bitte jetzt nicht ärgern:
erkennst Du den Unterschied?

... Viel Spaß noch mit Deiner BatenDank

Merci, *grummel,grummel*

das war der erste Hauptfehler.

mfg
boser

Hallo, ich habe noch ein paar klitzekleine gefunden
Sub Main
Dim objDatabaseContext as Object
Dim objNamen
Dim i as Integer
Dim strListe as string
objDatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
objNamen = objDatabaseContext.getElementNames()
For i = 0 to UBound(objNamen())
strListe = strListe & chr(13) & objNamen(i)
Next
msgbox strListe
End Sub


... dann läuft es auch mit der msgbox

Gruß R