Domino 9 und frühere Versionen > ND6: Entwicklung

agent.OnBehalfOf

<< < (2/6) > >>

umi:
Ungefähr so:

--- Code: ---Dim s As New notessession
Dim db As notesdatabase
Dim notecoll As notesnotecollection
Dim noteid As String
Dim agent As document
Set db = s.currentdatabase
Set notecoll = db.createNoteCollection(False)
notecoll.SelectAgents=True
Call notecoll.BuildCollection()
noteid = notecoll.GetFirstNoteId
Set agent = db.GetDocumentByID(noteid)
While Not agent Is Nothing
If agent.name="Mein AGent" Then
Call agent.replaceitemvalue("$OnBehalfOf","CN=Der Name/O=Meine Organisation")
Call agent.save(True,False)
End If

noteid = notecoll.getnextnoteid(noteid)
Set agent = db.GetDocumentByID(noteid)
Wend

--- Ende Code ---

andrew22:
vielen danke habe mir ein nettes script zusammen gebastelt ;) ...

werde es dann noch posten ..

allerdings noch 2 fragen

1. wie kann ich testen ob das Feld $OnBehaltTo überhaupt existiert ?

2. könnte ich auch Zeitperiode ändern sprich wenn der agent periodisch läuft ?!

thx

andrew22:
Das Problem ist das wenn das feld nicht gesetzt ist existiert es auch nicht und wenn ich dann nen Namen reinsetze kann ich den agent nicht mehr im Designer öffnen :(

umi:
zu 1. Mit Document.hasitem ? z.Bleistift

gruss
 umi

andrew22:
jupp has item ;) so hab ichs gemacht

nur trotzdem ist das ein Problem für ihn ich kann danach den agent nicht mehr im designer öffnen ..

woran mag das nur liegen ?! :(

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete