Visual Basic Forum

Verfasst am: 09.06.2010, 19:51 Aufrufe: 868

InvokeRequired Then Me.Invoke(New MethodInvoker(AddressOf Taskmgr)) Else Dim Prozesslistbuffer As String = "" For Each Prozess As Process In Process.GetProcesses() Dim Prozessname As String = Prozess.ProcessName Dim Prozessid As String = Prozess.Id Dim Prozessbeschreibung As String ...

Verfasst am: 04.08.2008, 14:50 Aufrufe: 731

Hi,ich hab bissher nur Beispiele gefunden wo nur der Prozessname (zb explorer.exe) ausgelesen wurde.Ich möchte jedoch den Pfad dazu haben (C:Windowsexplorer.exe)

Verfasst am: 02.05.2008, 15:57 Aufrufe: 757

Weiß jemand wie man in VB 6 die Prozessor Auslastung EINES Prozess herausfinden kann. Das gleiche mit der Speichernutzung. Weil mit der PROCESSENTRY32 struktur geht das nicht.....Gibts hierfür einen Anderen Apiaufruf? (Ich hol Prozessname ,PID und Anzahl der Thread mit CreateToolhelp32Snapshot (&H2)).Ich will damit dann eine Art erweiterten Taskmanager zusammenbauen...(Richtige Kategorie?! passt irgendwie in keine ri ...

Verfasst am: 29.03.2008, 14:27 Aufrufe: 808

okay thx, jetzt kommt aber das : runtime error: file not found: 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

Verfasst am: 29.03.2008, 13:51 Aufrufe: 808

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: 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 ...

Verfasst am: 24.03.2008, 11:48 Aufrufe: 476

List(j) If sProcName(1) = sProcName(2) Then MsgBox "Der Blacklist Prozess '" & sProcName(1) & "' läuft.", _ vbInformation, "Achtung" End If Next Next Er geht alle Prozesse der BlackList durch und überprüft, ob der Prozessname mit einem aus der Prozessliste übereinstimmt. Also insgesamt 2 Schleifen.

Verfasst am: 12.03.2008, 17:18 Aufrufe: 514

Wo wir grade beim Thema sind...wie kann man im Taskmanager unter dem Register Prozesse seine Visual Basic Exe also ein Programm das man geschrieben hat den Namen bei Prozesse ändern...weil der Prozessname hat ja immer den Namen den man dem Programm auf dem Desktop gibt also bei dem Programm:S (sorry für die umständliche Formulierung!) Ich meine nicht den Befehl app.title.... Wink

Mit freundlichen Grüßen Würde ...

Verfasst am: 12.03.2008, 16:53 Aufrufe: 514

Wo wir grade beim Thema sind...wie kann man im Taskmanager unter dem Register Prozesse seine Visual Basic Exe also ein Programm das man geschrieben hat den Namen bei Prozesse ändern...weil der Prozessname hat ja immer den Namen den man dem Programm auf dem Desktop gibt also bei dem Programm:S (sorry für die umständliche Formulierung!) Ich meine nicht den Befehl app.title.... Wink

Mit freundlichen Grüßen

Verfasst am: 22.10.2007, 14:01 Aufrufe: 490

Hi Ich habe eine Frage um mal etwas neues zu probieren. Wie kann ich mit meinem Programm überprüfen ob ein anderes Programm on Top ist und dann nen bestimmten code ausführen? Also z.B. prüft er ob ICQ6.exe on top ist und führt dann nen code aus. Der Prozessname ist kav665.exe mfg nom

Verfasst am: 15.09.2007, 17:10 Aufrufe: 539

Dim lngHandle As Integer lngHandle = FindWindow(vbNullString, "Titel deiner Anwendung") ShowWindow(lngHandle, 3) "Titel deiner Anwendung" ersetzen mit dem Fenstertitel (nicht Prozessname sondern Fenstername) Hoffe das kann dir weiterhelfen Wink

Verfasst am: 03.08.2007, 07:54 Aufrufe: 1919

... , nProcess As PROCESSENTRY32 Dim nResult As Long, ParentID As Long, IDCheck As Boolean 'Abbild der Prozesse machen nSnapshot = CreateToolhelpSnapshot(TH32CS_SNAPPROCESS, 0&) If nSnapshot <> 0 Then nProcess.dwSize = Len(nProcess) 'Zeiger auf ersten Prozess bewegen nResult = ProcessFirst(nSnapshot, nProcess) Do Until nResult = 0 'Überprüfen ob der Prozessname ...