Set OSConfig= GetObject("winmgmts:").InstancesOf("Win32_Processor") For Each System In OSConfig For each Prop in System.Properties_ If (Not IsNull(Prop.Value) ) Then If(Len(Prop.Name)<8) Then WScript.Echo Prop.Name & vbTab &vbTab & vbTab &vbTab & Prop.Value ElseIf (Len(Prop.Name)<16) Then WScript.Echo Prop.Name & vbTab &vbTab & vbTab & Prop.Value ElseIf (Len(Prop.Name)<24) Then WScript.Echo Prop.Name & vbTab &vbTab & Prop.Value Else WScript.Echo Prop.Name & vbTab & Prop.Value End If End If on error resume next Next WScript.Echo vbCrLf Next