vbs script aber wie?

... komplette Frage anzeigen

2 Antworten

Den Unterschied zwischen "No" und "Cancel" habe ich nicht verstanden.

Die meisten Programm lassen sich mit [Alt]+F4 beenden.

Beispiel:

Dim oShell
If MsgBox("notepad 'Unbenannt' beenden?", vbYesNoCancel) = vbyes Then
  Set oShell = CreateObject("WScript.Shell")
  oShell.AppActivate "Unbenannt"
  WScript.Sleep 100
  oShell.SendKeys "%{F4}"
End If
Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von finn1123
15.08.2016, 16:19

Der Unterschied ist auch egal. Es endet automatisch, wenn das Script zu Ende ist.

0

Am Beispiel von Firefox:

If Msgbox("Wollen sie Firefox beenden?", 3, "Firefox beenden") = 6 Then
Set WshShell = WScript.CreateObject("WScript.Shell")
If WshShell.AppActivate("Mozilla Firefox") Then
WScript.Sleep 100
WshShell.SendKeys "%{F4}"
End if
End if

Hat lange gedauert...

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von finn1123
15.08.2016, 16:23

P.S.:Funktioniert, selbst getestet!

0

Was möchtest Du wissen?