Sonstiges > Infrastruktur

Leserecht blockt Schreibrecht

(1/2) > >>

Big768:
Liebe Noteskolleginnen und -kollegen,

dass Thema gehört hier vielleicht nicht hin aber....

Ich habe eine schöne kleine Notes-Anwendung geschrieben die folgendes kann:

Benuzter mit Schreibrechten legen ins Netzwerk in einem bestimmten Verzeichnis wöchentlich eine Exceldatei ab. In der Notesanwendung erscheint daraufhin die Exceldatei in einer Liste. Wenn der Notesanwender auf eine Schaltfläche darunter klickt, öffnet sich die Exceldatei. Der Anwender muss sich also nicht durch das Netzwerk klicken.

Die Exceldatei darf nur von wenigen Benutzern im Schreibzugriff geöffnet werden. Kann jemand die Datei nicht mit Schreibzugriff öffnen, so kann schnell abgeklärt werden, wer die Datei geöffnet hat.

Seit geraumer Zeit ist es so, dass die Exceldatei auch dann nicht mit Schreibzugriff geöffnet werden kann, wenn ein anderer, der nur Leserechte hat, sie geöffnet hat. Dies liegt wohl an neuen Excelviewern und so. .. ???

Kennt jemand von Euch das gleiche Problem? Wie habt Ihr es gelöst?

Vielen Dank im voraus.

Johann

koehlerbv:
WO liegt die Excel-Datei? Immer noch im Netzwerk oder wurde die in ein Notes-Dokument importiert? Ich steige bei Deinem Posting nicht durch.

Bernhard

Big768:
Die Exceldatei liegt im Netzwerk.

Im Notesdokument steht nur, dass die Datei für die entsprechende KW bereitsteht.

Johann

Big768:
Liebe Noteskolleginnen und -kollegen,

ich muss mich korrigieren / präzisieren. Die Exceldatei wird nicht mit Irgendeinem Excelviewer geöffnet, sondern mit OpenOffice-Calc.

Der Code ist folgender:

   Dim workspace As New NotesUIWorkspace
   Dim uidoc As NotesUIDocument
   Dim thisDoc As NotesDocument
   On Error Goto Calc
   
   Set uidoc = workspace.CurrentDocument
   Set thisDoc = workspace.CurrentDocument.Document
   Dim HURL As String
   HURL = thisDoc.Calcdatei(0)
   Set x1=CreateObject("Excel.Application")
   x1.Application.Workbooks.Open thisdoc.Exceldatei
   x1.application.visible=True
   Exit Sub
Calc:
   Set SM=CreateObject("com.sun.star.ServiceManager")
   Set Desktop=SM.createInstance("com.sun.star.frame.Desktop")   
   Dim args()
   Set CalcApplication=Desktop.loadComponentFromURL(HURL,"_blank",0,args)
   Exit Sub

Ich habe mir überlegt, dass es vielleicht besser ist, wenn die Benutzer mit nur Leserechten die Datei sich mit der Notesansicht anschauen sollen. Vielleicht wird die Schreibberechtigung dann nicht gesperrt.

Wie kann man in Notes festlegen, dass die Datei mit dem Notesviewer angezeigt werden soll?

Vielen Dank im voraus.

Johann

Axel:

--- Zitat von: Big768 am 24.09.09 - 16:00:06 ---Seit geraumer Zeit ist es so, dass die Exceldatei auch dann nicht mit Schreibzugriff geöffnet werden kann, wenn ein anderer, der nur Leserechte hat, sie geöffnet hat. Dies liegt wohl an neuen Excelviewern und so. .. ???

--- Ende Zitat ---

Verstehe ich das richtig, dass zwei User (einer mit Leserechten und einer mit Schreibrechten) gleichzeitig darauf zugreifen?


Axel

Navigation

[0] Themen-Index

[#] Nächste Seite