1
Close Application Script für Windows Applikation
Hallo zusammen,
ich habe eine Windowsapplikation die ich mittels einem Script schliessen möchte.
Soweit ich weiss eignet sich VB oder VBS für sowas. Jedoch weiss ich nicht wie ich das ganze angehen soll, da ich keine Ahnung von VB habe.
Ich bin also auf eure Unterstützung angewiesen und würde mich sehr freuen falls ich den einen oder anderen Tipp bekommen könnte.
Gruß,
Michael
ich habe eine Windowsapplikation die ich mittels einem Script schliessen möchte.
Soweit ich weiss eignet sich VB oder VBS für sowas. Jedoch weiss ich nicht wie ich das ganze angehen soll, da ich keine Ahnung von VB habe.
Ich bin also auf eure Unterstützung angewiesen und würde mich sehr freuen falls ich den einen oder anderen Tipp bekommen könnte.
Gruß,
Michael
Auf Facebook teilen
Auf Twitter teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 26250
Url: https://administrator.de/contentid/26250
Ausgedruckt am: 23.11.2024 um 07:11 Uhr
1 Kommentar
Hallo,
das ist nicht viel an Informationen, die Du da lieferst.
Nomalerweise wird in VBS eine Application beim beenden eines Scripts automatsch geschlossen, wenn sie im Script auch geöffnet wurde.
Ansonsten kannst Du mal versuchen mit:
[name].vbs
snip
Set WshShell = WScript.CreateObject("WScript.Shell")
Set owmi = GetObject("winmgmts:")
Set Task = owmi.ExecQuery("select * from win32_process")
On Error Resume Next
For Each objekt in Task
If objekt.Name = "Name der Application" Then 'hier muß genau die Bezeichnung rein, die Dir z.B. über "Strg+Alt+Enf" angezeigt wird.
WshShell.AppActivate(objekt.processID)
objekt.Terminate 0
Err.Clear
Exit For
End If
next
WScript.Quit
snip
Mfg maneich
das ist nicht viel an Informationen, die Du da lieferst.
Nomalerweise wird in VBS eine Application beim beenden eines Scripts automatsch geschlossen, wenn sie im Script auch geöffnet wurde.
Ansonsten kannst Du mal versuchen mit:
[name].vbs
snip
Set WshShell = WScript.CreateObject("WScript.Shell")
Set owmi = GetObject("winmgmts:")
Set Task = owmi.ExecQuery("select * from win32_process")
On Error Resume Next
For Each objekt in Task
If objekt.Name = "Name der Application" Then 'hier muß genau die Bezeichnung rein, die Dir z.B. über "Strg+Alt+Enf" angezeigt wird.
WshShell.AppActivate(objekt.processID)
objekt.Terminate 0
Err.Clear
Exit For
End If
next
WScript.Quit
snip
Mfg maneich
