Set sh = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
dir = fso.GetParentFolderName(WScript.ScriptFullName)

pythonw = "pythonw"
On Error Resume Next
sh.Run "pythonw -c ""pass""", 0, True
If Err.Number <> 0 Then pythonw = "python"
On Error GoTo 0

sh.Run """" & pythonw & """ """ & dir & "\stop.py""", 0, True