VB Prozesse

Master Luzifer · 11.11.2006

Sers,

ich möchte folgendes erreichen: Wenn ein Prozess beendet wird, soll der Computer Heruntergefahren werden! Hab dazu schon was ausprobiert, leider funktioniert es nicht:

Dim ExterneAnwendung As New System.Diagnostics.Process()
ExterneAnwendung.StartInfo.FileName = "Erinnermich.exe"
If ExterneAnwendung.HasExited Then
Shell("shutdown.exe -s")
End If

Fehler: Es passiert einfach nix!!!

Dass interessante daran ist: Der Prozess "Erinnermich.exe" ist meine Windows-Anwendung. Ich möchte aslo nur so etwas in der Art erreiche:

Wenn meine Anwendung beendet wird, dann
Windows herrunterfahren

Gibts da vielleicht andere möglichkeiten, als über Prozesse?

Wäre für jede Hilfe dankbar!

mfg ML

Frankovic · 11.11.2006

Code:

Dim p As New System.Diagnostics.Process()
p.StartInfo.FileName = "C:\Programme\MeineSoftware.exe"
p.Start()
p.WaitForExit()

WaitForExit() besitzt eine Überladung, mit der du die Zeit angeben kannst, wie lange höchstens auf die Beendigung des Prozesses gewartet werden soll.

alles Gute

Master Luzifer · 11.11.2006

Aber mit WaitForExit() kann ich doch nur angeben, wie lange darauf gewartet werdne soll, dass beendet wird. Aber meine Programm soll bewirken, dass, wenn es selbst beendet wird, windows herunterfährt - egal wann es beendet wird!

thx trotzdem für deine Antwort

mfg ML

Frankovic · 11.11.2006

Code:

Dim p As New System.Diagnostics.Process()
p.StartInfo.FileName = "C:\Programme\MeineSoftware.exe"
p.Start()
p.WaitForExit()
If p.HasExited Then MsgBox("ANWEISUNGEN")

sorry, hab leider kein VB installiert, hast du das mal versucht?

cmddegi · 13.11.2006

Du könntest auch einfach periodisch mit den passenden API-Funktionen nach einem Fenster mit dem gewünschten Titel suchen. Zwar nicht sehr sauber, aber vermutlich funktionell.

Gruß,
Degi

Master Luzifer · 14.11.2006

@Frankovc: wo soll ich den code dann platzieren??
Form1.Load... schon mal ned...

Frankovic · 14.11.2006

Du kannst den Code platzieren unter:
z.b. Button klick ereigniss, sonstiger sub ...

Code:

Public Sub OeffneProgramm()
   Dim p As New System.Diagnostics.Process()
   p.StartInfo.FileName = "C:\programm.exe" '(kleiner Tipp: Pfad zu geöffnetem/aktuellen Programm: Application.StartUpPath)
   p.Start()
   p.WaitForExit()
   If p.HasExited Then 'Eigentlich überflüssig die If - Anweisung, da es ja exited ist
      'Hier gehts weiter
      MsgBox("ANWEISUNGEN") 
   End If
End Sub

in z.b. ein button ereigniss schreibst du dann : OeffneProgramm()

hoffe das hilft dir weiter.

p.s. in die form load könntest du es auch schreiben, allerdings wird dann erst das andere programm geöffnet, und wenn es beendet wird, geht es in dem programm weiter.

Vincee · 17.11.2006

schreib erst ein prog das den pc runterfährt. dann schreib noch n prog dass dan das prog das den pc runterfährt öffnet wenn der bestimmte prozess beendet ist.
- wie immer leicht verständlich

VB Prozesse

Master Luzifer

Frankovic

Master Luzifer

Frankovic

cmddegi

Master Luzifer

Frankovic

Vincee

VB Prozesse

ANGEBOTE & SPONSOREN

Neueste Beiträge

Statistik des Forums