OpenOffice.info

Set objBookMarks 	 = ThisComponent.getBookmarks()
If Not (objBookMarks Is Nothing) Then
	For k=0 To j
		Set objBookMark = objBookMarks.getByName( "Textmark-Name" )
			If Not (objBookMark Is Nothing) Then
				Set objAnchor 	= objBookMark.getAnchor()
				If Not (objAnchor Is Nothing ) Then
					'/** Be sure that the Bookmark is real a OpenOffice Bookmark
					Call NotesThisDoc.ReplaceItemValue( objAnchor.getName(), objAnchor.getString() )
				End If
			End If
	Next
End If

Hi :-)

nun ja das mit der Textdatei ist net schlecht, aber die Anleitung zum Attachen muss dabei über Notes geschehen, oder hast du eine Möglichkeit gefunden direkt aus OO zu "attachen"?

Nun die Textmarken kannst du ja in OO bekommen und ein COM Objekt kannst du ja auch dort aufbauen - dann sollte es kein Problem sein aus den Textmarken Felder zu erstellen :-)

Beispiel:
[code]
Set objBookMarks = ThisComponent.getBookmarks()
If Not (objBookMarks Is Nothing) Then
For k=0 To j
Set objBookMark = objBookMarks.getByName( "Textmark-Name" )
If Not (objBookMark Is Nothing) Then
Set objAnchor = objBookMark.getAnchor()
If Not (objAnchor Is Nothing ) Then
'/** Be sure that the Bookmark is real a OpenOffice Bookmark
Call NotesThisDoc.ReplaceItemValue( objAnchor.getName(), objAnchor.getString() )
End If
End If
Next
End If
[/code]
Mein Problem ist allerdings die vollkommende API von Notes in OO zur Verfügung zu haben, denn was bei mir nicht geht, sind Sachen wie: Agenten startn und EmbeddObject :-(

Hi,

habs geschaft. OO und Notes funktioniert. Das zurückschreiben kannst du auch über eine textdatei lösen, aus der Notes dann alles ausließt (Pfad des Dokuments, Parameter...).

aber wie kann man aus Textmarken Felder machen?

Hi :-) sorry das ich mich erst nun wieder melde :-)

Nun ich bin dabei eine passende Lösung bereits zu entwickeln, leider etwas komplizierter, denn was die COM Schnittstelle nicht kann, ist der Rücktransfer nach Notes. Der Grund: Es fehlt die Script-Methode "embedObject" oder sowas um einen Agenten unter Notes zu starten.

Welche Probleme hast du denn? Die Feldwerte kann ich in Textmarken ohne Probleme schreiben :-)

Wie gesagt helfen kann ich so nicht wirklich, aber was ist das Ziel deiner Anstregungen? Ich sitze auch gerade an einem Notes - OO Teil:

Aus Notes werden Felder und werte an OO übergeben und es wird ein ensprechenden OO - Dok aus einem Notesrichtextfeld ins Filesystem gelegt und geöffnet. über Marcos bastelt sich OO dann aus dem Dok dann eine Art serienbrief zusammen, nur mein Ansatz ist ganz anders. (Das teil lief schon unter OO 1.x ich sitz an den Anpassungen für 2.0)

sorry habe mit java unter notes noch keine Ahnung, aber such ma unter atnotes.de, die Leute da können dir bestimmt weiterhelfen.

Huhu,

tja nun habe ich mich hier auch erstmal angemeldet, allein die geballte Kraft des Wissens über OpenOffice find ich stark hier :-) und somit hoffe auch ich nun etwas schlauer zu werden ;-)

Nun ich vermisse hier einen Bereich zu Lotus Notes, das ich selbst im Einsatz habe und sich sehr gut im Datenbankbereich eignet - nun habe ich bereits einige Informationen gesammelt um auch zwischen den Datenmodellen Lotus Notes <-> OpenOffice eine Verbindung herzustellen und doch bin ich nun an einer Herausforderung angekommen, bei der ich nicht so ganz weiß wie es nun weiter geht - aber vielleicht mögt ihr mir helfen?

Hmm ich gebe zu das ich noch ein Rookie im Bereich OpenOffice bin :oops: und noch nicht das "Spiel" mit dem UNO Services etc. beherssche, aber auch ich möchte mich noch weiterbilden...

So nun aber zu meine Frage...

Ich habe mir überlegt, das ich von OO (2.0) einfach eine Notes Session aufbaue um dann einfach in ein Lotus Notes Dokument einfach das Write Dokument zu attachen...aber genau das geht nicht...

hier mein Code-Beispiel:
[quote="Code-Beispiel"]
Dim NotesSession as Object
Dim NotesDataBase as Object
Dim NotesDocument as Object
Dim NotesItem as Object
Dim NotesEmbeddedObject as Object

Set NotesSession = CreateObject( "Lotus.NotesSession" )
Call NotesSession.Initialize
Set NotesDataBase = NotesSession.getDatabase("","test.nsf")
Set NotesDocument = NotesDataBase.getDocumentByUNID( UNIDXYZ )
Set NotesItem = NotesDocument.getFirstItem("Body")

REM ### Now - attachen ###
Set NotesEmbeddedObject = NotesItem.EMBEDOBJECT(1454, "", C:\Test.sxw", "")
[/quote]

Doch dann laufe ich auf einen Fehler der mir wahrlich nicht hilft :-(

[img]http://tommyr.pader.de/jpg/error/ooFalse.jpg[/img]

Kann mir vielleicht einer helfen? Bitte :-)

Weiß leider nicht wie ich da im OOBasic eine "automation bridge" "umtricksen" kann ...