...
Forall i In toProcessDoc.Items
If i.Type = ATTACHMENT Then
'attachment
Msgbox "File name: " & i.values(0)
Else 'item is not from type attachment
End If
End Forall