Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Začnite nový štandardné EXE projekt jazyka Visual Basic . Pridať užívateľom definované typy s názvom " PROCESS_INFORMATION " a " STARTUPINFO " v kóde " Form1 " , ktorá je automaticky vytvorená s novým projektom . Jedná sa o štruktúry používané vo Visual Basic pre skupiny dát a sú potrebné druhy parameter funkcie " CreateProcess " .
2
Vytvorte dve konštanty , ktoré sú aj parametre funkcie " CreateProcess " .
Const synchronizač = 1048576
Const NORMAL_PRIORITY_CLASS = & H20 &
deklarovať funkciu " CreateProcess " ako " Private Declare Function CreateProcess Lib " Kernel32 " Alias " CreateProcess " . "
sims 3
deklarovať ďalšie funkcie pre otvorenie procesu ( " Private Declare Function OpenProcess Lib " kernel32.dll " " ) , ukončiť proces ( " Private Declare Function TerminateProcess Lib " Kernel32 " " ) a zatvorte rukoväť ( " Private Declare Function CloseHandle Lib " Kernel32 " " ) .
4
Pridanie príkazového tlačidla " Form1 " a pomenujte ju " cmdOpenNotepad . " v kóde pre " cmdOpenNotepad " , definovať premennú typu . PROCESS_INFORMATION , STARTUPINFO , reťazec reprezentovať null a dva túži pre návratové hodnoty
Odovzdajte Notepad.exe funkciu " CreateProcess " takto :
CreateProcess ( sNull , " Notepad.exe " , byVal 0 & , byval 0 & 1 & , NORMAL_PRIORITY_CLASS , byVal 0 & , sNull , sinfo , pInfo )
5
Ukončiť proces s " TerminateProcess ( pInfo.hProcess , 0 a ) . "
Uzavrite držadlo na závite s " CloseHandle ( pInfo.hThread ) " a na proces s " CloseHandle ( pInfo.hProcess ) . "