Seite 1 von 1

überprüfen ob verbindung zur datenbank

Verfasst: Mi, 01.02.2006 14:58
von benjy
hi ich hab das problem das ich immer einen Fehler bekomme wenn meine Datenbank nicht online ist.

wie kann ich vor dem verbinden ermitteln ob ein Zugriff auf die datenbank möglich ist oder nicht?

Code: Alles auswählen

	oDBContext=CreateUnoService("com.sun.star.sdb.DatabaseContext") 
	oDataSource=oDBContext.GetByName(sDBName)
	oDBConnection=oDataSource.GetConnection("","") 'hier kommt dann immer die Fehler meldung
	oStatement=oDBConnection.createStatement()

Verfasst: Mi, 01.02.2006 17:48
von Toxitom
Hey benjy,

Wieso willt du das überprüfen? Was wäre denn das Ergebnis, wenn keine Verbindung besteht? Dann funktioniert das Makro nicht und du musst aufhören?

Das einfachst ist, du impementierst eine Fehlerroutine. im Einfachsten Fall geht die so:

Code: Alles auswählen

sub weissnichtwie
 on error goto fehler
.... 'hier dein Code
 exit sub
 fehler:
 msgbox "Es ist ein Fehler aufgetreten!"
end sub
Das kann man natürlich noch verbesssern. Aber: jetzt erscheint die Fehlermeldung nicht merh (wenn keine Verbindung besteht), sondern es wird verzweigt zum "fehler:" Label und der Code dort fortgesetzt.

Gruss
Thomas

Verfasst: Mi, 01.02.2006 18:52
von benjy
Ich hatte gehoft das es eine Schönere methode giebt
Na ja fuktioniern tut sie.

danke für deine antwort.
benjamin