kostenloser Webspace werbefrei: lima-city

prozesse beenden

lima-city → Forum → Programmiersprachen → Basic

1. Autor dieses Themas

   speckuntu

   

   speckuntu hat kostenlosen Webspace.

   16:39, 19.3.2008

   wie kann ich mit vb6 prozesse beenden
   
   

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. burgi

   Co-Admin

   burgi hat kostenlosen Webspace.

   16:51, 19.3.2008

   Mit Google ... ;)
   
   http://www.google.at/search?hl=de&q=visual+basic+vb+6+kill+process&btnG=Google-Suche&meta=
   
   Brauchbare Links:
   http://vb-helper.com/howto_terminate_process.html
   http://visualbasic.ittoolbox.com/groups/technical-functional/visualbasic-l/how-to-kill-process-from-vb-787777?cv=expanded#
   http://www.devx.com/vb2themax/Tip/19049

4. g*c

   18:47, 25.3.2008

   Beispielcode:
   

   Dim p As System.Diagnostics.Process = System.Diagnostics.Process.GetProcessesByName(\"Prozess\") (ohne .exe)
   p.Kill()

   
   
   feddich is.

5. cbhp

   Co-Admin

   cbhp hat kostenlosen Webspace.

   20:13, 25.3.2008

   gcc schrieb:
   Beispielcode:
   

   Dim p As System.Diagnostics.Process = System.Diagnostics.Process.GetProcessesByName(\\\'Prozess\\\') (ohne .exe)
   p.Kill()

   
   
   feddich is.

   
   
   Falsche Antwort, dieser Code bezieht sich auf .Net Framework, was in VB 6 nicht vorhanden ist.
   (Außerdem ist dein Beispiel nicht ganz sauber...aber egal)
   
   In VB 6 gibt\'s nur die von Burgi geschriebene Lösung.

6. jackhard

   jackhard hat kostenlosen Webspace.

   21:52, 25.3.2008

   Funktioniert nur wenn die TaskID bekannt ist:
   
   

   Private Declare Function CloseHandle Lib \"kernel32\" (ByVal _
      hObject As Long) As Long
   
   Private Declare Function OpenProcess Lib \"kernel32\" (ByVal _
      dwDesiredAccess As Long, ByVal bInheritHandle As _
      Long, ByVal dwProcessId As Long) As Long
   
   Private Declare Function TerminateProcess Lib \"kernel32\" (ByVal _
      hProcess As Long, ByVal uExitCode As Long) As Long
   
   Const PROCESS_TERMINATE = &H1
   
   Public lTaskID as Long
   
   Private Sub cmdTerminate_Click()
      Dim hTask As Long
      Dim lResult As Long
      hTask = OpenProcess(PROCESS_TERMINATE, 0&, lTaskID)
      lResult = TerminateProcess(hTask, 1&)
      lResult = CloseHandle(hTask)
   End Sub

   
   

7. f*************e

   23:12, 25.3.2008

   Am einfachsten ist immer noch:
   

   shell(\"taskkill /IM *PROZESSNAME*.exe\")

   
   Alternativ kannst doch mit dem Parameter \"/F\" das Beenden erzwingen.
   Wenn du nun z.B. nur die PID hast kannste auch statt \"/IM\" \"/PID *PID\" benutzen.
   
   
   539
   

8. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?