Usuario
obtener id del procesador de un computador en red

Pregunta
-
quisiera saber si hay un código o alguna aplicación que me ayude a obtener el id del procesador o la
mac de un equipo que esta en red.
es que tengo un bd en access 2010 dividida formularios en un equipo y los datos en el servidor entonces quisiera saber el id del procesador del servidor que se encuentra en otro lado.
gracias.
- Editado rfhb85 jueves, 23 de octubre de 2014 15:10
Todas las respuestas
-
-
-
Yo te he respondido ya en http://www.mvp-access.com/foro/obtener-id-del-procesador-de-un-computador-en-red_topic79785.html repostear no suele ser la solución, buscar (Que es lo que he hecho yo) si que lo es.
Public Sub InformacionProcesador(Optional strOrdenador As String = ".") Dim objWMIService As Object, _ Propiedad As Object, _ Propiedades As Object On Error GoTo InformacionProcesador_TratamientoErrores Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strOrdenador & "\root\cimv2") Set Propiedades = objWMIService.ExecQuery("Select * from Win32_Processor") For Each Propiedad In Propiedades Debug.Print "Fabricante: " & Propiedad.Manufacturer Debug.Print "Nombre: " & Propiedad.Name Debug.Print "Descripción: " & Propiedad.Description Debug.Print "ID Procesador: " & Propiedad.ProcessorID Debug.Print "Arquitectura: " & Propiedad.Architecture Debug.Print "AddressWidth: " & Propiedad.AddressWidth Debug.Print "Número de Cores: " & Propiedad.NumberOfCores Debug.Print "DataWidth: " & Propiedad.DataWidth Debug.Print "Familia: " & Propiedad.Family Debug.Print "Velocidad Maxima Reloj: " & Propiedad.MaxClockSpeed Next InformacionProcesador_Salir: Set objWMIService = Nothing On Error GoTo 0 Exit Sub InformacionProcesador_TratamientoErrores: MsgBox "Error " & Err & " en proc.: InformacionProcesador del Módulo: " & Application.VBE.ActiveCodePane.CodeModule.Name & " (" & Err.Description & ")", vbCritical + vbOKOnly, DBEngine(0)(0).Properties("AppTitle") Resume InformacionProcesador_Salir End Sub ' InformacionProcesador
Saludos a todos desde Huelva Emilio http://www.mvp-access.es/emilio/
-