Que tal grupo, buenas tardes
mi interrogante es acerca de si conocen alguna api de windows, que me permita extraer si tengo microsoft
office instalado en una pc y que numero de serie corresponde a ese office. 
Mi otra interrogante es si conocen alguna api que me diga que tipo de procesador tengo en mi pc,
ya utilice esta api Private Declare Sub GetSystemInfo Lib "kernel32" (lpSystemInfo As SYSTEM_INFO) 
pero me trae que mi procesador es 586, pero lo q yo quiero es q me diga si es Pentium 4, AMD o el procesador que tenga
y la velocidad del procesador.
si alguien tiene esta informacion le agradeceria mucho me ayudara


BUHO
====

Hola. Este código que propuso Eduardo Morcillo en las News de VB podría servirte(Supongo)
'Agrega la referencia a Microsoft WMI Scripting 
 
Function Procesador()
Dim oWMI As SWbemServices
Dim oProcs As SWbemObjectSet
Dim oProc As SWbemObject
 
   Set oWMI = GetObject("WINMGMTS:")
   Set oProcs = oWMI.instancesof("Win32_Processor")
 
   For Each oProc In oProcs
      MsgBox oProc.DeviceID & vbCrLf & vbCrLf & _
             "Fabricante: " & oProc.Manufacturer & vbCrLf & _
             "Modelo: " & oProc.Name & vbCrLf & _
             "Descripcion: " & oProc.Description & vbCrLf & _
             "Velocidad: " & oProc.CurrentClockSpeed & vbCrLf & _
             "ID: " & oProc.ProcessorID & vbCrLf & _
             "ID Unico: " & oProc.UniqueID
   Next
End Function
 
Si no tienes la referencia puedes bajar el WMI de las paginas de Microsoft.
 

Sigue el Buho:
==============
...se me olvidaba...
Esta expresion la ruta donde está Access, si es que está instalado:
SysCmd(acSysCmdAccessDir)
 
y...por añadir un poco más
 
SysCmd(acSysCmdAccessVer)  te devuelve la version de access segun estas expresiones
8.0 será Access 97
9.0 será Access 2000
10.0 será Access XP
y....supongo que 11.0 será Access 2003 (Es que no le tengo instalado)
Application.Version  esta linea dará el mismo resultado que SysCmd(acSysCmdAccessVer) es decir, la version real del Access instalado(9, 10 etc)
 
Así tambien , por ejemplo:
DBEngine.Version dará la versión de la bibioteca DAO y en cuanto a  CurrentDb.Version 
o sintaxis similares, en realidad dan la version del motor Jet.
 
Y el numero de licencia del Access instalado:
 
y creo haberla localizado en el reg, en la siguiente ruta
HKEY_LOCAL_MACHINE\Software\Microsoft\Office\Registration