Autor Thema: Berechtigungs.Frage: Agenten Signieren  (Gelesen 1840 mal)

Offline _Arne_

  • - Admin Section -
  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 992
  • Geschlecht: Männlich
  • Devops Because Even Developers Need Heroes
    • Das Lotus Notes Forum
Berechtigungs.Frage: Agenten Signieren
« am: 31.01.05 - 13:44:01 »
Moin Moin,

gibt es eine Möglichkeit Usern das Recht einzuräumen Agenten über den Administrator zu signieren (mit der aktiven Server.id) ??

Administrator ist bei diesen Personen vorhanden.

Gruß,
Arne  8)

Offline TMC

  • Freund des Hauses!
  • Gold Platin u.s.w. member:)
  • *****
  • Beiträge: 3.660
  • Geschlecht: Männlich
  • meden agan
Re: Berechtigungs.Frage: Agenten Signieren
« Antwort #1 am: 31.01.05 - 20:30:37 »
Afaik nur über Workaround, Arne.

Nur eine Idee:
User "beantragt" die Agentensignierung mit einem Notes-Dokument. Das Dokument landet dann in einer speziellen View.
Nun hast Du einen Agenten, der regelmäßig (also ein scheduled Agent) die View durchgeht. Wenn da ein "Antrag" vorliegt, dann signiert der Agent die entsprechenden Agenten.

An die Ziel-Agenten, die Du signieren willst, kommst Du z.B. so:
Dim docAgent As NotesDocument
Dim ncol As NotesNoteCollection
Dim strNoteID As String
Set ncol = db.CreateNoteCollection(False)
ncol.SelectAgents = True
Call ncol.BuildCollection
strNoteID = ncol.GetFirstNoteId
Do While Not(strNoteID = "")
  Set docAgent = db.GetDocumentByID(strNoteID)

   'jetzt hast Du Zugriff auf die Agenten über docAgent.
   'Hier kannste nun was machen. z.B. Abfragen wie der Agent heißt, und wenn es passt,
   'dann machst Du ein docAgent.Sign

  strNoteID = ncol.GetNextNoteId(strNoteID)
Loop


Dieser Agent, der da läuft, muss allerdings mit dem Administrator signiert sein.

Das ist jetzt nur eine Idee, aber sehe keinen Grund, warum das so nicht gehen sollte  ;)
Matthias

A good programmer is someone who looks both ways before crossing a one-way street.


 

Impressum Atnotes.de  -  Powered by Syslords Solutions  -  Datenschutz