[VB] proces stoppen

[rajackar]

Ik moet met VB een proces stoppen aan de hand van het pid. Heeft iemand een idee (het liefst ook een stukje voorbeeldcode) want ik kom er echt niet meer uit.

[Verwijderd]

Ga eens op zoek naar de API TerminateProcess op http://www.allapi.net

[Crazy D]

Neem hier eens een kijkje: http://www.thescarms.com/vbasic/VBProcessRelated.asp

_{10 seconden met google}

[Uiligheid]

D2k slaapt zeker... (no flame intended..)

[rajackar]

Help!
het lukt nog steeds niet

[Uiligheid]

iets specifieker graag. wat werkt precies niet? Post je code, geef de foutmeldingen...
Wij kunnen dit ook allemaal niet op afstand ruiken...

[rajackar]

Ik heb nog steeds geen goede manier gevonden om een process aan de hand van het pid te killen. Als iemand iets weet maken jullie me heel gelukkig.

[Sponge]

http://www.planetsourcecode.com/vb/scripts/BrowseCategoryOrSearchResults.asp?optSort=Alphabetical&lngWId=1&blnWorldDropDownUsed=TRUE&txtMaxNumberOfEntriesPerPage=10&blnResetAllVariables=TRUE&txtCriteria=process+list

[Minder dan 1 minuut zoeken...]

[Verwijderd]

Het mooi maken van je url is ook minder dan 'n minut werk overigens

[.oisyn]

code:

Dim h as Long

h = OpenProcess (PROCESS_TERMINATE, 0, pid)
TerminateProcess h, 0

OpenProcess en TerminateProcess zijn win32 API functies, dus dan moet je even de declaraties daarvan voor vb opzoeken.
Open de API Text Viewer (die staat onder tools), en open het bestand WIN32API.TXT, en selecteer Declares

dan zoek je even OpenProcess en TerminateProcess, wat dit oplevert:

code:

Public Declare Function OpenProcess Lib "kernel32" Alias
    "OpenProcess" (ByVal dwDesiredAccess As Long, ByVal
    bInheritHandle As Long, ByVal dwProcessId As Long)
    As Long

Public Declare Function TerminateProcess Lib "kernel32" Alias
    "TerminateProcess" (ByVal hProcess As Long, ByVal uExitCode
    As Long) As Long

dan heb je nog even de definitie PROCESS_TERMINATE nodig... hmm zo te zien staat hij niet in WIN32API.TXT (onder Costants dus), dus neem maar van mij aan dat dat 1 moet zijn, dus

code:

Public Const PROCESS_TERMINATE = 1

.edit: Nou moet je alleen nog de handle weer sluiten, dat doe je met de functie CloseHandle, en nou mag jij uitzoeken hoe dat werkt

[Verwijderd]

VB is niet echt "process-minded" . . ik weet niet wat je wilt bereiken met je code, maar alles wat je in VB doet met processes/multi-tasking e.d. zul je dus met API-calls voor elkaar moeten krijgen . .. (of je moet met active-X spul gaan werken . ..)

[.oisyn]

Skizmo: is dat een reactie op mij?
Mijn code maakt gebruik van win32 API functies, dus ik snap je niet helemaal

[muba]

Dus was het waarschijnlijk geen reactie op jouw. Hoh.

[.oisyn]

Op zaterdag 04 mei 2002 22:49 schreef MUBA het volgende:
Dus was het waarschijnlijk geen reactie op jouw. Hoh.

true, maar hij had het over 'je code', en verder heeft niemand anders code gepost

[muba]

Op zondag 05 mei 2002 00:50 schreef .oisyn het volgende:

true, maar hij had het over 'je code', en verder heeft niemand anders code gepost

jup, da's waar... maar ik denk dat hij toch de OP bedoelde ;D
Of eigenlijk weet ik dat wel zeker... beter zou zijn te zeggen "programma" ipv "code" maar uiteindelijk komt het op het zelfde neer

[Verwijderd]

nee . .was reactie op de de vraag

[rajackar]

Ik durf het bijna niet te vragen maar ik krijg nog een error bij dit stuk code:

RegisterServiceProcess GetCurrentProcessId, 1 'Hide app

runtime error 453
can't find dll entrypoint registerserviceprocess in kernl32

Voor de rest alvast enorm bedankt

[.oisyn]

RegisterServiceProcess zijn win9x/me specifieke functies... gebruik je toevallig winnt/2k/xp?


(zie ook wat de msdn hierover zegt)

[rajackar]

Ja idd. ik gebruik het onder 2k