OpenOffice.info

Sub base_TabellenRechte
REM ===========================================
REM Für Hotti, oooinfo 13167, 2007-07-17
REM Dieses Beispiel ohne Abfangen von Fehlerbedingungen!
REM ===========================================
oDBKontext = CreateUnoService( "com.sun.star.sdb.DatabaseContext" )
' registrierte Datenquelle
oDB = oDBKontext.getByName( "DBName" )
' user und passwort, wenn nötig
oVerbindung = oDB.getConnection( "", "" )
oTabellen = oVerbindung.getTables()
oTabelle = oTabellen.getByName( "Tabellenname" )
' Anzeige der Rechte-Bitmap
print oTabelle.Privileges 
End Sub

[code]Sub base_TabellenRechte
REM ===========================================
REM Für Hotti, oooinfo 13167, 2007-07-17
REM Dieses Beispiel ohne Abfangen von Fehlerbedingungen!
REM ===========================================
oDBKontext = CreateUnoService( "com.sun.star.sdb.DatabaseContext" )
' registrierte Datenquelle
oDB = oDBKontext.getByName( "DBName" )
' user und passwort, wenn nötig
oVerbindung = oDB.getConnection( "", "" )
oTabellen = oVerbindung.getTables()
oTabelle = oTabellen.getByName( "Tabellenname" )
' Anzeige der Rechte-Bitmap
print oTabelle.Privileges
End Sub[/code]

Die Konstanten findest Du [url=http://api.openoffice.org/docs/common/ref/com/sun/star/sdbcx/module-ix.html]hier[/url]

War es das?

Hallo
Wie kann ich bei einer Datenbank abfragen,
ob die Tabelle schreibbar ist?
z.B If Not ...hasbyName"Meine Tabelle" writable Then Msgbox "Kann nicht in Tabelle schreiben"

Danke für Hinweise
Viele Grüße,
Hotti