Hallo Notes-Gemeinde,
ich habe ein Problem Konsolenkommandos per LS abzusetzen.
Die Ausgangslage ist folgende:
Wir sollen einen Domino-Server (V8.5) so absichern, dass wir keinen alleinigen Zugriff auf die Konsole oder Admin-Rechte darauf haben --> Hochsicherheitssystem. Alles läuft nur im 4-Augen-Prinzip.
Deshalb wurde u.a. die Konsole mit einem Kennwort gesichert. Dies führt zu einem erhöhten Administrationsaufwand, weshalb ich eine Datenbank zum Ausführen von Konsolenbefehlen erstellt habe.
Hier ist nur ein bestimmter Satz an Befehlen definiert und auswählbar(compact, updall, quit, usw.).
Der Vorteil dieser DB wäre, dass alle Eingaben als Log-Dokument in der Datenbank für spätere Audits aufbewahrt werden.
Der Agent funktioniert auch solange die Konsole nicht gesperrt ist.
Sobald die Sperre aktiv ist, will er immer ein Kennwort, auch wenn ich den Agent mit der ServerID unterzeichne und/oder im OnBehalfOf den Server eintrage.
Kann man das per LS irgendwie umgehen?
Ich habe auch schon einige Beiträge dazu gefunden, aber leider ist in keinem eine Lösung für mich enthalten.
--> Konsolenkommandos ausführen (
http://atnotes.de/index.php/topic,42971.0.html )
--> DB Komprimierung (
http://atnotes.de/index.php/topic,10769.0.html )
--> Konsolenkommandos mit LS (
http://atnotes.de/index.php/topic,3046.0.html )
hier eine Kurzfassung meines Scriptes
Dim oSession As New NotesSession
Dim sServerName As String
Dim sConsoleCommand As String
Dim sConsoleReturn As String
sServerName = "Mein Server"
sConsoleCommand = "tell amgr quit"
sConsoleReturn$ = oSession.SendConsoleCommand( sServerName, sConsoleCommand)
Print ( "Agent ConsoleCommand Statusmeldung: " & sConsoleReturn$ & " --- " & sConsoleCommand$ )
Exit Sub
Vorab schon mal vielen Dank für Eure Mühen.
Grüße
Andreas