Hola comunidad, voy a intentar de expresar de la mejor manera mi idea. Primero de todo no es ningun proyecto, nada relacionado con la facultad, es solo para uso personal.
Okey, mi idea es la siguiente:
Monitorear la temperatura de otra computadora de mi casa desde la mía.
Como pienso hacerlo?
Primero voy a crear 2 proyectos, uno va a ser el "cliente" y otro el "servidor".
El cliente se va a ejecutar desde la computadora que quiero monitorear.
El servidor se ejecuta en mi computadora.
La función del cliente es enviarme información de la temperatura de la PC.
La función del servidor es mostrármela a mi.
Mi problema es como saber la temperatura de una computadora en Visual Basic.
Con winsock no tengo muchos problemas, se enviar información.
Si alguno puede sacarme este problema se lo agradecería.
SAludos
aca porai te ayudo
http://www.elguruprogramador.com.ar/foros/tema/89
salkudos
Yo creo que Seba y el coco publicaron algo respecto a eso... Si lo encuentro lo posteo...
lo que dice ssccaann -> http://www.leandroascierto.com.ar/foro/index.php?topic=8.0
Dim wbemServices As Object
Dim wbemObject As Object
Dim wbemObjectSet As Object
Dim stemp As Single
Set wbemServices = GetObject("winmgmts:" & "\localhost
ootwmi")
Set wbemObjectSet = wbemServices.InstancesOf("MSAcpi_ThermalZoneTemperature")
For Each wbemObject In wbemObjectSet
stemp = (wbemObject.CurrentTemperature - 2732) / 10
Next
Set wbemServices = Nothing
Set wbemObjectSet = Nothing
Me da un error, me pone que wbemObjectset = "nothing"
El cartel de error me dice:
"Error '-2147217375 (80041021' en tiempo de ejecución:
Error de automtización"
Alguna idea?
con esto obtenes la temperatura actual del disco duro...
Obtener temperatura del Dico duro (http://foro.elhacker.net/programacion_vb/temperatura_del_disco-t216033.0.html)
el tema es que WMI no anda siempre..segun los permisos...
saludos.