Source Code untuk Mengetahui Persentase CPU yang terpakai
Berikut ini adalah cara yang teman - teman dapat gunakan untuk mengetahui jumlah persentase dari CPU yang terpakai. Cara manual untuk melihat ini adalah dengan membuka Windows Task Manager dan kemudian pilih tab Performance, di bagian CPU Usage akan terlihat presentase pemakaian CPU. Bila teman - teman ingin mendapatkan data tersebut secara otomatis melalui syntak maka dapat menggunakan syntak di bawah ini :
strLineProcessorTime=""
objWMIService = GetObject("winmgmts:\\.\root\CIMV2")
colItems = objWMIService.ExecQuery(;
"SELECT * FROM Win32_PerfFormattedData_PerfOS_Processor"+;
" WHERE Name = '_Total'")
For Each objItem In colItems
strLineProcessorTime = strLineProcessorTime + " " +;
objItem.PercentProcessorTime
endfor
strLineProcessorTime=ROUND(val(strLineProcessorTime),0)
?strLineProcessorTime
Dengan menjalankan syntak diatas, maka teman - teman akan mendapatkan jumlah nilai dari CPU yang terpakai dalam satuan persen yang sudah di tampung dalam variable strLineProcessorTime. Bila teman - teman ingin mengembangkan kreasi lagi, untuk dapat mengetahui jumlah nilai pemakaian CPU secara real time, maka bisa menaruh syntak diatas ke dalam procedure timer di kontrol timer dan kemudian menampilkan nilainya ke dalam grafik atau progress bar.
SELAMAT MENCOBA...!!
No comments :
Post a Comment