Select qui ne fonctionne pas sur script VBS

Salut !
Je suis en train d'élaborer un script qui récupère des valeurs WMI pour ensuite exécuter des actions en fonction.

Je bute sur un problème. Je récupère actuellement 2 valeurs WMI, le BuildNumber et OsArchitecture.

Quand je fais un select sur le buildnumber ca fonctionne, et par contre pas sur le osarchitecture, malgré que la valeur soit exacte.

Je dois surement oublié quelque chose.

Je vous joins l'ébauche de script qui ne fait que du msgbox pour le moment.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
 
'Script pour modifier le bios de la machine
strComputer = "."
' Requete pour trouver le Modele du poste pour les drivers 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") 
Set colWMIItems = objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem",,48)
 
For Each objWMIItem in colWMIItems 
Architecture = replace((TRIM(objWMIItem.osarchitecture))," ","")
BuildNumber = objWMIItem.BuildNumber
Next
 
'msgbox("Case Architecture Windows en : " & Architecture)
 
' Variable Declaration
Dim objShell
Dim objFSO
' Variable Initialisations
Set objShell = WScript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
 
' Action du Maj du bios en fonction du Model
 
Select Case Architecture
 
Case "32Bits"
msgbox("Case Architecture Windows en : " & Architecture)
msgbox BuildNumber
Case "64Bits"
        msgbox("Case Architecture Windows en : " & Architecture)
msgbox Architecture
msgbox BuildNumber
End Select
 
 
' Action du Maj du bios en fonction du Model
Select Case BuildNumber
Case "7601"
msgbox("Case BuildNumber Windows en : " & BuildNumber)
 
Case "2600"
      msgbox("Case BuildNumber Windows en : " & BuildNumber)
 
End Select

Si vous avez une idée...

Merci d'avance.

bonjour,
il me semble que la propriété OsArchitecture est de la forme "32-bit" ou "64-bit"
et non "32 Bits" ou "64 Bits"
donc ta variable Architecture ne risque pas de prendre les valeurs attendues dans ton Select... :roll:

J'y avais pensé, mais quand tu lances le script et que tu fais une petite msgbox juste avant le select, tu verras que la valeur n'est pas sous cette forme.
Alors que effectivement, quand je lance une commande type WMIC OS get OSARCHITECTURE, j'ai bien la valeur que tu me mentionnes.

bonsoir,

rajoute un "case else" .. du style :
Code:

1 2 3 case else msgbox "<" & Architecture & ">" end select
[Edit] finalement entre-temps j'ai fait ce test ... c'est pas 32Bits mais 32bits

Ah bah mince,
Avec tous les tests que j'ai fait, j'ai pas fais gaffe à la casse...
Ca fonctionne sur mon portable de test.

Je validerai cela demain.

Merci du tuyau...