Autor
|
Tema: Uso de CPU, como obtenerlo con basic? (Leído 3,449 veces)
|
yovaninu
Desconectado
Mensajes: 349
|
Me preguntaba si se puede obtener el uso del CPU para mostrarlo en por ejemplo una ventana de basic, si se puede ¿como se hace?, hay alguna API para esto?, mi intencion es que un servidor de un troyano advierta al cliente si el uso del cpu de la pc remota es demasiado alto, para que en ese caso se haga algunas tareas.
Un Saludo.
|
|
|
En línea
|
|
|
|
BenRu
The Prodigy
Desconectado
Mensajes: 4.006
|
Option Explicit 'Función que consulta el porcentaje de uso Private Function USO_CPU() As Integer Dim obj_WMI As Object, obj_INFO_CPU As Object, Porcentaje As Integer Set obj_WMI = GetObject("winmgmts:").InstancesOf("Win32_Processor") For Each obj_INFO_CPU In obj_WMI If obj_WMI.Count > 1 Then Porcentaje = Porcentaje + obj_INFO_CPU.LoadPercentage Else Porcentaje = obj_INFO_CPU.LoadPercentage End If Next If obj_WMI.Count > 1 Then Porcentaje = Porcentaje \ obj_WMI.Count Set obj_WMI = Nothing Set obj_INFO_CPU = Nothing End If USO_CPU = Porcentaje Exit Function End Function Private Sub Form_Load() Timer1.Interval = 1000 Label1.Caption = " Uso del CPU: " End Sub Private Sub Timer1_Timer() 'Mostramos el porcentaje de consumo del CPU Label1.Caption = Label1.Caption & USO_CPU & " %" End Sub
|
|
|
En línea
|
|
|
|
|
BenRu
The Prodigy
Desconectado
Mensajes: 4.006
|
Mmm...lo tenia en el disco duro, no sabía la fuente. Supongo que buscando un poco en google, saldrá. Un saludo
|
|
|
En línea
|
|
|
|
SERBice
|
jaja, es curioso, hace un tiempo cuando necesitaba esto no lo encontraba....
¿alguein sabe com hacer para que no se pause el programa al obtener el porcentaje en uso del micro?
|
|
|
En línea
|
|
|
|
yovaninu
Desconectado
Mensajes: 349
|
para no abrir otro tema, y ¿para ver el uso de PF?, algun code, es decir uso de RAM o del archivo de paginacion, por que eso significa PF o no?
saludos
|
|
|
En línea
|
|
|
|
SERBice
|
yo teng, en algun manual pro ahi guardado un code usando apis pra obtener e usod e ram, la ram total y no se que mas.... si queirs te lo busco, lo que no recuerdo es si funcionaba con la ram fisica, cno el PF o cno ambos juntos.
|
|
|
En línea
|
|
|
|
|
|