Advantages of the Visual Basic Ecco Toolkit

The Visual Basic Ecco Toolkit . . .

        MyItem.Done = Now
        Print #1, MyItem.FullName + vbCrlf + "Phone: " + MyItem.BusPhone
        Set MyFolder = New EccoFolder
        MyFolder.Name = "PhoneBook"
        Set MyFriends = MyFolder.Items.Find("Friend = True")
        Set MyYoungFriends = MyFriends.Find("Birthday > 1/1/60")
        For Each MyItem in MyYoungFriends
            Print #1, MyItem.FullName
            Print #1, MyItem.HomeAddress
            Print #1, MyItem.HomePhone
            Print #1
        Next