![]() |
![]() |
| Paypal | FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
|||||||
| Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
|
Herramientas | Buscar en Tema | Desplegado |
|
|
|
#1
|
||||
|
||||
|
Cita:
Código:
wmic baseboard get serialnumber |
|
#2
|
|||
|
|||
|
A ver este tema me interesa. Lo que yo haría es intentar hablar con un emisor de certificados de dispositivos por ejemplo IZENPE para que te aconseje por que lo que yo pienso puedo estar equivicado:
El certificado de dispositivo se solicita sobre un número de serie y el certificado no va a comprobar que corresponde, pero si será necesario para posibles inspecciones que garantice un número de serie único y sigo pensando que te puede servir la MAC, y si te da 2 o as seguramente puedas identificarlas por software en un orden y puedes coger siempre la primera. |
|
#3
|
|||
|
|||
|
Cita:
De echo, he creado un certificado de dispositivo de Izenpe con esta serie. |
|
#4
|
|||
|
|||
|
Gracias. Pues ya le has respondido y muy interesante.
|
|
#5
|
||||
|
||||
|
Cita:
A la hora de pedir el certificado, a Izenpe por ejemplo, comunicará el nº de serie que desees, BIOS o placa. En nuestro caso, si el certificado de la firma es de dispositivo comprobamos que coincida con alguno de los dos, BIOS o placa. En caso contrario lanzamos un error. |
|
#6
|
|||
|
|||
|
Esta es la función en VB que uso para leer Identicador y serie procesador, es algo mas completo para evitar la duplicidad.
Código:
Public Function GetOsBitness() As String
Dim ProcessorSet As Object
Dim WMI As Object
Dim CPU As Object
Dim obj As Object
Dim objs As Object
Set WMI = GetObject("WinMgmts:")
Set objs = WMI.InstancesOf("WIN32_BaseBoard")
For Each obj In objs
procid = procid & obj.SerialNumber
If procid < objs.Count Then procid = procid & "."
Next
MBSerialNumber = procid
procid = LTrim$(procid)
procid = RTrim$(procid)
Set ProcessorSet = GetObject("WinMgmts:"). _
ExecQuery("SELECT * FROM Win32_Processor")
For Each CPU In ProcessorSet
GetOsBitness = CStr(CPU.AddressWidth)
Next
GetOsBitness = procid & " " & GetOsBitness
End Function
|
|
#7
|
|||
|
|||
|
Si lo necesitas te hago un exe que te genere un fichero
|
![]() |
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
Temas Similares
|
||||
| Tema | Autor | Foro | Respuestas | Último mensaje |
| SII -Nuevo sistema de la Agencia Tributaria española de envío de datos vía Webservice | newtron | Internet | 3716 | 19-01-2026 20:01:34 |
| Como utilizar la ayuda del nuevo Sistema Operativo | gluglu | Humor | 3 | 24-09-2007 09:39:05 |
| Aplicacion Agencia De Viajes | ArdiIIa | Varios | 9 | 20-01-2007 16:49:53 |
| El Vasco Aguirre | Al González | La Taberna | 5 | 26-05-2006 09:22:28 |
| Microsoft ha lanzado su nuevo sistema operativo | DarkByte | Humor | 0 | 25-01-2004 09:21:14 |
|