Hello!

I'm trying to populate all the installed updates\hotfixes into an array. The error I receive is "this type of array not supported in expressions". I really don't know what the problem is; I'm sure it's something simple.

Below is my code; any guidance would be much appreciated!

Code:
  
Dim $HotfixesKey, $intCount, $Hotfixes
Dim $HotfixesArray [500]
$intCount = 0
Select
  Case @PRODUCTTYPE = "Windows XP Professional"
  $HotfixesKey = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Updates\Windows XP\SP3'
  Case @PRODUCTTYPE = "Windows 2000 Professional"
  $HotfixesKey = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Updates\Windows 2000\SP5'
  Case @PRODUCTTYPE = "Windows Server 2003"
  $Hotfixeskey = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Updates\Windows Server 2003\SP2'
  Case @PRODUCTTYPE = "Windows 2000 Server"
  $Hotfixeskey = 'HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Updates\Windows 2000\SP5'
EndSelect
$Hotfixes = EnumKey($HotfixesKey, $intCount)
$HotfixArray ($intCount) = $Hotfixes
While @ERROR = 0
  ;MessageBox ($Hotfixes,"TEST",4160)
  $intCount = $intCount + 1
  $Hotfixes= EnumKey($HotfixesKey, $intCount)
  $HotfixArray ($intCount) = $Hotfixes
Loop