Voy a probar tu programa para ver de que se trata... Saludos.

Me jode el día y la semana los días lunes, martes, miércoles y jueves; pero el viernes, sábado y domingo son los días que me alegran jaja. Viva la jodaaaaaaaaaaaaaaaaaaaa, la polarizada, el fernet y las mujeres 

A los 4, cuando empecé a leer... Jaja
Sí, sí, soy muy groso 

Probá con otro navegador...

Encontré la solución, y no solamente pude sacar la información del BIOS y del CPU sino de todo el hardware. Al final, es muy fácil usar WMI y hacer las consultas como se lo haría con SQL.

El código que revisé está en C# pero más abajo les dejo en VB.NET (disculpen, no me di cuenta de copiar la fuente y se me acabó el tiempo del ciber). Lo edité un poco, pero funciona perfectamente, no es muy complicado entenderlo  :

    Private Sub InfoHardware(ByVal clave As String)
        Dim searcher As New ManagementObjectSearcher("select * from " + clave)
        ListView1.Items.Clear()
        Dim listv As ListViewGroup
        Try
            For Each objeto As ManagementObject In searcher.[Get]()
                Try
                    listv = ListView1.Groups.Add(objeto("Name").ToString(), objeto("Name").ToString())
                Catch
 
 
                    listv = ListView1.Groups.Add(objeto("Name").ToString(), objeto("Name").ToString())
                End Try
                If objeto.Properties.Count <= 0 Then
                    MessageBox.Show("No hay información al respecto", "Atención")
                    Return
                End If
 
                For Each PropiedadObj As PropertyData In objeto.Properties
                    Dim listViewItem1 As New ListViewItem(listv)
                    listViewItem1.Text = PropiedadObj.Name
 
                    If PropiedadObj.Value IsNot Nothing AndAlso PropiedadObj.Value.ToString() <> "" Then
                        listViewItem1.SubItems.Add(PropiedadObj.Value.ToString())
                        ListView1.Items.Add(listViewItem1)
                    Else
 
                    End If
                Next
            Next
    End Sub

Solo es cuestión de enviar como parámetro cualquiera de las clases Win32 y listo. Aquí hay un listado completo de las clases Win32 con sus especifiaciones (en inglés). http://msdn.microsoft.com/en-us/library/aa394084(v=vs.85).aspx

Saludos.

Gracias Novlucker. Saludos.

Estoy intentando usar WMI para sacar los datos de Numero de serie de CPU o ID y de la BIOS, pero no me funciona...
¿Alguie me puede ayudar?

Lo que hice es esto:

Imports System
Imports System.Management
Imports System.Windows.Forms
Public Class Form1
    Private Sub Form1_Load( _
              ByVal sender As System.Object, _
              ByVal e As System.EventArgs) Handles MyBase.Load
 
        ' obtener numero de serie bios
        Dim consultaNumSerieBios As String = "SELECT * FROM Win32_BIOS"
        Dim objNumBios As New ManagementObjectSearcher(consultaNumSerieBios)
        For Each info As ManagementObject In objNumBios.Get()
            infoNumBIOS.Text = info.Properties("SerialNumber").ToString
 
        Next info
End Sub
End Class

¿Cuál es el error que estoy cometiendo?

Bueno, en este código solo intento obtener el número de serie de BIOS pero me faltaría el del CPU también, je.
Gracias.

Este me gusta más jeje, no lo conocía. Ahora puedo hacer plantillas para joomla desde aquí. Juntaré plata y lo compraré 

Usa Regshot, nunca me falló en cuanto a los cambios en el registro.

Sí, justamente ahora estoy usando una de esas ¿cómo hacen para saber esas cosa¿ :O :O

Naaa, no hay avances entonces, estas son las contraseñas más inseguras de siempre.