FOR x = 1 TO mycount thisBox = loNS.Folders[1].Folders[x] ? x,thisBox.name, thisBox.Folders.Count endfor ** say the 28th folders within the PErsonal Folders is thus thisBox = loNS.Folders[1].Folders[28] ** and it has sub folders ?thisBox.Folders.Count ** the 2nd of which has stuff in it ? thisBox.Folders[2].count ** looking at the 2nd thismail = thisBox.Folders[2] ? thismail.Items ** it has this many emails in it ? thismail.Items.Count