1 |
On Error Resume Next |
2 |
Set objWMIService = GetObject( "winmgmts://./root/CIMV2" ) |
3 |
Set colItems = objWMIService.ExecQuery( "SELECT * FROM Win32_Processor", "WQL", 48 ) |
4 |
For Each objItem In colItems |
5 |
architecture = objItem.Architecture |
6 |
level = objItem.Level |
7 |
Next |
8 |
'Architecture 9 means an x86-64 processor |
9 |
If architecture = 9 Then WScript.Echo "The x86-64 edition of Clonezilla-SysRescCD is recommended for you." |
10 |
If architecture <> 9 Then |
11 |
'Architecture 0 means an IA-32 processor |
12 |
If architecture = 0 Then |
13 |
If level >= 6 Then WScript.Echo "The i686 edition of Clonezilla-SysRescCD is recommended for you." |
14 |
ElseIf level >= 4 Then WScript.Echo "The i486 edition of Clonezilla-SysRescCD is recommended for you." |
15 |
Else WScript.Echo "Your computer is unable to run any edition of Clonezilla-SysRescCD." |
16 |
End If |
17 |
End If |
18 |
'Neither x86-64 nor IA-32: unable to run x86 code |
19 |
If architecture <> 9 Then |
20 |
If architecture <> 0 Then |
21 |
WScript.Echo "Your computer is unable to run any edition of Clonezilla-SysRescCD." |
22 |
End If |
23 |
End If |