Beiträge von Patri

ich habs mal auf erledigt gesetzt..

Wenn du deine Fragen richtig formulierst, bekommst du auch die gewünschten Antworten

@If(@Weekday(@Today) = 6;@Date(@Adjust(@Now;0;0;+3;0;0;0));@Tomorrow)

@If(@Weekday(Datumsfeld) = 6;datum plus 3 Tage;datum plus einen tag)

das Quellfeld muss schon berechnet sein, sonst schreibt das Skript ja nicht rüber...

das verstehe ich nun gar nicht mehr... :\
ich kenne deine Maske nun auch nicht im kompletten, was dadurch wie verändert wird.. mein Code schreibt ja nur den text von Feld "Thema1" nach Feld "Thema2" und speichert das Dokument wieder

musst mal gucken, was du daurch verändert hast

nun habe ich es auch mal getestet:

Sub Postopen(Source As Notesuidocument)	Source.EditMode = True	Call Source.FieldSetText("Thema2", Source.FieldGetText("Thema1"))	Call Source.SaveEnd Sub

Bitte nur

Source.EditMode = True
	Call Source.FieldSetText("Thema2", Source.FieldGetText("Thema1"))
	Call Source.Save

in das Sub "Postopen" kopieren

sry, war mein fehler... hatte das mal eben so aus dem stand geschrieben...

richtig wäre es, wenn du schreibst:

Sub Postopen(Source As Notesuidocument)
	[b]call[/b] Source.FieldSetText("dein_zielfeld", Source.FieldGetText("dein_quellfeld"))
	'wenn du das Dok dann mit dem Wert speichern willst, dann schreibe folgenden Befehl auch noch dazu:
	[b]call[/b] Source.Save
End Sub

hmmm dann machen wir das eben mit gewalt...

Sub Postopen(Source As Notesuidocument)
	Source.FieldSetText("dein_zielfeld", Source.FieldGetText("dein_quellfeld"))
	'wenn du das Dok dann mit dem Wert speichern willst, dann schreibe folgenden Befehl auch noch dazu:
	Source.Save
End Sub

hast du mal versucht einfach ein neues Feld zu erstellen und das alte zu löschen...
notes hat so manches mal ganz schöne macken -.-"

ansonsten fällt mir leider nichts mehr ein

schreib doch mal ins PostOpen

Sub Postopen(Source As Notesuidocument)
	Source.Refresh
	Source.Reload
End Sub

das ist Lotus Script, vllt. hilft es weiter..

hmm scheinbar nicht

hab ich jetzt mal gemacht

nach ein wenig hin und her probieren habe ich eine Lösunge gefunden, die zwar nicht perfekt ist, aber funktioniert..

pack den Code in das Feld, in das er als ersten geht, wenn man das Dokument bearbeitet und dann hast du deinen erwünschten Erfolg

Sub Entering(Source As Field)
	Dim uiDoc As NotesUIDocument
	Dim ws As New NotesUIWorkspace

	Set uiDoc = ws.CurrentDocument

	If Not(uiDoc.IsNewDoc) Then
		uiDoc.EditMode = False
	End If
End Sub

Hier hast du auch keine verbergenformel hinterlegt oder?

hast du mal mit einem Button geguckt, ob das Feld gefüllt ist?
Vllt wird der Wert nur nicht angezeigt, aber das Feld ist gefüllt..

poste doch am besten einfach mal, was du schon geschrieben hast

ist das feld, wo sich das berechnete Feld den Wert zieht denn gefüllt, wenn sich das Dok im lesemodus befindet?

hmm irgendwie kann ich deiner Beschreibung nicht ganz folgen...
irgendwie hört es sich für mich so an, als wenn du eine Kopie von einem Dokument (in diesem Fall eine Mail) haben willst. Diese soll jedoch in einer anderen Datenbak sein und eine andere Maske haben. Und dort willst du noch zusätliche Felder haben..

In diesem Fall würde ich doch einfach in der anderen Datenbank, wo die mail hinkopiert wird eine Make "Memo" erstellen und die Felder dazupacken, die ich haben will und die felder anzeigen lassen, die in der mail enthalten sind(Body, subject, ..)

nee, leider nicht...

das blöde ist ja, dass diese Information nur im Adressbuch oder in unserer "HcOrgAdmin" hinterlegt ist..

was genau willst du damit bezwecken?
wenn dem User die möglichhkeit geben willst ein anderes Dokument anzusehen, während du ein bearbeitest, kannst du das Vorschaufenster benutzen..

Diali: danke für den wertvollen Tip. Das wusste ich noch gar nicht