![]() |
|
|
knappens onclick event handleren kalder en VBScript -funktion navngivne ListProcesses , der henter en liste over kørende processer og gemmer det i tekstområdet .
VBScript Code
følgende kode går efter dokumentets første script -tag og opsætter ListProcesses sub : Hej
Sub ListProcesseswinObjectA = " winmgmts : " winObjectB = " { impersonationLevel = udgive } \\ \\ ! . " & "\\ root \\ cimv2 " Set winObject = GetObject ( winObjectA & winObjectB )
win32Query = " Select * fra Win32_Process "
den første sætning gemmer en reference til Windows Management Instrumentation -system , der holder processen information. ImpersonationLevel , ses på næste sætning giver WMI at udgive prøvelse for den aktuelle bruger og få adgang til WMI data . Den næste oversigt sammenkæder de to foregående variabler og gemmer dem i objektet opkaldt winObject . Den win32Query variable holder søgestrengen bruges til at hente proces information fra WMI . Du kan hente listen over kørende processer ved at udføre denne objekts ExecQuery metode , som vist nedenfor : Hej
Set processList = winObject.ExecQuery ( win32Query )
Befolke Textarea
< br >
processList objektet indeholder proces egenskaber, såsom billedtekst og ProcessID , som du kan finde nyttige. Du kan få vist disse egenskaber i textarea kontrol ved at loope gennem punkterne i processList som vist i følgende eksempel:
resultater = "" For Each proces processListresults = resultater & process.Caption & vbLf & process.ProcessIDNextEnd Sub
"For hver" loop gemmer hver proces s Caption og ProcessID i de variable navngivne resultater. Når sløjfen ender , koden steder, der snor inde i textarea kontrol.
Kører programmet
p Du kan gemme dokumentet med en . Vbs fil forlængelse , finder det i Windows Stifinder, og dobbeltklik på den . Et vindue åbnes og viser en tom textarea kontrol og en knap , når du klikker på knappen, koden kører og viser Billedtekster og ProcessIDs for behandling , der kører på din computer. Du kan få vist andre procesparametre egenskaber ved at tilføje dem til den erklæring, der sætter resultaterne variabel. En liste over de egenskaber der findes på Microsofts Win32_Process Class webside. Følgende eksempel tilføjer Priority ejendom til displayet i textarea styring:
resultater = resultater & process.Caption & vbLf & process.ProcessID & vbLf process.Priority
vbLF værdi sikrer, at oplysninger om hver proces er placeret på en separat linje i textarea .
næste : Sådan testes Linkage Bestået i COBOL |
|
|
Copyright © Computer Viden http://www.computerdk.com |