Numéro série carte mère

Version imprimable

06/02/2007, 20h25
guen

Numéro série carte mère

Bonjour

Exsite t'il un moyen d'obtenir en vba le numéro de série de la carte mère de l'oridanteur sur lequel s'exécute ACCESS (grâce à une API peut être ?)
Merci

Bonjour,

En utilisant la référence Microsoft WMI Scripting :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Public Function NumSerieCarteMere() As String
 
 
 
Dim oWmi As WbemScripting.SWbemServicesEx
Dim oOS As WbemScripting.SWbemObjectSet
Dim oObj As WbemScripting.SWbemObject
Set oWmi = GetObject("WinMgmts:")
 
Set oOS = oWmi.InstancesOf("Win32_BaseBoard")
 
For Each oObj In oOS
  NumSerieCarteMere = NumSerieCarteMere & oObj.SerialNumber
Next
 
End Function

Peut être que cela correspondra à vos attentes ;)

06/02/2007, 22h47
guen

VOus êtes trop fort !! c'est ça ! et si j'abuse...le numéro du chassis peut être obtenu de la même façon je suppose !
Merci en tou cas !