Das Notes Forum

Domino 9 und frühere Versionen => ND6: Entwicklung => Thema gestartet von: Mandalor am 13.12.07 - 14:24:19

Titel: Task per Agent beenden
Beitrag von: Mandalor am 13.12.07 - 14:24:19

Hallo,

ich bin gerade auf der suche nach einer möglichkeit, einen Task per notesagenten zu beenden. Ich kenne den namen des tasks und er läuft auch auf der selben maschine.

Habt ihr eine idee?

Das betriebssystem ist windows. Unter linux is das ja kein problem, aber unter windows bin ich im moment ratlos.

MfG

Markus

Titel: Re: Task per Agent beenden
Beitrag von: koehlerbv am 13.12.07 - 14:33:10

NotesSession.SendConsoleCommand

Titel: Re: Task per Agent beenden
Beitrag von: Mandalor am 13.12.07 - 16:04:48

ich hab da noch was anderes gefunden:

Function killtask(Task As String)
   Set ProcessSet = GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf("Win32_Process")
   Forall process In ProcessSet
      proname = Ucase(Left(process.Name,6))
      Select Case proname
      Case Ucase(task)
         process.terminate
      End Select
   End Forall
End Function

funktioniert.
Und danke für die Antwort.


Edit:

und hier die Quelle:
http://www.administrator.de/Prozesse,_Tasks%7CAnwendungen_per_Tool_und_Zeitplan_starten_UND_beenden.html#38899 (http://www.administrator.de/Prozesse,_Tasks%7CAnwendungen_per_Tool_und_Zeitplan_starten_UND_beenden.html#38899)