|
| Autor |
Nachricht |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
aus taskmngr auslesen
Verfasst am: 29.03.2008, 14:06 |
|
|
Hi,
wie kann ich machen, dass wenn z.b hallo.exe startet, dass er das und das macht? Also z.b wenn blabla.exe gestartet ist, soll er eine msg box aufrufen "hallo"
thx (: |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 29.03.2008, 14:51 |
|
|
Es gibt eine Funktion, um zu testen, ob ein Prozess läuft.
http://nopaste.dbhost.info/index.php?id=9458eefbd8
Jetzt kann du der Variable TaskID die TaskID des Prozesses übergben und die Funktion in einer If-Abfrage aufrufen:
| Code: | Private Sub Command1_Click()
TaskID = Shell("notepad.exe", vbNormalFocus) ' <- Prozessname
If IsActive Then
MsgBox "Prozess läuft."
Else
MsgBox "Prozess läuft nicht."
End If
End Sub |

Zuletzt bearbeitet von c0re_ am 29.03.2008, 17:35, insgesamt einmal bearbeitet |
|
| |
|
 |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
Verfasst am: 29.03.2008, 15:27 |
|
|
okay thx, jetzt kommt aber das :
runtime error: file not found:
| Code: |
Private Sub Command1_Click()
TaskID = Shell("xfire.exe", vbNormalFocus) ' <- Prozessname
If IsActive Then
MsgBox "Prozess läuft."
Else
MsgBox "Prozess läuft nicht."
Timer1.Enabled = False
End If
End Sub
|
|
|
| |
|
 |
sollniss_ Coder

Anmeldedatum: 08.09.2007 Beiträge: 212
|
|
| |
|
 |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
Verfasst am: 29.03.2008, 15:58 |
|
|
| der pfad zum taskmanager? xDDD:D |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 29.03.2008, 16:12 |
|
|
Der komplette Pfad zu XFire.
 |
|
| |
|
 |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
Verfasst am: 29.03.2008, 17:33 |
|
|
| es kommt jetzt immer " prozess läuft nicht" |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 29.03.2008, 17:36 |
|
|
Was ist das da für ein Timer, den du ausmachen willst?
 |
|
| |
|
 |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
Verfasst am: 29.03.2008, 17:38 |
|
|
hä????? Wie ist der da ringekommen? habs genau so abgeschrieben ( net c&p, dass ich was lerne .hab ihn aber rausgenommen, weil er ja nix bringt XD
Wenns aber dann nicht läuft, dann startet er es gerade und die message kommt "programm läuft nicht" |
|
| |
|
 |
ZiG_ Überflieger

Anmeldedatum: 07.03.2007 Beiträge: 1248
|
Verfasst am: 29.03.2008, 19:25 |
|
|
Willst du denn das Programm vorher selbst starten?
Ich denke eher du willst einfach überprüfen ob ein anderes Programm schon läuft oder nicht.
Klär das mal bitte auf. Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde) |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 29.03.2008, 19:39 |
|
|
Hab grad eine Funktion gefunden, mit der du die TaskID eines schon laufenden Prozesses herausfinden kannst. http://nopaste.dbhost.info/index.php?id=6d9c6e5505
Um die P-ID von XFire herauszubekommen, benutzt du nun folgenden Code:
| Code: | Dim lPID As Long
lPID = FindProcessId("xfire.exe") |
Dann überprüfst du ob eine Prozess-ID in der Variable steht (größer als -1). Also ob die Anwendung gerade läuft.
| Code: | If lPID > -1 Then
MsgBox "XFire läuft."
Else
MsgBox "XFire läuft nicht."
End If |
Denke mal, dass das nun das war, was du meintest. 
 |
|
| |
|
 |
makiaho_ Newbie

Anmeldedatum: 28.03.2008 Beiträge: 16
|
Verfasst am: 29.03.2008, 19:45 |
|
|
| jetzt kommt wieder : sub or function not definied ;/ |
|
| |
|
 |
c0re_ « Moderator »

Anmeldedatum: 29.11.2007 Beiträge: 425
|
Verfasst am: 29.03.2008, 20:26 |
|
|
Hast du die Funktion aus dem NoPaste schon eingefügt?
 |
|
| |
|
 |