аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ №“љ­Р €(__properties_version1.00џџџџџџџџqА__nameid_version1.0(џџџџџџџџ&аˆй­РP ј­Р__substg1.0_0E04001E*џџџџџџџџ§џџџџџџџџџџџ'0 & !"#$%ўџџџ/()*+,-.ўџџџ1ўџџџ2345ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ F№РF ‘ ЎР €(__properties_version1.00џџџџџџџџqА__nameid_version1.0(џџџџџџџџ&аˆй­РP ј­Р__substg1.0_0E04001E*џџџџџџџџџџџџџџџџ§џџџ'0 & !"#$%ўџџџ/()*+,-.ўџџџ1ўџџџ2345ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ__substg1.0_0E03001E*џџџџ__substg1.0_0E02001E*џџџџџџџџџџџџ__substg1.0_001A001E*џџџџp __substg1.0_0037001E*џџџџџџџџџџџџo__substg1.0_0E1D001E*џџџџџџџџџџџџ__substg1.0_300B0102* џџџџn__substg1.0_8003001E*џџџџџџџџџџџџm__substg1.0_800A0102* џџџџ__substg1.0_800B0102*џџџџџџџџџџџџN‚__substg1.0_800C0102* џџџџM>__substg1.0_800D0102*џџџџџџџџџџџџI__substg1.0_800E0102*џџџџEЫ__substg1.0_800F0102*џџџџџџџџџџџџъ__substg1.0_003D001E*џџџџ__substg1.0_00020102*џџџџџџџџџџџџЁ __substg1.0_00030102*џџџџ™Шўџџџўџџџўџџџўџџџўџџџ  !"#$%&'()*+,-./0123456789:;<=>?@ABCDўџџџFGHўџџџJKLўџџџўџџџOPQRSTUVWXYZ[\]^_`abcdefghijklўџџџўџџџўџџџўџџџўџџџrstuvwxyz{ўџџџўџџџўџџџўџџџўџџџA7OЕ[ЯЄАЊJUш' This is run when we click the "Split" button Function Split_Click SplitMailing end Function ' This splits up our mailing Sub SplitMailing ' To keep track of our present folder Dim fldMyFolder ' A single e-mail address in a contact Dim strMyEmail ' Keep track of a new mail message Dim objNewMessage ' A single item in our folder Dim objContact ' Keep track of our success Dim blnFoundOne blnFoundOne = false ' Get our present folder Set fldMyFolder = Application.ActiveExplorer.CurrentFolder ' Go through each item, looking for contacts... For Each objContact In fldMyFolder.Items ' Are we a contact? If objContact.Class = 40 Then ' now figure out if we have an e-mail address to use If objContact.Email1Address <> "" Then strMyEmail = objContact.Email1Address ElseIf objContact.Email2Address <> "" Then strMyEmail = objContact.Email2Address ElseIf objContact.Email3Address <> "" Then strMyEmail = objContact.Email3Address Else strMyEmail = "" End If ' Did we figure out an e-mail address If strMyEmail <> "" Then blnFoundOne = true ' Create a new message Set objNewMessage = Application.CreateItem(0) ' Copy in our values objNewMessage.To = strMyEmail objNewMessage.Subject = Item.Subject objNewMessage.Body = "Dear " & objContact.FirstName & _ "," & chr(13) & chr(13) & Item.Body objNewMessage.Send End If End If Next If Not blnFoundOne Then MsgBox "No usable contacts found in """ & fldMyFolder.name & """ folder", 48, _ "No Contacts Found" End If ' Close up shop Item.Close(1) End SubClass = 40 DCCџџџџE MaxEmails MaxEmailsCLng( [MaxEmails] ) > 1""Value Must Be a Positive Integer"D7SubjectDToџџџџl1Address <> "" Then ReplyIPM.NoteMessageREf Reply to AllIPM.NoteMessageREgForwardIPM.NoteMessageFWhReply to FolderIPM.PostPostlMessageMessagePage 6P.6Page 5P.5sDear FirstNameDear FirstNameў ш( @€€€€€€€€€€€€€РРРџџџџџџџџџџџџ‹ˆwџћ№Иw{џћИpћџpџћpћ€ џћџ€`ћџћ€``џћџ€`р`џћ€ррџћџ€ћџћ€ћџћџ€wwwwpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ№џџрџџрџџ№џџ№џџјџџјџџџџџџџџџџ˜џџјџџјџџџџџџ6 ш&(( @€€€€€€€€€€€€€РРРџџџџџџџџџџџџˆ‡83w8ћџћx‹ˆ7pˆћџћџїџ‹ˆƒpћџћџћџ{џћˆ‡ћџћџћћџћѓpџћџћџїџћџwwћџћџћїћwwџјћџћџїwћџћј{џћџћџћџћџјћџћџћџћџћјџћџћџћџћџјћџћџћџћјf`џћџћџћџјf`f`ћџћџћџћјfffћџћџћџјfff`fџџџћџћјfff`fџћџјцff`fwwwћџћјцfюцfћџћџћџјюрwf`ћџћџћџћјю`џћџћџћџјћџћџћџћјџћџћџћџћџјћџћџћџћџћјџћџћџћџћџјћџћџћџћџћјwwwwwwwwwwџџџџџџџџџрџџќјјќўўџџџ€џ€џ€Чƒ€Чџ€џ€џ€џ€џ€џ€џџџџџџџџ( Р€€€€€€€€€РРР€€€џџџџџџџџџџџџ{wˆџћ№Зˆ‹џћЗ€ћџ€џћ€ћp џћџp`ћџћp``џћџp`р`џћpррџћџpћџћpћџћџpˆˆˆˆ€џџ№рр№№јј˜јјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ9.0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ™ЪЧБск!IЎїПђ У<џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџаЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџўџџџ  ўџџџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot EntryџџџџџџџџАQъ­Р€MessageџџџџАQъ­РАQъ­Рfџџџџџџџџџџџџ&oџџџџ Žўџџџ ўџџџўџџџўџџџ ўџџџ"#$%&'()*+ўџџџ-./01234ўџџџ6ўџџџ89:;<=>?@ABCDEўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0H. G@џџЕ}чCи8 ТЏNкЮЙCЊh‡Д08K#№РF~~и—hЮІРЊ`Њ%№РF8K$№РFP›ЛPЮЕeЊ`Њ&№РFDˆ х€=2€ToлO$х€>8ToButtonд5 х€?2€CCлџ$х€@<CCButtonдх$х€A0SubjectnлЏ,ѕ €B28SubjectLabelд$х€C€Messagenд_$х€E<Splitgen\<• ђ­3,€€TahomaR ,€€To...џ4aa€Tahoma­3,€€TahomaR  ,€€CCc...a4aa€Tahoma€Hˆ(­3,!€Tahoma(€jSubject:4X!€Tahomat:ZB0 ( €SSplit E-mailaa€Tahomat:LicKeyџџџџџџџџџџџџCompObjџџџџaControlBinding џџџџџџџџџџџџxMessage-Readџџџџџџџџ АQъ­РАQъ­Рўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вq `РF@(РFџTo(РFF@`РF@(РFџTo(РFF@`РF@(РFџCC(РFF@`РF@(РFџCC(РFF@`РFР(РF7џSubject(РF7FР `РF@€(РFЬЬЬЬЬЬЬЬMessage(РFF@€D0H. ;@џџА}ѓ5|$ ТЏNкЮЙCЊh‡Д08K$№РFP›ЛPЮЕeЊ`Ња}PCЮЕeЊ`Њ8K#№РF~~и—hЮІРЊ`Њ%№РF м‹$ѕ€.22€FromлO$ѕ€02@SentX&O,ѕ €124SentLabelНННQЙ$ѕ€222€ToННлF$ѕ€422€CCННл=$х€68 Sufџџџџџџџџџџџџ!Оo џџџџ, CompObjџџџџ џџџџ5aControlBinding џџџџџџџџџџџџ7bjectНл4,ѕ €728 SubjectLabelд$х€8€MessageНд_,ѕ €924FromLabelНННдЙ(ѕ€:20ToLabelНдА(ѕ€;20CCLabelНдЇ ВBН€€TahomaR $@„Hˆ(€€ШNone!€TahomaНН(€Sent:ННН3X!€TahomaНН_-€€TahomaR _-€€TahomaR „Hˆ(€E-!€TahomaНН(€jSubject:4X!€TahomaННf4Э(€From:ННН4X!€TahomaНН(€To:Н4X!€TahomaНН(€Cc:Н4X!€TahomaННўџ џџџџMicrosoft Forms 2.0 FormEmbedded Objectє9Вq `РF@(РFBџFrom(РFBF@џџџџ`РF@(РF9Sent@(РF9F `РF@(РFџTo(РFF@џџџџ`РF@(РFџCC(РFF@џџџџ`РFР(РF7џSubject(РF7FР `РF@€(РFЬЬЬЬЬЬЬЬMessage(РFF@€џџџџDIPM.Notestg1.0_10110102@0аˆй­Р@0аˆй­РїєEEE   #& )67 c    0По?Џon €€!€љo€__substg1.0_00040102*џџџџ џџџџ˜,__substg1.0_100F0102*$џџџџ—__substg1.0_10010102*!џџџџ–__substg1.0_101E0102*)џџџџџџџџ•__substg1.0_10120102*-џџџџ”__substg1.0_10020102*џџџџџџџџџџџџ“__substg1.0_10090102*,*џџџџ’__substg1.0_100A0102*џџџџџџџџџџџџ‘__substg1.0_10110102*џџџџџџџџ __substg1.0_10100102*џџџџџџџџџџџџ__substg1.0_10130102*џџџџџџџџџџџџŽ __substg1.0_10080102*џџџџџџџџџџџџ__substg1.0_10000102*џџџџџџџџџџџџŒ__substg1.0_10030102*"џџџџ‹__substg1.0_10040102*џџџџџџџџџџџџŠ __substg1.0_100E0102*џџџџџџџџџџџџ‰__substg1.0_101A0102*(џџџџˆ__substg1.0_101B0102*џџџџџџџџџџџџ‡__substg1.0_10050102*џџџџ†__substg1.0_10060102*џџџџџџџџџџџџ…__substg1.0_101C0102*%џџџџ„__substg1.0_101D0102*џџџџџџџџџџџџƒ__substg1.0_100D0102*+#џџџџ‚__substg1.0_100B0102*/џџџџ__substg1.0_10070102*'џџџџ€__substg1.0_10140102*.џџџџ__substg1.0_10150102*џџџџ0џџџџ~__substg1.0_100C0102*џџџџџџџџџџџџ}__substg1.0_10180102*џџџџџџџџџџџџ|џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ €€€ €€ € €П €‚П €>П €П€ЫП€ъП€=EJ…5x…06…%I…+….;Mк.8€…-D…)†…2ўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџўџџџš›œžŸ ўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ…$…p…, ˆ79…!…ˆ6$…їнИЭ„…4…4…8…'…7…&…0…#…5… …6…%I…+…E…*…D…)†…2Q……p…, ˆ7P……ˆ6… :…"… :…"`…ƒ…1… A…`…ƒ…1ywordsB… їнИЭ„…4… …@………… … C…(……3… … …B………8…'…`…………………………$…4……0…#:…"0…#…$6…%7…&8…'…@…‚…/I…+p…,€…-….‚…/T…5… †…2……3„…4J…5ˆ6 ˆ7…R……E…* РFMaxEmailsKeywords……R…T………………B… … … … … @…A…P…Q……`…………………………$…4…5… 9…!:…"0…#…$6…%7…&8…'C…(D…)E…*I…+p…,€…-….‚…/x…0ƒ…1†…2……3„…4J…5ˆ6 ˆ78 РF РF