I'm sorry I don't have time to explain this, as I needed to be somewhere 10 minutes ago... but see if this gets you going. It's using a two dimensional array...

 Code:
dim $locations[1,10]


$locations[0,0]="location1"
$Locations[1,0]="c:\windows\some\obscure\path"

$locations[0,1]="location2"
$Locations[1,1]="c:\program files\some\obscure\path"

$x="location2"

for $i=1 to ubound($locations,2)
  if $x=$locations[0,$i]
    ? "X goes here:  " + $locations[1,$i]
  endif
next