Tabelle schreibgeschützt?

[ulihueck]

Hallo.
Ich befülle eine Tabelle per Makro mit Daten.
Nun möchte ich die Daten überarbeiten, oder Datensätze löschen.
Das funktioniert aber nicht mehr, seit dem ich die Tabelle automatisch mit Daten fülle.
ich habe auch schon versucht, per Makro Datensätze zu löschen oder zu verändern.
Aber ich erhalte die Meldung dass die Verbindung im Read-only Modus ausgeführt wird, obwohl ich den Befehl

Code: Alles auswählen

oStatement.ResultSetConcurrency = com.sun.star.sdbc.ResultSetConcurrency.UPDATABLE

verwende.
Wie kann ich den den Schreibschutz der Tabelle aufheben?

Grüße
Uli

[Heinz Bär]

Hallo Uli

In einem Projekt hatten ich ein ähnliches Problem. Die Lösung habe ich in einem Forum gefunden:

Code: Alles auswählen

Sub ProtectSpreadsheet
dim oDoc As Object 
dim oSheet As Object
oDoc = ThisComponent
oSheet=oDoc.Sheets.getByName("Tabelle1")
oSheet.protect("password")
End Sub


Sub UnProtectSpreadsheet
dim oDoc As Object 
dim oSheet As Object
oDoc = ThisComponent
oSheet=oDoc.Sheets.getByName("Tabelle1")
'oSheet.protect("password")
End Sub

Du kannst diese Subroutinen dementsprechend anspringen und die Tabelle wird geschützt oder freigegeben.

Gruss
Heinz

[ulihueck]

Hallo Heinz.
Vielen Dank für Deine Antwort.
Deine Lösung bezieht sich auf das Verändern von Tabellen in CALC.
Hast Du auch eine Idee für BASE?

Grüße
Ul

[ulihueck]

Okay.
Habe im Forum doch eine Lösung gefunden: es muss eine Spalte mit dem Primärschlüssel erzeugt werden.
Sonst ist die Tabelle schreibgeschützt.
Komisch - Daten einfügen hat problemlos funktioniert.
Grüße
Uli

[komma4]

Uli - wie festgestellt:

einfügen geht, zum Ändern braucht es einen Primärschlüssel, ...

Sonst ist die Tabelle schreibgeschützt.

...sonst sind die Inhalte (über-)schreibgeschützt.