Domino 9 und frühere Versionen > ND7: Entwicklung
Dialogliste - mehrere Einträge - best. Eintrag austauschen
jan2k:
Ich hab leider gar keine ahung in script....
klaussal:
Dann wird es sehr schwierig, wenn nicht unmöglich.
koehlerbv:
@Replace tut es auch.
Bernhard
Peter Klett:
Also was Du da zusammenbastelst, ist m.E. wirklich gefrickelt, aber ich weiß, dass Du unter höchstem Zeitdruck ohne ausreichende Kenntnisse etwas schaffen sollst. Deshalb hier das Script in dem Stil, in dem Du arbeitest. Schön ist allerdings etwas anderes.
Du musst vorher mittels Deiner Formel den zu ändernden Wert in die Ini-Variable "$DocWhoAlt" setzen, und den neuen Wert in "$DocWhoNeu".
Sub Initialize
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim collection As NotesDocumentCollection
Dim alt As String
Dim neu As String
Dim who As Variant
Dim nvParent As NotesView
alt = session.GetEnvironmentString ("$DocWhoAlt", True)
neu = session.GetEnvironmentString ("$DocWhoNeu", True)
Set db=session.currentdatabase
Set collection=db.UnprocessedDocuments
Set doc = collection.GetFirstDocument ()
Set nvParent = doc.ParentView
While Not doc Is Nothing
who = doc.Who
Forall w in who
If w = alt Then
w = neu
doc.Who = who
Call doc.Save (True, False)
Exit Forall
End If
End Forall
Set doc = collection.GetNextDocument (doc)
Wend
End Sub
Das Script ist nicht getestet, sondern direkt hier geschrieben.
Siehe diese Form der Unterstützung bitte als absolute Ausnahme an.
Peter Klett:
Noch ein Nachtrag: Du solltest die Ini-Variablen danach löschen. Ergänze das Script also so
alt = session.GetEnvironmentString ("$DocWhoAlt", True)
neu = session.GetEnvironmentString ("$DocWhoNeu", True)
Call session.SetEnvironmentVar ("$DocWhoAlt", "")
Call session.SetEnvironmentVar ("$DocWhoNeu", "")
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln