XP-Dienste abschalten

  • Hallo, Guys

    wie kann man von XP bestimmte Dienste abschalten ? ?(
    Wenn ich offline gehe möchte ich einige Dienste per Script auschalten,
    ohne immer die Windows-Console öffnen und den Dienst per Mouseclick auf beenden zu klicken.

    zb. Druckwarteschlange

    Beispiel Code:

    Spoiler anzeigen

    Global $PID, $s1, $s2, $zeit, $begin
    ; Script to End myPrivate Processes!
    ; 1 - Wait of Dienste Windows and Aktiv ?
    ;
    WinWait("Dienste", "Dienste (Lokal)")
    WinActivate("Dienste", "Dienste (Lokal)")
    WinWaitActive("Dienste", "Dienste (Lokal)")
    ;
    ; 2 - Maximiere the Window
    ;
    MouseClick("left", 230, 10, 2)
    ;
    ; 3 - Move to Druckwarteschlange & Stop Service
    ;
    MouseClick("left", 396, 506, 1)
    StopService()
    ;
    ; 4 - Dienste-Windows Close
    ;
    MouseClick("left", 1141, 8, 1)
    ;
    $s1 = @DesktopWidth/2
    $s2 = @DesktopHeight/2
    MouseMove($s1,$s2)
    ;
    ; End
    Exit
    ; -------- Functionen --------
    Func StopService()
    MouseClick("left", 203, 151, 1)
    $zeit = "10"
    $begin = TimerInit()
    WinWait("Dienststeuerung", "zu beenden")
    While WinExists("Dienststeuerung", "zu beenden")
    MyTimer() ; Zeit ablaufen lassen
    WEnd
    EndFunc
    ;------------------------------------------------------------------
    ; Zeit läuft
    Func MyTimer()
    Switch TimerDiff($begin)
    Case $zeit * 1000 to ($zeit + 1) * 1000
    ; Wenn die Zeit abgelaufen ist, prüfen und auf 'Enter' drücken!
    If WinExists("Dienststeuerung", "zu beenden") Then
    Send("{ENTER}")
    EndIf
    EndSwitch
    EndFunc


    Gibt es eine andere Möglichkeit ?

    Gruß
    tv_freeze

    Einmal editiert, zuletzt von tv_freeze (29. April 2010 um 20:35)

  • Zitat

    wie kann man von XP bestimmte Dienste abschalten ? ?(
    zb. Druckwarteschlange

    Lokal

    Spoiler anzeigen
    [autoit]

    Run(@ComSpec & " /c " & 'sc stop Spooler', "", @SW_HIDE)

    [/autoit]


    Remote

    Spoiler anzeigen
    [autoit]

    Run(@ComSpec & " /c " & 'sc \\IP-DES-RemotePC stop Spooler', "", @SW_HIDE)

    [/autoit]


    Weitere Paramater: pause / continue / start

    - MfG OpaEd

  • Zur Nutzung dieses Forum's, ist ein Übersetzer für folgende Begriffe unerlässlich:

    "On-Bort, weier, verscheiden, schädliges, Butten steyling, näckstet, Parr, Porblem, scripe, Kompletenz, harken, manuel zu extramieren, geckukt, würglich, excell, acces oder Compilevorgeng"