vb Code:
  1. Item(ItemNum).Name = IO.File.ReadAllText(Filename)