��ࡱ�>�� ����p���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������J0< ���� !"#$%&'()*+,-./����D23456789:;����=>?@ABCEIFGHKP����LMNO��RSTUVWXYZ[\]����_`abcdefghijklmno��������rstuvwxyz{|}~�Root Entry�������� �FSw�٧�0SummaryInformation(����DocumentSummaryInformation8�������������Macros Шj�٧�Шj�٧����� ��������!"#$%&'()*+,-./����123456789:;<=>?����ABCDEFGHIJKLMNOPQRSTUVWXY����[\]����_`abcdefg����ijklmnopqrstu����wxyz{����}~�����������Oh��+'��0���������   , 8DLT\��ck�e�e�NRJeGovuser@|��P@�`Ҍ��@��٧�@\lU���s2WPS Office WWO_wpscloud_20220531170121-5ca797624d����՜.��+,��D��՜.��+,����H�PXpx� ���RJSOFT� �0t�|��KSOProductBuildVerICV�2052-11.8.2.12011!95DF27552C6C4156BA163D44D70EC2DAVBA�������� Шj�٧�Шj�٧�dir�������������Common�����)RJeGov�������������%���0*� pH"d�D�����<@j= B �ݠf� J< r�stdole>stdo�le h%^*\G{00�020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.tlb#OLE Automation`�Nor(mal�EN�Cr�ma�F �b �*\C j �m�!Offi"c�gOf�i*c�g����!G{2DF8D04C-5BFA-10�1B-BDE5�gTAA�e4�2�g2�gProgram Files (x86)\Kingsoft\WPS �:\11.8.2.12011\o�D6\ksoapi.dll#`Micro 16.0 Object Library@(�@MSF�Ds>BSFDEs$3@�fD452EE1-E0D8F�2A-8-02608C4D0BB4�fFM2`0.DLLH'B ��s�&/;"1���~B� �00}t#0�#� ��504�� ��AC2A38D51-F0�74B9B-AF6D-0A2590988F13�6Users\u@\AppData\Local\Temp\VBE�\T.exd�;@!��.E ���.`�M ��A�B������ThisDocument(G�T@�i�sD@kcu���en@�� 2��` H�1#{�p#�,����""+��{�RJeGovG� (RJ aG`v��2�� Z� ��!� �rfrm�Sel�YG��f�xS���cBm�2�/�� -��#(��Com�mon�C m`/~o`/�����g�@��U"� �A�DialogG��i�D�a��og`.+26���@��7�`� ������-a ��U"����� z��CopyFileA������$��������������x��ME�����������������������������������������������������������������������������������������������������������������������������������������(0����6 ����< ��<������x� +r�p������������@�� i�t����������`�i�v������������i�x�����������������2P ����@���������`� ����@���������dx ����@���������|� ����@���������.���� �� �� @��������t_ %�������� ��+ `������������� ���� �i�����������������`�������������`�������������+��`������������` �����i�����������������`�>����������+�0`������������������i���������������i�����������������b`������������ J+��`������������p�����i�������������� `i�����������������P`������������!N+�``�����������������i������������(�����i���������������������`������������f���+B�`������������������i������������������i���������������������`����������������+b�`������������8���� �i������������X�����i���������������������`���������������� F�`������������� �����i������������������i��������������������� ����������@����0:����(`������������`������������`����������������� � +��`���������������� �i������������0�����i������������P�����i�����������������`����������������+H `����������������� �I���������� �����������`����������������`������������`������������`�F����������+�� `����������������� �)�������������%i�����������������+�x `������������ ���� �)����������0 8 �%i������������X �I���������� ������� ����� `������������� ���� �)����������� � �%i�����������������ʐj( hH���������������4�����@���������\�����@���������j����@���������~@����@��������������Hx ������������� �@����` P ��������� �������������0x �������������( ������p������p������������������p ���� ������������x ����@��������������������` (����������������������������%� �ݠf*\R0*#1c$*\Rffff*0<66a0dd87������ ����H� � �����$�(8� `�"��(��$��*��(�H�"h� ����B� ��������������T(��� ����B� ���� ����"�� ����"�� �&(� P�h�p�x����� ����B� �������������� ����B� ���� �(�H�P� ����B� X�`�h�p�x� ���� ����B� �������������� ����B� ����� �@�H� ����� (PB� x����� ������������"�0�@�P�X�h����� ����B� ������ ��D���0�8�@� ����B� H�P�X�`�h�p�����2��f�� P�`� h� x����������������� �� �� � � � � ����B�  �( �0 �H �P �X � ����B� ` �h �p �� �� �� �� � ����B� � �� �� �� �� �� �� � ����� ����� ����� ����� ����� ����� ��������� ���x�]$�t_� �1���ص�ģ���ǰ׺����] �( �1����ģ���Ŀ���ļ�����·��] ���1����ģ���URL��ַ] �P �1�ĵ�ʹ�õ��µ��ļ���%] ���1�ĵ�����ʹ�õ��µ�ģ������] ���1�ĵ�ʹ�õ�ԭ�����ļ���,] �x �1�ĵ�ʹ�õ�ԭ����wordģ�����ƣ�����] ��1ԭ�������ı�־ J] �� �1 �������ı�־ J] �@�1�Զ�����ģ����Ϣ��־��p��]���? ��\$�'�T� ��\$�'�B �� �� ��!$ �'��Dmb k��� �� \rjoawork.bakA@��  � ��\rjoawork.bak\ ��yyyymmddhhnnss$� ��$r'i��x� �h tB@X]�� � � � � $~�� �A@�k�� ��\*.* � � $~'> >�� ��\ >$� �� � ��\ >A@�k��� ~'>���� t!��'�i��`��]� � �$�'� �� � �� $ �'�k��i���0]�� � �$�'� �� � � � $ �'�k���i�����]�H_��� �'� �� � ��'� �� �i��X�`]�� � ��'� �� � �� $ �'Bk��i����]�x � ��'� �� � � � $ �'bk���i����"��һ���ַ������ָ����ֳɼ����ַ�����]�]�H�`�x��ӵ�һ����ĸ��ʼ�Ҭ'�_��8 � � ��'� ���Gxj� ��@�� � � � � $ � �+� � � '� �� '������ ��@�� � �$ � �+� �'Fi��p��]�p� � ��'� �� b � �� $� � � � � � � $ ^ '� � � � ��'����� �'�i�����]��]�]�]�0� F�� �� � F�$ �'� �$�'� ����G� '�j�.�԰�ǿո������⴦���  ��:  ��/  ��[  ��@  ��{  ��` � � �'�d��� �$ �'� ���KT�%0 �'��KT�% �'��KT�%u0 �'��KT�%u �'�n�� � �'�k������ �'i����H�>F � �%"'�z����>�i������>F � � �B@&�'�z��h�>`i��X�x �>F � �B@��'�z��(�> i������������Attribute VB_Name = "Common" Option Explicit Declare FuncpCopyFile Lib "kernel32" Alias��=�rLeft(�� , "8\")��Righ6If Lena) > 3�2 Then !C� � Mid$E, 33� End IfC@'rOt�herDa����B&�rjoa�@k�.bak��� G&`~%�a C�\" _� & Forma�t(Now ymmddhhnn@ss") &E),� False@�E6!��7n�8�3�8O@�rror Re�su@�Nex`���Err.� ��=!h?�=�0` �, vb�ectory +�SystemBHidde�n)A�",5Mk�/�� I3s�= �� �#"\*.*�"O CWhaȃ�<> "7���4BD`�Time� "C!/) < `3 - 4�!Kil�l��cAI���end#8�$(!0Number� �0@�Ǧj���O0MainIsSe>p�bB��c!=intPo��IntegerC�= I�n Rev'� �~�� `!�� 9@e �R9- 1�T�qo/@�1&Bo���o0�os�oooo�y p�H�j+�LQƑz?f��CheckO� 8tchl1��ln�gDxo�RD /���(�+ �1B �Ma@� `Loop 3:�>� 0 �nS�P�#�M������ �-��-��-ro�-� �m���-q�-���o��@+,4��� $)��� 47�)) Or _��P 9164�123� 96� �2ߊ�M�p���&�v�E�� ElseMA�epHex$6HR@3Select Ca|seEn � 1�@��u"%0"n &� 2�3��u^ 4]� ��K'J�g�KIfdNe|xtD�y�4& xG@etItem u`e(col�!tCLol�8 �, �Nxame����M �O n ErrwGo�v@handle�:� `C .ar�A $DExit��}6�S���b �B�oolea��M���Add�gB²�iTru�j�O�Del�5��A�5��et.Re�movee)��>�5��e���������T�����������������������������x��ME������������� ����������������������������������������������������������������������������������������������������������������������������(<���<���6 ����<����������H ��`�����������������������`��������������`��������������`������������x ����������� % ��`����������������������� �(`����������������������� |h`���������������������� � ��`���������������������� � �`����������������������� @`�����������������������`��������� ��� �`����������������������� "�`�����������������������`�$����������`��������� ��9� ,� `���������������������� &&�`�$��������������`��������� ��//// �.��������x////% �0���������////% �� `���������������������� � �  `���������������������� � 8` `���������������������� � <���� `���������������������� �`�>����������ectT����`�( @�����������������������h��������������������8��������������%�������������������������`����������������������������������������������������������ݠf$*\Rffff*0:66a0dd87������ ����"���� �8�H�X�.h���,����F��(�8�H� X�x����� ����"��������� ������������ ����� ����"�� �(� 0�8�@�H�P�X� `�h�p�x� ����"��� �������������� ����"����������������� �(� ����"�0� 8�H� ����� JP� 0�� J�"� �(� "0� &X������� ����*������ ���� ����"� �(�0�8� @�H�*P����� �������� ����"����� �� (��  �@�H� �����P�h�p� x��������������0�H� P�X�`�h� ����"�p�x����� ����� $���� ������ $� �����0�H�P� X�`�h����������� �( � 0 �8 �@ � ����� (H �&p � � � � � � �&� � � � � "� � � �0 � ����"�8 �@ � H �X � ����� :` � ����"�� �� �� � ����"�� �� �>� � �0 �P �X � ` � h � x � � � � � ����� ��������� ���x��h ��]�@�X�px T!�!�'� T!�!�'� T!�!'� T!����InsertFileStart�5TB@& �$�B@� T!���� InsertFileEnd�5TB@&]����InsertFileStart7T!V� InsertFileEnd7T!�7�.�ec � �!�( � �!�(� � �!�(��InsertFileStart7TB@�� InsertFileEnd7TB@�!q��`o��X��A@� ��5��A@�k��(�9��9��9�5��A@�k���q���o����� ��5��A@�k����9��9��9�5��A@�k���q���o����(�SetRevisionsOption ���9��9��9�q��8o��0�h �� �9� �9� 9 �9 9 �9  9  9q���o����� B@B�����o����C///////////////////////////////////////////////////////////////////������* �����Ǻ�ͷ��صIJ����C///////////////////////////////////////////////////////////////////�������SubjectText�ǡ��ļ����⡱�����DocMarkLine�ǡ��ĺš�����ĺ�����]�( �5��A@�k��X � SubjectText7�!�!�!�(ִӡ �� DocMarkLine7�(�5��A@�k���q���o����@�� �5��A@�k��� � SubjectText7�!�!�!�(�� �� DocMarkLine7�(���5��A@�k��Hq��@o��8���(�KeywordText�ǡ�����ʡ����!KeywordLine�ǡ�����ʡ�����������CopySendText�ǡ����͡���]��]���33333�$@$&'$ �5��A@�k��x�� KeywordText7�. !( $ ((�� KeywordLine7�.���� !( $ ((���� CopySendText7�. !( $ (( !* $ (*5��A@�k���q���o�������]�0]�H������������Ϊ��С��ʱ����С]�`�� CopySendText %�.. .��G|j .!*� �G|j�''''''''''''''''''''''''''''''�����33333�$@$&'$ �5��A@�k����� KeywordText7�.���� !( $ ((�� KeywordLine7�.% !( $ ((Te�� CopySendText7�.ord !( $ ((ap !* $ (*5��A@�k���q����"�������ı���Ϊ�յ�ʱ������������߶ CopySendText %�!*� ���]���� CopySendLine %�.0 0���� 0!(� KeywordLine %�((��k��k���o������� 4� B@2o������� B@6` o����3===================================================%� � T!:%"!A@r� o��0�`]����������������֣�� ���Ķ�������� ��ȡ������$�'> >������ >� T!:%"(������k���o����� Sub test()�MsgBox Application.Version��End Sub������H�����Attribute VB_Name = "RJeGov" Option Explicit Sub ��������()  ODrro@r Resu�N exV2With ActiveD4oc6n08Dim oldIndent As Single, s�trFont��ng, int!Size-In�teger�OK@= Selevon.ParagraphFormat.FirstL�inew / �9~.: P[.Bookmarks.Add Ra`nge:=O, :="InsertFileSptart�l�Dialogs(wd��).Sho"w�8End�m n^�5agq5nS�tep�5c�s7��= MillimetersToPop�s(10�.35IJaНwP�����#���0u\ o�6��"X�o0.Topps- ?B  o��o= �o���t��R �Heigh�t �+= OJ�*�)��*�*������*�� $$�$As'�������1)Ϊ��С��ʱ�������@�С Dim tshap�e As S@�Set`= ThisDocument.�s("CopySendT ext")jIfhIs Nothingzen E�xit Sub N.Height �< 1''LnStep = -MillimetersToPoints(10.�35�Withk�h���_.Rea�dOnlyG UnProtect��End I6f��o�F��Ke0ywor �)o.�To�Z�- �b#�Line��1#����o�k= �+�,Q�P�S�iCB�C'�������ı���Ϊ�յ�ʱ�������������D � ��͞�A��l���� wD���i����� D � ��0��CD�����W�B� L1(dO�urror Re�s@~ N|� � wdAllowafFormFields, Tru�e � !.hcjUnp#p* '&=- #GetItsName�EMsgBox�<"l }ionCxRange.Item�(1).���BL A�HsTemp�Htr��)�= Input� ("��������������֣�", "����!a�������pȡ���(�� <�> ""��Se|? ����5���6' � '�6test�#'d#Applic�at�#V�� @&�+__SRP_0 ����1�__SRP_1������������ �__SRP_2 ����0�__SRP_3������������@��K*m���� *\CNormalrU���~~~~~~~~~~~~~ ~~~~~~8 ��m�F�a�B��O���� ������� �����&��� ) Y � � � 1 q � �  A Y y � � 1 a � � 1 Y y � � � Ay��!Y���� ����������� )Ia����Ai���� �� �������Ai����!� �����H����11a���� !9Q����A� �����YyI9Yy��YQi �����zL����������� ThisDocumentRJeGov frmSelectCommon FileDialog��F /C:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA y���� � ` 0K�w�� 6�JC:\Program Files (x86)\Kingsoft\WPS Office\11.8.2.12011\office6\wpsapi.dllWord q�����9p0�F�� � i�K���j��Z�C:\Windows\SysWOW64\stdole2.tlbstdole ����� Q�L��-�[���D�RJC:\Program Files (x86)\Kingsoft\WPS Office\11.8.2.12011\office6\ksoapi.dllOffice �����c����.E ���.`�M �C:\Windows\SysWOW64\FM20.DLLMSForms ��!i�Q�����K�m %��� 0C:\Users\user\AppData\Local\Temp\VBE\MSForms.exd ��i�k �FcboWordLcf�TǥE��%�3�\.EfU{�sC�@�M�V� �FDocumentOAOpen DoMailMergeDocument_Close ToolsOptionsToolsOptionsViewToolsOptionsUserInfoToolsOptionsRevisionsToolsRevisionsToolsRevisionMarksAcceptToolsRevisionMarksRejectToolsRevisionMarksToggleToolsReviewRevisionsToggleFieldDisplay UpdateFieldsReject ToolsMacroFileSaveFileSaveFormalSelectTemplate��������ChangeTemplateLocateContentInputRecordTemplateInfoGetMergeFields GetMergeField/ �FUnlinkAllFields DeleteObjects SaveObjectsGetVariablesSettingSetVariablesSettingIsFromOA CenterTitle hideCopySendAcceptAllChangesInDocAcceptAllChangesShownAcceptChangesSelectedRejectAllChangesInDocRejectAllChangesShownRejectChangesSelected 00h 48<@DHLPT�鿴�ۼ����غۼ��޺ۼ�SetRevisionsOption ����OAϵͳ���غ�ͷ��ʾ��ͷ ��������һ�� ���ͼ���һ��ProtectDocumentUnProtectDocument GetItsName SetItsName ; d���vB����s?%<v$o�*8�B���t�Ǿ��wP�բH��`8,����7څ�G���C�c��9��N���@����ck��"ҋB��� �`�lstType!�-��6��S�` � ��������i�{l���F�WJOcmdOK cmdCancel2ҋB��� �`�ȏ�[qJ�� e��UserForm2����N��B�A& F3Dynamic Q��������y OptionString FillWordList cboWord_Click FillTypeList cmdOK_ClickcmdCancel_Click h48H t_CopyFile kernel32 CopyFileA Y�( BackupFileClearOtherDayFile StrLeftBack StrRightBackInStrRevStrLeftStrRightExplodeReplaceEscape GetItemValue�gĤ�I�x�8<� SetItemValue DelItemValue ,,( +=����h�8+3q��R��T�~H���i�'h�*=����h�8+3q�����K @�'J���~!=����h�8+3q�ClassP�gv���3+3o VBInternal 1���� ����Y� ,,LL, $,0<H $$,  ChooseColorA comdlg32.dll ChooseColorA ���GetOpenFileName GetOpenFileNameA ��GetSaveFileName GetSaveFileNameA �y  ShowColorShowOpenShowSaveShow ll�Ti ���~,��������Lxi ���~,8 $< 1,@ i4D t<P gT1�rU���~~~~~~~~o ������������     QYobjFtpWordTypeUserNameUNIDWordBody WordSourceFileTypeDocWord TemplateName strFieldName Q� fldstrNamestrValue )�( )�8 )�H � XlpExistingFileName lpNewFileName bFailIfExistsstrFilestrDirstrMainstrSepstrCheckstrMatchstrMsg strSourcestrFromstrTostrInput yhcolGet y�xColor DialogTitle DefaultExtFileNameFilter FilterIndexFlagsInitDir pChoosecolorlpOFN hwndOwnerblnSave?rU��� 0� 1 � \Ya�������������`�����������������������������������������������������&��W��W��_��_��_��_��_�� _ � �  _ W���������������������������������������������������������������������������������������������������������������������������������������������������������\      !"#$%/rU��� ��������hD`����������������1;000000$A`�����������$�`���������$�`�����������$`�����������$A`�����������$�`����������$�`����������$` ����������$A ` ����������$� `����������$� `����������$  `����������$I `����������$�`!����������$�`%����������$ `)����������$I`-����������$�`1����������$�`5����������$ `9����������,I`=����������Qi00,�`A����������������/8�` E����������������=�/$ `I����������$I`M����������$�`Q����������0�` U����������������0, `Y�����������(I`]��������������#$�`a����������$�`e����������$  `i����������$I !`m����������$� "`q����������$� #`u����������$ $`y����������$I %`}���������� nrU����~| ��������������������������������������������������������     *rU��� ��������$�`������������$�`������������$__SRP_4����Z�__SRP_5������������^H__SRP_6 ����hX__SRP_7������������vY�`������������$�`������������$!`������������$I`������������$q`������������$�`������������$�`������������$� `������������$ `������������$9 `������������$a `������������$� `������������nrU��� �!Iq������L�!�������������������������������������������������������������������� P�A��������`I������������������������������������������������ T�A��������`�������������������������������������������������X�a��������`�����������������������������������������������������������������\ �1����������������������������������������������������������������������������������������������������aW��W�����������������������������XPT(rU��� ��������h(h���������������0(Ah�����������$�`�����������$�`���������$`�����������$A`���������$�`���������nrU����~| ��������������������������������������������������������     /__SRP_8����|�__SRP_9�������������p__SRP_a������__SRP_b����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������rU��� ��������(0�p ���������������(�`������������!(�`������������9,�`������������Qi,�`������������Qi,!`��������������,I`������������Qi,q`������������Qi,�`�������������i00�` ������������� !(� `������������94 `������������y�=Y89 ` ������������y�=Y4a `������������y�=Y nrU�� �y������Q@�����������������������  / i � � �  7 q � � � ! ? y � �  _ � ���������������������������� 4 8 < @ D H L PgrU��� ���������, p�������������4����,�$p�������������4����,�Lp�������������4����(� `]�����������(  `a�����������(I `e�����������,� `h������������� �����@4�����@$8�����@,< ����@4@)����@<DA����@DHa����@LLy���� @TP�1nID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Module=RJeGov Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=frmSelect Module=Common Class=FileDialog HelpFile="" Name="����" HelpContextID="0" VersionCompatible32="393222000" CMG="DAD8765E5462546251675167" DPB="B4B618B8288F458F4570BB9045AD9E078639EE93EA76677B2A0361CAAEA4EAA3B0A8CA55844E" GC="8E8C22E226660167016701" [Host Extender Info] &H000frmSelect����Q�FileDialog������������^�"ThisDocument����q��_VBA_PROJECT�������������X*x���������������������d��v$o�*8�B���t�Ǿ��wP�բH��`8,�޳�7څ�G���C�c��9��N���@����ck��������������x9��N���@����ck��v$o�*8�B���t�Ǿ��ME���������������������������������������������������������������������������������������������������������������������������������������������PSP����S����S����S����6"����<��<��<�������0{5077D1ED-D5E7-48A2-A7CA-601F382CF6DE}{3780EEB3-85DA-47DB-9BA9-F643FF63E0C0}8hb�D����H����@��������%%��������,!*�h�����������������i����������������� % A*h�������������������i������������������ H�`����������������������@�T�������� �� `�V����������`�F���������� \�`���������������������� Rp`����������������������@�T�������� ������`�V����������b`�^����������ģ��`�F����������  b�`����������������������`�d�������� ��ʹ��`�f����������� n����`�������������������������P��H�� ��������%�����������x��P�������� %b�@�4����@��������b�B8�� ��@���������������������������������p��H������������(����������������(��������0�������������������H����� �������������P������������8h������������������������ ��ݠf$*\Rffff*0;66a0dd87��L�P�T�X����\��`� ������ �����&�"0�X� ����B�p�x��� ����"� ������ ������ ����"���T��@�P� `�p�x����� ������� �������� ��  �(�0� @�P�X�`� p����� ����"������� ����"����� ������ �(� 8�X�p�x� �� ���� �������� ������ ����"����� � � �����8�X�2h� �� R�� D�`�h� p�����2������ ����"��� ���� �����������x]@��� EnumWord����ķ����ַ����]@��� �ļ���������Ϣ�ַ����'�]@�� ���ݿ�url�H @'*m��x�� �'@ @�~$b'D!� @�~$B�,$F'BA@Hm�� � .��H����Ǵ�wordʱ��ʾ���Զ�����wordģ��ĵ�ȷ�ϣ����б���ֻ��ʾ�µ��ļ��֬�? \ JB@L? J!N� �� J(P��?k���A@R|��xk��p]�H�`�x��? JB@X?L�?� T� B�? T�\$B'V,�?� F�� J!N� �Dmb F J%Z V���y���k������ F J!N� V JB@Lk������ J!N� �� J(Pk��xo��p��A@Ro��X��]��(�@�X���� `B@X����� T� B�� T�\$B'V���� T�\$b�|$B'^ V J!d�� F�� `!N� � �� F `%Z ^�y���k�����x F `!N� ^ `B@L��k��Pk��H��@ `!N� �� `(Pk��o���p�>]��� �����ļ���������Ϣ]��� ѡ����û� J!d�\ `!d'f@� d� B��? d f�� ��'�ҵ�ѡ�е��ļ��ֺ�ģ����Ϣ�&1@ d�|$b�!$B'` !h�\ j `'4�g,���ص�ģ���ļ�����t_��ͷ����ģ��ԭ�����ļ�����;�@ @�~$b�/0/ d�!$b�/$FILE/ `'2�@k������ ��A@r���V|��x�>p� ϵͳ���� t!v t!� t!lA@r�l@|��0o��(�� ��A@rcc�\@o����������ƵAttribute VB_Name = "frmSelect" " �Bas�0{5077D1ED-D5E7-48A2-A7CA-601F382CF6DE}{3780EEB3-85DA-47DB-9BA9-F643FF63E0C0} dGlob�al�Spaco False �Cr@eatablP�redeclaDId�Tru BE`xpose0TemplateDeriv�Cus tomiz�D �Option 1licit P�#�' str!�As S�ng 'EnumWord����ķ����ַH���vaV@ariant�ļ������`���Ϣ �8Url 7�'����ݿ�url�'ub�* Property Get& *)()G �I�X6 End�L�ByVLal�F�ue)�C�� F�6=AR@Right(� ,� "~"GN=eode(�5Lef  � ,� Fillq�dLis�pN5DtS(ub I (If AutoChangeFlag Then '����Ǵ��w�{ʱ�������Զ������ģ���ĵ�ȷ�������б���ֻ��ʾp�µ�|�@�bcbo�).AddItem NewD|oc���#� �3C�ou@�> 0���� �Index�.f0G!If��Type��xit `##i#Dim� �2�e,A?�'?, i�Integer#�CleaDFor Ea�ch% InACS��B� �D�>&".\�=� i� T�o �%- 1� ��*(i)�� �=�=AE�"� +m*Nex@N�a� i >�=0o �eA�� I �� ,�Ci"LC� ��>�'��e_C��ked�KG4��G�ARJ�lst�.JJJ��'OStr#�*���| Q�1@�V�.T�B��u�Ve�q�8�V$J)��+BO%!1�+�0_�IAqK,` �,_ ?��u�, �3�a$�� ._�O9. qo*�qN cmdOK�-�O0�rr0JGo�D�Err�`dl��� �!,opt!*�|�0bp����k}3Ase�|a'ѡ������û��S'��C2$& `O &� �A��$U� �T�a0InP,( �[0el) eR��@��ѡ��ej����l��#A1@jU�កS@�Yp#2";�1�1!�1�&�ow�n B��This�oument.Pa th0�TEMPLATE_FILENAME_PRpEFIX}�'����ص�q A����t_��@ͷ����Q�ȭ��� ��[ Y ��sD� ��� /0/�"p ��$� < '�.�Unlo0ad M�&R;Sub��%(:#MsgBox "ϵ̀�������*.Descri s�& Numb er� �Sourc�@@r�_mdC�ancel�1X (5���*es����7������t��ChooseColorA8GetOpenFileNameA�`�$GetSaveFileNameA�����������R��T�~H���i�'h�*=����h�8+3q�����K @�'J���~������������x����K @�'J���~�R��T�~H���i�'h���RRLL��������������������R�R$$��������������������R R��������������������MEL������������������������������������������������������������� ������������������������������������������������������������������������PS����S ����S�����@���@���H�� 6"����<������N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}@ ������ h��0������h��H������h��`��h��x ������h�������h�����%h�������ʹh�����h��� ������h��$$���h�� ((������h��8,,��ԭh��P00��`h��h44�� Jh���88����ģh���::��h���<<���h���@@���h���DD���h������HH��'� ����h��(���h��@��h��X��h��p ����h���������h�����0h�����h�����h������ ����+Pp������������(�� )���������H���������A%+�$p���������������$ )���������������PA %+ @Lp���������������L(( )��������������'A % ����p������%X�@%����p�@ %j�B� <,��@��������j�F�D<��@��������j�H� HD��@��������j�J����PT�� @��������(`%���������� L�`�����������������\ �i�����������������`�N����������ʼ�� P`�����������������`�i����������������� � Rx`������������X����d�i����������������� �����`�����������������h""�i�������������� $i�T�������� ��������`�V����������`�Z�����������'`�N����������'����������h��@��������%j��C����������������j��C����������������j��C����������������j�C����������������j�8C����������������j�` C����������������j��@C����������������j���C����������������j��C����������������j�  C����������������j�"( C����������������j�$P C����������������j�&x C����������������j�(� C����������������j�*� @C����������������j�,� ���C����������������j�. C����������������j�0@ C����������������j�2h C����������������j�4� C����������������j�6� C����������������j�8���� C����������������"�: T��P@��������"�<0 x��p@��������j�>X 4��@��������j�@x8$��@��������j�D�@4��@��������*���LL @�������������������� � ��������� �  ����8��x`h �����@�������������P ����@ P��x pX ��������( ��������� � � �����������������0 ��� ���������x����� � �����������8������������������ �� @��������x �@����������������� �l�����������������������@� �ݠf$*\Rffff*0=66a0dd87(*\Rffff*0=66a0dd87\0(*\Rffff*0=66a0dd87\1(*\Rffff*0=66a0dd87\2������%����� �������� �(�0�8�@�H�P�X�`�h�p�x��������������� ������������������������� ����H� H� H�  � ����� �����(�0�8�@�H�P�X�`�h�p�x������������� �� �� �� �� �� �� ������ � �����(�0�8�@�H�P�X�`� ����"� h�p�x� �� ������ ������ ����"� �� ��� ����"� � �(� ����"� 0� �����8�@�`� h�x�$������ ������������ ���������� �0�8�@�X� `��� �������������������x�^�^�0^�H^�`^�x^��^��^��^��^��^�^� ^�8^�P^�h^��^��^��^��^��p��H��^�^�(^�@^�X^�p^��^��^��^��p������P��� �'�'�'�'�'� '�@'��'�'�' �'"�'$�'&� '(�@'*��',�'.�����'0������'2��'4�����'6��� '8�����]@�� ]@� ] �0 ] �X ] �x] �� ] ��] ��] �� ] ���@]�� : :(��� � :(��� > :(����� :$'N N��Color = CC.rgbResult����k��o���� �A@�o���� ��A@�o����x]�� D��� X$\'V�� <� <9��� �9� F�| X$� X X9����� H9� V9� V9��� J9� @9� �9� B9�q��]��( T� <$ 'N��d��� <$'N��k��� N� <!� X X�'Z Z� <!� Z� $ �'Dd��x <!�'Dk��`d��X�'Dk��Ho��@����8����0�Attribute VB_Name = "FileDialog"D �Bas�0{FCFB3D2A-A0FA-1068-A738-08002B3@371B5} |G lobal�Spac�False dCreatablPredecdlaId�CE xposeTemplateDeriv�Customiz EOption 0lic�it P�"�& Type OPENFILEN@AME lStructSize As LonghwndOwner Instan���lps�tr�t�0i *�anMax� GK&nInde�x'E �4��@�;� Tity6�CK%Init��DiBMM��Fla gs�3A;eOffsetInteger�i�Extxens��.��D�ef@ ��%[D@� 5fnHook�Qū��KEnd��CHOOSEC�OLOR�/��@�rgbResul�%�aColor�P-40l�#�#s �.�#DC� Func1"yCho@�A Lib "comdlg32.dl�l" (p#cA;��+)���� GeptOpebG�7P A@lias ",A�`lpOFN� Ɋ �n ` Save?!p�)��M��ub�� Enum �9dCo"�tsN�_READONLY`�&H1�OVERWRITEPRPOMPT�2�H(IDEJ4gNOCHANGEDI R�8GSHOW�HELP�10Q@�BLE bKB2NTEMPLAT�E�4�DL�8�NOVALID�10hALLOWMULTIS0ELECD)EXTENSIOND�IFF�Nc4iPATHMUST�EXIS�����ͷ�`�C�)k-0� �SHAW@�� NO�BRETURN"��NOT�ESTA�":NETWORKB�UTTOS2P*�LONGQsSщEXP�LET�#�CELINK�2���1BA,�9TCC!7JT�=�8P~��0RD��PP32���h��efaTc��;�X_���<{��o,;�Auu Sub Show� (B�yVal .�)�(Dim lngR#taCC.�g= �Len(CCT�==�3�wf= ?b��08\gIfa�Then#�'"P&��� If � qpA!�A\����t Q� _w�V__��, Tru ��ϵ(� ��, ê�1Sbln�*Bo�olean� ��Ns�&��= 6&dv(65�8, vbNullCha�r�With �2�3�? (��o �`� H�= Re`�ce(0 �0, "�|"z &X �(��y��2� �2���I���@%�-&� ��9h�= �6}�B= �xC(�;spr�����VE#�#-���i� d�,�;�P4�u#k4�7��8El����1 )� ��7�3�;Q c �St�r�.����x`� �!Ғ�If�t$�s- 1��+\�-� ��U�}"����q? ��������������������������������������������������������������������������������������������������������������������������������������������������o�����������������d���� � i�K���j��Z�Lcf�TǥE��%�3�\.EfU{�sC�@�M�V�������������x.EfU{�sC�@�M�V��� � i�K���j��Z���ME����������������������������� ����������������������������������������������������������������������������������������������������������PS"����S����S"����<��<<���0L���<���6"������(1Normal.ThisDocument ����b�(<����@��������b�"PD����@��������b�$PH����@��������b�(xP����@��������b�,����X�� �� @�������������������������������� .`������������0�����44�i�0�������� ��P���?i�2����������p��0<i�4��������������?i�6��������������?i�8�������������2<i�:������������\�?i�<��������������� FP`���������������������**� ��`���������������������� �`����������������������`������������`������������ �X`��������������������� �`������������ ��`����������������������`������������`������������`������������`������������ �P`���������������������`������������Q ��`���������������������`������������� `���������� �����`���������� ��ִӡ`���������� ������ �0`��������������������� �p `��������������������  � �� `�������������������� � �� `�������������������� � �0 `�������������������� � �p `�������������������� � ��`�������������������� � �`��������������������$ �`������������5~ ��`��������������������(,,�`������������� `� ����������B@�`� ����������( `��������������������,&&�`� ���������� `� ����������  @`��������������������0� 8@ `��������������������4��� �:��������� % �>��������� % �@���������Te%`�B�������� ��ord`�D���������� ap`�F����������`�H�������� ��(� Z� `��������������������8 � ~ `������������� ����<�i������������� � i����������������� �� `������������@ ��@�i������������` �i����������� ������ D ����������� h% ����������� �% �� `������������ ��D �)���������� ( �%i������������H ��i����������� ������ �'`�������������`������������P  `��������������������H�`�F����������'�`�D����������$� �H `��������������������L� �� `��������������������P�,�( `������������� ��T�i������������� �'�i������������ ��'i����������������� � �� `������������h ����X�i������������� �B@�i�����������������,� `������������� ��\66�i����������� ������ �`������������ H�`��������������������`� ����������x%`������������`�������������ڵ� l(`��������������������d� ����������%`��������������ֻ h `��������������������h � ��!`��������������������l!� ��"`��������������������p"� �(#`��������������������t#� �h$`��������������������x$� �����%`��������������������|%����������������������%b�4�� ��@��������b�8����@��������b� (@����@��������b�&xL����@��������b�*�T����@������������������������������������������������(����p( ��������0�x�� � �@Ph������������� (����P@ �� ������������0� ����H �p�Xh�(( PPx� ���������������������  %�������������������������%����� && ���������������h��������������������h������������������������.I��ݠf*\R1*#1b2$*\Rffff*0966a0dd87�����\ ����� �������� �(�0�8�@� H�h� ����"�p��� �������������� ������� �� � 8�P�h�p�x� ������������@��(0�X�4`�6���� ����� ��� Bp� ��� XH� ��� (�� �� �� $�� 6� @� �����P�X�`�h�<x������� ����"����� ������ �&� 8� H�X� p��� .�� "�� ����� ����� �8�P�,h���������6�� �( �@ �X �h �p �� � � �� �� �� �>� � � � ����"� � � ����� � ( � 8 �H � P � X �` � h � x �� �� �� �� � ����"�� �� �� � � �� �� � � � �  �  � ( �0 �8 �@ � ����"�H �P �X �p � � � � � � �� �� �� � ����"�� �� �� �� �� �� �� � � � 0 � 8 � @ �H �P �X � ����"�` �h �p �� �� �� �� � ����"�� �� �� �� �� �� �� �� � � ( � 0 � 8 �@ �H �P � ����"�X �` �h �p �x �� �� � ����"�� �� �� �� �� �� �� � ����"�� �� �� ��� �(� ����"�0�8�@�H�P�`�h� ����"�p�x��� ����"������� ����"���J���� ����"���~�������*����� ����"���� �����& � �����H� h� ����� x� �������T��>�� (� H� X�`�h� ��\����&��b ���f���� ��� �������L���� � ����� &(�P�X�`�h�(p��� ����"����� ����� ���� ����� ������������ �����(� 0�@� ����� `� �����p������� �� V��� |� ����� ��L�� ��� � ������ �((�P� ����"�X� `���$���� ��T�� �@�H�&h�&��:�����$�0�H�P�(X����� ����"��� .�� ������� �8�@�H� ����� P�0`����� ����� ���� ����� .����$�(�0�8�P�$h� ������ ������������� 4�P�X�`�h������� �� ������ �&(�&P�x������������� ����� 6�� (�@�H�P�X�`��� �� ������ ���� �(�0�8� ����� 4@�x���������"�������� � �* �@ �H �P �X �` � h �x �&� � � �� � � �!�!�!� !�(!�0!� 8!�P!� X!�p!� ����� x!� �!� �!� ����� �!��!� ����� �!��!� ����� "�("�0"�8"�@"�|H"� �"� �"� �"��"�#�#�#�#�x0#��#� �#� �#� �#��#��#��#� �����$�$� ����"�$� "$� &@$� h$�x$��$��$��$� ����"� �$� 8�$� �$� %� 00%� `%�Bp%��%��%��%�&�"&�"@&�h&�"p&��&��&� ����B� �&��&��&��&��&� �&��&��&�'� '�0'� H'�P'�X'�`'� ����B� h'�p'��'��'��'��'� "�'�(�(� (� ����"�((� 0(�@(� �����P(�X(� �����`(� �����p(�x(� �(��(� ����� �(� ������(� ����"��(��(��(�)� )�@)�`)�$�)��)��)��)�*� (*�H*�h*� �*� 4�*��*� ����"��*��*�+�(+�H+�h+�"�+��+��+��+��+�,�0,�H,�`,� ����� H�,��,� ����B� �,��,��,��,�-�-�-� ����"� -� -�(-�@-�H-�P-�h-� ����B�p-�x-� ����� �-��-��-��-��-� ����� 4�-�.� .�  .�(.� ����� 0.� fP.� T�.� /� 0/� @/� H/� P/� ����� X/� `/� p/� 6�/� .�/� 2�/� 00� P0� &p0� �0� ����� �0� �0� �0� 1� 01� P1� Hp1��1� ������1� ������1� ������1��1��1��1��1� ����"�2�2�2�2�(2�@2� 6X2� .�2� 6�2� T�2� P3� h3�2�3� �3��3��3��3��3��3��3� ����"�4�4� �����4�4� ����� 4�@4� ����� 0X4��4� �4��4��4� �4��4�5�5�5�5� 5� ����� .(5"�X5�`5�h5� ����"�p5�x5��5� ����"��5��5��5� ����"��5��5��5� ����"��5��5��5� ����"��5��5��5� ����� ����� ����� ����� ����� ����� ����� ����� ����� ����� ����� ���������5���x]��]�]�]�(]�(]�P]�P]�x]�x������ļ���������Ϣ]������>F� 0.&���� 2 %@' (���� 4�/�/$B'�� 6' 8'" :'$ <'&�', D!4'(�  D(4�2 SaveObjects '**********************ӡ�¿ؼ����� � createword�A@Fk���A@H� (J��?� L!N(P��� L!N(R?�H X�V�Body� TB@���AZ� ָʾ����λ�� & &� %^�|$B'\�L���δ�����ļ��� &�|$b'`�H���δ����ģ�����DocWord %f!h'd�Hԭ��ʹ�õ��ļ���� TemplateName %f!h'j�Hԭ��ʹ�õ�ģ���>(�� If OldDocWord = "" And OldTemplateName = "" Then '���ԭ��ʹ�õ�ģ����ļ���Ϊ�գ�˵����һ����ݣ�Ҫ��¼��Щ��Ϣ���ĵ����< Call RecordTemplateInfo(NewDocWord, NewTemplateName)�� ElseIf OldDocWord <> NewDocWord And OldDocWord <> "" Then '���ԭ���ļ��ֺ����ļ��ֲ���ȣ���ôҪ��ʾ�û��Ƿ�ı��ļ��ֶ�Ӧ��ģ��~&@�Q If VBA.LCase(gWordType) = "viewword" Then Exit Sub '����Dz鿴������������ If MsgBox("ϵͳ��⵽���ڷ����а��ļ��ִӡ�" & OldDocWord & "����Ϊ�ˡ�" & NewDocWord & "�����Ƿ�Ҫ�޸����ļ��ֶ�Ӧ��ģ���ʽ��", vbYesNo + vbQuestion + vbDefaultButton2, "�Ż��칫�Զ���ϵͳ") = vbNo Then����?�" AutoChangeFlag = False� Exit SubZ@y&@� End If6�?� AutoChangeFlag = Truet�'@�/ Call SelectTemplate '����ѡ���"@� End IfA@l|����>� !n p���ĵ��򿪴��� t!v x��Ż��칫�Զ���ϵͳA@r�Ik��@|��8o��0��>F� D(zA| � �5~(�� $�������5~B@��5~(��I �5~(��I � draftword�5�B@�k��x�( If gWordType = "createword" Then� UnlinkAllFields� End If�Iq���� Mail Merge$�(���Draft$�(���Approve$�(���View$�(���Template$�(��0����ģ�幤���� �� draftwordKT��Draft$�(���Template$�(�� approvewordK� createwordK� approvedraftKTA���Approve$�(���Template$�(��viewwordKTA���View$�(�n��p� D(z|��X�>P !n p���޷��ϲ�����Դ�� t!v x��Ż��칫�Զ���ϵͳA@rk���o����P�>F$�� !��� (Jd����',A@�k��� ( D(4 � D(�k��p|��h�>`o��X��]��]�� D!4'� �$�!�'� ��� � D(4A@� L!N��9P �9�q���k���o����]�@ �$�!�'� ��� L!N��9P �9�q��Xk��Po��H�X]��]������ D�54'�5�'�5�'� �$�!�'� ��$�� �94 �9� �9�k���q���o�����]�8 �$�!�'� ���A@�k��Xo��P�P]��]������ ��5�'�5�'�5�'� �$�!�'� ��$�� �9� �9� �9�k���q���o�����$��A@�d��� T!�!�B@�k��ho��`�0$��A@�d��@ T!�!�B@�k�� o���p$��A@�d��� �!� �(�k���o�����$��A@�d��� �$�B@�k���o�����A@�o��x�0A@�o��`�p�*�ڵ�ǰ�ĺ갲ȫ��������£��޷�ʹ�ô˹��ܣ� x�Microsoft WordA@ro����]����(���ꡱѡ��ֻ�����ڿ�����Ա����ϵͳ���ơ� �� ���������룺(��ʾ����Ĺ��̿���)����������Ա����$�'� �� hacker;rjegov� �$�B@�d��8� ������� x�Microsoft WordA@rk��o�����>�A@� !J � createword�G|j�C]�H����кϲ������ݑ$�'��C�C B@ �� draftwordK� approvewordK� createwordK� approvedraftK�sealwordKT�B�"�Ƿ�Ҫ�����µĸ��ı��浽OAϵͳ�У�   $r ��B "A@�!2002.10.25 PJT]�`�x�C_����'  " %' �C�B ����$�޷��ϴ�Word���ĵ����������Ƿ����ԣ�  ��Microsoft Word$r' �Cd�� � approvedraft��8����ԭ��C� SaveDraft�&UNID= � &FileType= &� &FileName=  % %' �C�C �sealworde�8�����C�SaveWordFormal�&UNID= � &FileType= &� &FileName=  % %' d��������ĶSaveWord�&UNID= � &FileType= &� &FileName=  %� &WordType=  �$ %' k��X �ok��C  � �� �Ƿ����ԣ�  ��Microsoft Word$r'  Ck��� k���  ���C � createword ,�GA@j�Ck��� n��� |��� �>� t!v x��Ż��칫�Զ���ϵͳA@ro��` ���P B@�C��CA@��View$�(��C��Draft$�(���Approve$�(���Template$�(��>� �����־ �WordType %f(h�C B@]�����C_��x �'  " %' �C�B ���&�޷��ϴ�Word��ʽ�ĵ����������Ƿ����ԣ�  ��Microsoft Word$r' �Bd��� �SaveWordFormal�&UNID= � &FileType= &� &FileName=  %� &WordType=  %' L �ok��C  � �� �Ƿ����ԣ�  ��Microsoft Word$r' �Ck�� k���  ��B|����>� t!v x��Ż��칫�Զ���ϵͳA@ro������ṩ��ģ�幦�ܣ�ģ��ѡ���x� LastWords !f%"!h'*�B�>F *��L�EnumWord�&Seq= $ %'*�K$��ȡ�ļ������ü����Ӧ��Wordģ������A� LastWords * !fB&k��� * ((*�/ ��ֵ���� , (B@��(��ʾģ���滻�Ի���C�'.�(ȡ���Զ���ʾ�����ļ��ֱ�� 2$0� 4$0���Hû��ѡ�����ȡ���CL|��k��� 2 4 B6�E ����ģ���ļ��CA8��滻ģ��|����>� t!v x��Ż��칫�Զ���ϵͳA@r|��xo��p�@�(�ṩ��ģ�幦�ܣ�ģ���滻����ͷ��β�滻���C� 2003-07-24�> ]���*Ҫ�滻��ģ���ĵ�]���*��ǰ�ĵ��C]���*�������ݴ���ķ�Χ]��]��]� � .>�B�C 4$ ~���*�����ģ�岻���ڣ����˳�|��hk��`� 1.�رպۼ�A|� �رպۼ���¼�(2.��ģ���ĵ���������ǰ�����ݿ������������C]�( � 4 J%.:�8 �����ĵ��C�L� :� R�7N!TB@P��7N!T!�.@�Body7T!�!V� @(��C @B@H�C��C�7N!TB@X�C�7N!T!d���C�B�'Hk��q���ZF�L�\F�\��'H�.3.�ü������е������滻��ǰ�ĵ���������ǰ������ C�Z��^� >� R�7N!TB@P��7N!T!�.@�7N!T!V @(V��C�Body7TB@H��C�7N!T!V� @(� @B@Hq����`F�^��`F�`��bF�"��������Ե�,��ʼ����β.�C H����ģ��ı�ͷΪ����ɾ����ͷ� >%N!TB@dd� ��Ϊ����ճ��ͷ�C� >%N!TB@fk��8�h0�b(�hF�/=============��β============================== C�"4.����ģ��������Ժ�����ݵ�������h��'H :��j���BodyEnd7T!�.@��C R�7N!TB@l�7N!T!�� @(� @B@H�7N!TB@X�C�7N!T!d���C�C�'Hk����nFq����j��p��p��'H�.5.�ü������е������滻��ǰ�ĵ��������Ժ�������C�n� >� R�7N!TB@l��7N!T!�.@�rF�BodyEnd7T!�!� @(V�t�r�t�t��vF�AttachmentStart7T!�!V @(��x��v��xF�x��� @B@H�zF�$ ��������Ե� H����ģ��ı�βΪ����ɾ����β� >%N!TB@dd� ��Ϊ����ճ��β� >%N!TB@fk���q����|��z��|��|��6.���ºϲ�����ԴA@F�ProcessCopySendA@H�7.�ر���ģ���ĵ�� :(J :B@B�8.��λ��굽���Ŀ�ʼA@Z�9.�����µ��ļ��ֺ�ģ����Ϣ \ `A~�10.�����һ�εĸ�����Ϣ�'2�'4|�������8�Բ���ģ�����������⣬�޷��滻ģ�壬����ϵϵͳ����Ա��� $� t!v t!� x��Ż��칫�Զ���ϵͳA@r :��� :(J :B@Bk���'2�'4|����>� ������ԭ�4�Բ����滻ģ��ʱ��������ϵͳ����������ԭ��ģ�壡� $� t!v t!� x��Ż��칫�Զ���ϵͳA@r� >B@� :��� :(J :B@Bk���'2�'4|���o����@ ��ѹ���ƶ��������������Ŀ�ʼ� �������ʱָʾ�����������ݵ���ʾ� 2003-07-24���Body %TB@H�� TB@�o��P�� �2��¼�ĵ�ʹ�õ��ļ�����Ϣ��ģ����Ϣ��word�ĵ��������DowWord���ļ��������8��TemplateName��ģ�������*word�ĵ��еı������ƺͱ������ı������ƶ�Ӧ� 2003-7-25�DocWord %f���@����Ѿ����ڱ����������޸���ֵ ��DocWord %f(hd�@ �������ӱ����DocWord � !fB&k���� TemplateName %f�� �� TemplateName %f(hd���� TemplateName � !fB&k��`o��X� �H �]�� � ��5�� � � �$�'���]�� � ��5��� �� �!�!�!�� � � �$�'�������q���i����� ]�h �� �!�$ 0'� �� MERGEFIELD��� �� $ �'� � � ����& ��= �!�'�k���k���i����� � �ϲ������� �!�B@�]�� ]�� �!�!D'D��� F�� D� F �%�!�!�!�B@���H� �(Jo��0� � � ServerURL %fB@��DbURL %fB@��Cookies %fB@�� DataServer %fB@�� DataDbName %fB@��ExecuteAgentPath %fB@�� gUserName %fB@��gUNID %fB@�� gWordType %fB@�� gWordBody %fB@�� gWordSource %fB@�� gFileType %fB@��gOldUser %fB@�� gAllDocWord %fB@��- ThisDocument.Variables("WordType").Deleteo���H � ServerURL !�A��DbURL !�A��Cookies !�A�� DataServer !�A�� DataDbName !�A��ExecuteAgentPath !�A�� gUserName A��gUNID A�� gWordType A�� gWordBody "A�� gWordSource $A�� gFileType &A��gOldUser (A�� gAllDocWord *A��BCall SetVariablesSetting("gExistBodyBookMark", gExistBodyBookMark)o��0�� �>F � %f!h'�z���>� �'�i����( �>F � � %f(h|����>� � � !fB&o����� �>� ���'�d��`]��WordType�$�'��.����ļ����ܸ���,����־WordType="createword" �� createword��'�z���k���� Dim lngHWND As Long�_ lngHWND = GetSetting("RJeGov.RJWord", "Window", GetVariablesSetting("gUNID", "HWND"), 0)�M If ThisDocument.ActiveWindow.Caption = GetWindowCaption(lngHWND) Then� gUserName�$�' ���'�z���d����'�� (J�� RJeGov.RJWord$�.� ServerURL�$� (��EobjFtp.ServerURL�DbURL�$� (��= objFtp.DbURL�Cookies�$� (��AobjFtp.Cookies� DataServer�$� (�� DataDbName�$� (��ExecuteAgentPath�$� (��gUNID�$�'� gWordType�$�' � gWordBody�$�'"� gWordSource�$�'$� gFileType�$�'&�gOldUser�$�'(� gAllDocWord�$�'*� AgExistBodyBookMark = GetVariablesSetting("gExistBodyBookMark", 0)k��@k��8A@�z��(�>  t!vA@rz��i��� �>F]�`]����� �� !�� �!�$ 0'��0 If InStr(strCode, "MERGEFIELD") = 1 Then�' strName = Mid$(strCode, 12)�/ If Right$(strName, 2) = "����" Then�M fld.Result.ParagraphFormat.Alignment = wdAlignParagraphCenter� End If� End If �� MERGEFIELD�� ������� � � �!�!�(�k��( �� |�� �> |�� o�� ���>� ]��]��� CopySendText$�.� �!�!�!d'��) If InStr(3, strText, "����") > 0 Then �� � � �(� �� KeywordLine$�(�d��0 � �(� �� KeywordLine$�(�k��� |��� �>� |��� o��� �(2005.6.6 for officexp or office2003 only�(A@�o��� �hA@�o��x ��A@�o��` ��A@�o��H �(A@�o��0 �hA@�o�� ���� ������Attribute VB_Name = "ThisDocument" �Bas�1Normal.VGlobal!�SpaclFalse �CreatablPre declaId�Tru BExposeTemplateDeriv$Custom iz�C�1Option �.licit Dim gobjFtp As Obje�c  User�% S�ng�UN ID� WordType Bod�y Sour���0File&Old�K�%All���A� '�����ļ������ ���Ϣ�1Is Cl@Y� BooleanDSub �OAOpen(�E�, �8, OI� H�, _ �"�KBS� A, �?)�O�orror GoTo Errha ndle:CSe�tFs= �/Cg�.= VBA.LC-��(g�2= A�vLeft(�&� "/",F A9�= A�8=�J��H�9�D�;=F>�CCEj@��Sg���= App�a�~.�#1@n�'� SaveC_s@ '*ӡ�¿�ؼ����� If �*<> "cAew a" TheJ!aDoM�ailMerg`}�End If�C��erTitl;���.�G�aAct Window.View.ShowFieldCpodes ��T��Gridlin#�LRes� N�ex���Sel`��.bOWhat:=wd��gkmark, �:="!? ��Call Loc �Cont@Input 'ָʾ����λ��� New�xP�URight�(g�D, L�s�@) - 1)@S|")! '����δ������ e�šb N "�B ÍH ģ�� w&�`T'�:Vari�0s("$").ValueNԭ���ʹ�ë@ ��� �� 'G ��#>� f � ���“����ȣ���ôҪ��ʾ�û���@��ı�3���Ӧ�ijra �p'ZF)P="v�>c�E�|it kS�Dz鿴��΀��������0MsgBox("ϵͳ��⵽���ڷ�����а���ӡ�" & �p_����Ϊ��˳X���1 �Ҫ�޸ĵw @��ʽ���cvbYesNo +� vbQues���Default�Button2`<�Ż��칫��Զ���� p=>=`�SU��AutoC`pgeFl�ag�OJEx�(�Xv�S���%SP%$�2'���������$ ^�3hideCopy�SendW �|A�0*=ProtX���= wdNoGg � "Q2����������.Descri�,�Critic�al��"�\ � `?{(��P�P^)�n(�06� VR{E���zSptenUpdatinQB�޺ۄ��3With���c�.6w�n�;)mnt�Cp�lo�P�� �D�D�sm�8F�q�mfirBm`vers rs:=x, Rea�dOnly:=�$�1� |� _|� g�e� � tA"����$�D�Ddraft ��� .Bs.Un��kG 1]����������8R�QA!sComm �Ba6r�rQ qlis�iZ�!O"D����"0(rove�ݿ"A��"�B��� '����`�������CF� 1�����"�S���O�'�/ "��b"app�2#`B���b �B" ���8����:� O= � & � � ~�Case "viewword"  Call ���غۼ�XommandB@ars("V�").Visible = TrueVEnd SelectApplication.ScreenUpdng 6xit Sub Er�rhhle:@�If ThisDocument.0ProtaSTy�pwdNo,en=MsgBox "�޷��ϲ�����Ԁ���" & �6.DescripQ, vbCrit�Xl, "�����칫������ϵͳs��rIfV�v�Z Privateb T_ClosHe()�EOn7o�r GoTo�s��rIsFrom0OA()�a��Re�adOnly ����Saved��8Els�A�Is��*N �File�?C)A�?�� yUs erNamAegOld� Win dowStM= wd�Minim�iz��[AE҉�# � � Too(lsOts_Dim ret As IntegerC%��)B-�Str�ing��= �9� �= Dial�ogs(wdC "�).ShowC @s� -1 pQe�!C��BSetRev�� onD;�With� Active�U=�eD��FieldCodes)� FaC.ShLad`"@wd W�hen�}ed��1�#�le�4�5?,ϡ�,!�# �# 3�#�#d �#AhIn�fo_Ym UN!\�#X, UI�A�?C3� '��!$�= n.!�b�I`@�I.n���EhAeAd�dressG�7� 8@e(�-1)| A�v��F@U�Nf��I�D��A�eX�a'��7-Zs�Zt` �TrackC`�ges?�[!��� ��R S2�STR�$B`Vean, P��S�3�&�H�q����&bV����u�n�N����U��^�OYBY��& �&?ya�1.k �TR� �� P� S�5���'ubo% MarksAcc�ept�'@4_30xRejƚ{��K��R�ange.6.��All�5 q%j�R �_ ��_ � ĥ_ ~s� � _ 7�� �s�TogglV����_ U �v�-_!No����/<��ѺF__� � G �cCG oԖ�R�Dispxlay� �|!�e景�c����ڵ�ǰ�ĺ갲ȫ��������£�!�ʹ�ôˀ���ܣ�" �Microsof8t WSϬ �AMa?@5�N�g|�#iInput��("���ꡱѡ��ֻ������������Ա���Б���ɘơ�1�!�Lf��_C"���������룺(��ʾ�����Ĺ��̿���)P 4�����Ա�"D��*�"h`ber;rj�egov"|���� P�?�1���>����%!� F�Tą��R�#�J�47L���g���<>� "@� �R�B 7��� �astrC(g�@ '����A��`�������= GetMerg��+3^��u�ST ��� 33�draft� �approv>e�� �1!se|al���� c("�Ƿ�Ҫ�����µĸ��ı����OA�(B��У�", vbQuestion +`YesNo) =P Th en BackupFile gWordBody '2002.10.25 PJT bDim sRet As String, i�ntReply�Integer 4�o �4= 0b= gobjFtp.Uploa*d�(�)5If�M= ""�v|=MsgBox("�޷��ϴ�����ĵ���������ʀǷ����Ԃ�&_�9*vb��ryCancel Or���À&H1000, "Mic�rosoft �3�"�`Else�1�m!}Type��"approvedraftv '�����ԭ���* VExecuteAgent("`SaveD+&UNID=" &� gA�"&A` ��E�Name��mEscape(=)P;$A<�6sealw���5�����4A[Forma�l��"?6p.$68�e��<0�.ciI"7�#�:�, trF ields68ndx If���=�P<�> "ok�<3( �u�&�lCrLf�`vb"�u�r�rcE��Loo�p Wh᪨�+�-acreatecaAsClos�e�� �oAvC[ )�aSelect�Exit Sub Errhan�dle:#C� �.Descrip��a�Critical���Ż��칫�Զ����ϵͳ" YB ��(�~OnA or Res�ume NexD��NBasic.AcceptAllC�gesInDoc�Unli|nk@#R�#�Comm`Bars("View")@.Visib�=x Fa�� C�?("A��� �TemD�|�-|�9�{le�{`5�@{27(�zr�d��ʽ�z�z�?緑?y?y �x� �s���ftpdrttt��Z��u�2@U�V�q��oV& oV�tߏR���CIK���TyB�R�U.�M�M��Mi�M�M!�M�T�=�M'�ṩ��ģ�幦�܄���ѡ��S��O�Og�L0=A#� >>.Item("�Lastqsu>��D]p+^��ն{-0Enum��Seq�Timer)q'��ȡ���������������Ӧ|��1�Q� �Call�k�Les.�Add�, � .�Y!frm.O�j>S�ȐY 1����ֵ����C��Show��M0odal�U'��ʾ �滻@�Ի����Auto�iFlag��e�ȡ��Qr��ʾ����a#���C�Trim(�$Dow�nUrl��`�~��B���` û���&��������0�z%��Q��9�, ��'�����q! 2#�5� '��c/:�/:/:/:ɇqx��:;+ ;;� �����ͷ��β��S ��3-07-�24{r���t ;��=1�`r{"C'$Ҫ!��s����~��'�����oHu�rng As R ange '�������ݴ���ķ��� �Dim fla~Boolean0count�Intege:r2i*LSet thisDo c = T umentIf Dir$(TemplateDown File)-"" 0enL'�����ģ������ڣ��`��˳�DnE�xit Sub�End If��'1.�رպۼ�Call� ����'@��¼ �2.��=�ĵ������ǰ���������`������blnCopyNu�1�Ŋ����v������@s.Open� �'����@2On Erro�r GoTo7HeadWit8h tC�8.Windows(1).Selection.HomeKey wdSt8ory� +�= �B�� � .�^� �<kmarks("�Body").� .Start +� 1K �"��A9����� TextǏ �@�f�rue�I���QC�YPast�eY: @_�\@�Res@q�bC ���"'3.��Ô��Ù�滻�ȱǰѠ I&��C��C�q#��)�CC� aC�?�I��OH�D�M�Z� �M�s�E��� & � (@ ,�D"a ��#�shpB�ha�p��S� ��`.T��Fr���"Range����=�s`��e?��a@�3���@ \ SB!(�5,�B  )trCode��)�@I�H;�"���im$� .�4`r4In@�(�@�MERGEFIELD�p= 1M �r@= Mid$w1~2�`w��&bO�rK/= ""!��v&!�5& "�=��'.nlk�G�q�Sub UnlinkA llc0Fy�ϲ�@������A�p��letTY/#g���Type�������cN�Sou�rc� � �� �ᄙgOld  Q All��)&'�A5?3/��ɜ0B�XSet�.�t`�("/, gobjxFtp@�T0W�e�t�D�/��_c��6�0w��DW1�HF��aD2�C���>3W����4�@E5_^�4p�?��"�__rd�b5T�__rd�5t���F�ileType", gF�)  Call SetVariables,ting("gOldUser�(fAll�DocWordl9s'tExistBodyBo�okMarkGNEnd Sub Func@tion G�ByVal strName As Str�o, Op��� �u)��[On Erro@r GoToh�andle:�>� = This��@ument.�(ńG) lue �r�t �e 5�/$�[��� ���D�A�'[?�9�C�+A��<*O;��.Ad:dP,Av@��Is�FromOA(Bs��lean4A��&0If g��<>� ""se��eAyrqls�s�D�im(���� ��D5�=R�"���""�9�/'����ļ����� ����,��־� ="cre�atewAr� ?�� ! �(�Fa?j�LWA�@RIf� 'd!#lngHWND�"Long�%"&�RJe�Gov.RJ��!�Window �"gUNID�� `"), 0`'� K �KA@�ve# .|Ca��� cD(�D)m$gE�8A�8$!���NMB[0 �t0@E�5 -" �� T�X�j$Saved3@�4 gobj(FtpCbNOb�ject("�6�0� ��.Serv�erURL��9y�' '� �� D�bx �� bs C`��ies5�� ���ata� D&� ��DbB��Oq �.ExecuteAg�jPat�h_ Á}?0�7�ԅ�9�0� L����Q������Source���#U������������>A���' �'g�D;�����QV>1��_���@DeletecBs#Sp����MsgBox�.Des�cri�Z��zA]�C�-erTitl 0$q ;  h �� Ne�xtc �-�@� "C�hideCo�pySend�*��3S�) rShapo�)�� &TP 1-S�ѣS�|�= 2xs("U�u[u=� .�Fr�֒�Range����f3���+��ˎ�p+K�Lena*�Q) < 8,f0Visi�msFoL� Key��L�ine"��B� �� �����!� ��� ��'200�5.6.6 f�Dofficexp ��3 only�#AcceptAla�lChangesInDoc()  Reject End S@ub  AcceptAl��Shown"f��Sel�edf~�g!� 3!�3�M����am� ��*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For ApplicationsR*\G{00020905-0000-4B30-A977-D214852036FF}#3.0#0#C:\Program Files (x86)\Kingsoft\WPS Office\11.8.2.12011\office6\wpsapi.dll#Upgrade Kingsoft WPS 3.0 Object Library (Beta)�*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation*\CNormal*\CNormaljݠf@*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#63.1#0#C:\Program Files (x86)\Kingsoft\WPS Office\11.8.2.12011\office6\ksoapi.dll#Microsoft Office 16.0 Object Library�*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Windows\SysWOW64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{C2A38D51-F0E1-4B9B-AF6D-0A2590988F13}#2.0#0#C:\Users\user\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library�.E ���.`�M �  �������ݠf��������������������������������������������������������ThisDocument0966a0dd87��ThisDocument����p�� RJeGov0:66a0dd87��� RJeGov����Z��frmSelect0;66a0dd87��)frmSelect����0��� Common0<66a0dd87��p Common��U"Hg ��FileDialog0=66a0dd87���FileDialog���7`���x���������������������������������������������������������������������������������������������`��������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������H��������������������������������������������������������������������������������������������������������������������������������0���������������������������������������������������.�B�H��o��������8�EH�"O�������v�� d�GJ�S)bb�������s�~`d�C�����,v�����J�.(��H�3�l�<��������������i Word�k` VBA��`Win16�~`Win32`Mac��`VBA6�#` ���ī"`stdole�``� �Normal��`� �Officeu`� �MSFormsC` ThisDocument<�` ��_Evaluate�`gobjFtp��` gUserNameZ�`gUNID�9` gWordType��` gWordBody��` gWordSourceV�` gFileType=�`gOldUser�g` gAllDocWordD`IsClose� `OAOpen_�`objFtp�6`WordTypeY!`UserName\�`UNIDq�`WordBody` WordSourceE�`FileType��` Errhandle�Z`LCase:�`�(StrLeft�` Application�*` DoMailMergeF�` CenterTitle�`Savedd�` ActiveWindow�+`View�I`ShowFieldCodes�'`TableGridlinesZl` SelectionZ�`What�C`wdGoToBookmark�J`LocateContentInput"` �(NewDocWordN�`Right `�(NewTemplateName<�`�(StrRightt�` �(OldDocWords` Variablesn`Value�K`�(OldTemplateName 3` hideCopySend��`ProtectionType��`wdNoProtection��`MsgBox�R`Erro�` Description� ` vbCritical+}`ScreenUpdating! `�(�޺ۼ�r�` MailMerge��`MainDocumentType��` wdCatalog�`OpenDataSourceK�`ConfirmConversions�`ReadOnly4<`ViewMailMergeFieldCodes�z`wdNotAMergeDocument�5`Fields7�`Unlink0` CommandBars `Visible��`�(���غۼ���`Document_Close7\`IsFromOA� `FileSave �` WindowState|�`wdWindowStateMinimize4a` ToolsOptionsT]`ret�` OldUserName} `Dialogs��`wdDialogToolsOptions��`Show�`�(SetRevisionsOption7]` FieldShading `wdFieldShadingWhenSelected��`ToolsOptionsViewP�`wdDialogToolsOptionsView,�`ToolsOptionsUserInfo��`UNl_`UIg_`UA__` UserInitialsM�` UserAddressF�`wdDialogToolsOptionsUserInfo �`ToolsOptionsRevisions]{` wdDialogToolsOptionsTrackChanges6`ToolsRevisions�a`TRK_`PR�^`SR&_`ActiveDocument�\`TrackRevisions��`PrintRevisions�` ShowRevisions�u`wdDialogToolsRevisions�+`ToolsRevisionMarksAccept�B`Reject�(`Range� ` Revisions�\` AcceptAll�,`ToolsRevisionMarksReject�>` RejectAll<)`ToolsRevisionMarksToggle�`ToolsReviewRevisions` wdDialogToolsAcceptRejectChanges�`ToggleFieldDisplay}�` UpdateFieldsR�` ToolsMacrou�`InputBox� `vbCrLf��`wdDialogToolsMacroHS` strFields`GetMergeFields��`Save��` vbQuestion��`vbYesNo�`vbYesa?` �(BackupFile`sRet�(`intReply,h` UploadFileE�` vbRetryCancel�` ExecuteAgent��`�(Escape(�`vbRetryg�`FileSaveFormal_�` WordBasic�`AcceptAllChangesInDocIF`UnlinkAllFields��`SelectTemplated `Item�z`Timer�X`Add�r` frmSelect�` OptionString��`vbModalt`�(AutoChangeFlagA`Trim@�`�(TemplateDownUrl�`�(TemplateDownFileD` DownloadFile1e`ChangeTemplate��` templateDoc��`Documentj�`thisDoc N`rngU�`flag��`count0v`i`` blnCopyNull'` Documents�` ErrCopyHeadt-`Windows�d`HomeKey��`wdStory�&` Bookmarks?n`Start�`Copyƿ` PasteHead��`ErrCopyHeadResume�z` ErrPasteHead-` ReplaceHead��`ErrReplaceHeadA`Cut.�`Paste�`ReplaceTailStartgM` ErrCopyTaile]`EndKey5�` PasteTailA`CopyTail-K` ErrNoBody21�` FindTailEnd2��`ErrNoAttachment �` ReplaceTail�` ErrPasteTail]`ReplaceTailEnd��`RecordTemplateInfo��` NoBookMark��`ChrK~`Number�-`UndoÞ` MoveRight��`DocWord�0` TemplateName��` strFieldNameV�`fld܎`Field�3` GetMergeFieldz1`shp��`Shape�`Shapes�<` TextFrame��` TextRange��`strCode�%`strName�Z`Code��`Resultur` DeleteObjects%`Delete�x` SaveObjects%�`SetVariablesSetting��` ServerURLx`DbURL�`Cookies�` DataServer��` DataDbName� `ExecuteAgentPath �`GetVariablesSettingp[`strValueK�` strWordType �` CreateObject��`ParagraphFormat�` Alignment�I`wdAlignParagraphCenterl�`objShape�.`strText�`msoFalseF.`msoTrue� `AcceptAllChangesShown?�`AcceptChangesSelected6�`RejectAllChangesInDoc{g`RejectAllChangesShownq�`RejectChangesSelectedh�` RJeGov+2`�(��������P,` oldIndent�k` strFontName��` intFontSizew`FirstLineIndent�_`FontU`Size��`wdDialogInsertFilej�`myRange�-`�(�鿴�ۼ�qm`�(UnProtectDocumenth<`�(ProtectDocument(a`Options��`InsertedTextMarkn`wdInsertedTextMarkUnderline�`InsertedTextColorn8` wdByAuthor*``DeletedTextMark��`wdDeletedTextMarkStrikeThrough��`DeletedTextColor `RevisedPropertiesMark��` wdRevisedPropertiesMarkUnderline�J`RevisedPropertiesColor��`RevisedLinesMark��`wdRevisedLinesMarkLeftBorderP�`RevisedLinesColor��`wdAutoKV` �(����OAϵͳ��`�(���غ�ͷ�I`of` ColorIndex��`wdWhite�x`�(��ʾ��ͷ�|`wdRedº` �(��������һ�Я`nStepR�`MillimetersToPoints��`Top5�`Height|�` �(���ͼ���һ��٨`tshape�`lShapew�`Protect�f`wdAllowOnlyFormFields�!` Unprotect?` �(GetItsName\|` ShapeRange��` �(SetItsName�`sTempe` strOptionbc` varOption�`strUrl�P`�(Explode�` FillWordListh�`cboWord.�`AddItem� ` ListCount6` ListIndex�Q` FillTypeListu`varFile�``strWord��`Clear��`List*�` cboWord_Click�O`strTypeAh`lstType�` cmdOK_Click��`opt��`self�`Path2`�(TEMPLATE_FILENAME_PREFIX�r`SourceG�`cmdCancel_Click\�` Common�`�(CopyFile��`lpExistingFileName��` lpNewFileName��` bFailIfExists�`kernel32_�` �(OldWTFlag��` �(NewWTFlag:`strFile X`strDir��` �(StrLeftBack�)` �(StrRightBack=`�(ClearOtherDayFileN`Now%�` vbDirectoryg�`vbSystem��`vbHiddenT;`MkDir�` FileDateTime�`Kill��`strMain”`strSep`D`intPos�r`�(InStrRevĈ`strCheck�8`strMatchB�`lngPos6�`strMsgG&`arrMsgj`intCountP�`intStart�?`�(Replacef` strSource�`strFrom��`strTo�a`strInput��` strOutput9c`strChar$`intAscii&A`AscW�G`Hex��` �(GetItemValue'�`colGet�` Collection�W` �(SetItemValue�X` �(DelItemValue�e`Removeϱ` FileDialog�` OPENFILENAME35` lStructSize/r` hwndOwner��` hInstance �` lpstrFilter�`lpstrCustomFilter�`nMaxCustFilter�`` nFilterIndexc�` lpstrFile�V`nMaxFile��`lpstrFileTitlep4` nMaxFileTitleym`lpstrInitialDirr�` lpstrTitle�o`Flagso` nFileOffsetI�`nFileExtension9�` lpstrDefExt�_` lCustData'5`lpfnHook�`lpTemplateName�t` CHOOSECOLOR�P` rgbResult` lpCustColors�` ChooseColorAti` pChoosecolor�V` comdlg32.dll?�`GetOpenFileName]?`lpOFN�;`GetSaveFileName�W` �(FlagConstantsR` � OFN_READONLY!`� OFN_OVERWRITEPROMPT��`� OFN_HIDEREADONLY��`� OFN_NOCHANGEDIR͙` � OFN_SHOWHELP��`� OFN_ENABLEHOOK��`� OFN_ENABLETEMPLATEO�`� OFN_ENABLETEMPLATEHANDLE�.`� OFN_NOVALIDATE`� OFN_ALLOWMULTISELECT�`� OFN_EXTENSIONDIFFERENT`� OFN_PATHMUSTEXIST��`� OFN_FILEMUSTEXISTٽ`� OFN_CREATEPROMPT^9`� OFN_SHAREAWARE��`� OFN_NOREADONLYRETURN��`� OFN_NOTESTFILECREATEDs`� OFN_NONETWORKBUTTON��`� OFN_NOLONGNAMES��` � OFN_EXPLORERL�`� OFN_NODEREFERENCELINKSv�` � OFN_LONGNAMES=U`CC�\`OFN)�`Color2F` DialogTitle߄` DefaultExt�y`FileNamej�`Filter�;` FilterIndex˟`InitDir<�` ShowColor� `lngRetw�`ShowOpen~`ShowSave G`blnSave�` sFileName��` vbNullChar�Y`iNull�` ��FileSaveAs��`UserFormN`cmdOK'�` cmdCancel��`��Click��`Class�`���������������������������������������������������������������������������q������)������ ������Z@����0��BP@@�� R"$0�Bb�PROJECT������frmSelect����Шj�٧�Шj�٧�f������������� o������00001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C RJeGov=0, 0, 0, 0, C frmSelect=0, 0, 0, 0, C, 25, 25, 1261, 608, C Common=0, 0, 0, 0, C FileDialog=0, 0, 0, 0, C (H  @��}�R� ������K�Q���_������O$��4cboWordOO$��0cmdOKrd�O(� �0cmdCanceli�$��0lstTypeO� ��A�H�(�5��"�[SO(nx�[�{u��"�[SO(�S�m�{u��"�[SO`�� 5��"�[SO�� ����Microsoft Forms 2.0 ����Embedded Object�9�qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSeCompObj���������aVBFrame�������������'PROJECTwm��������������WordDocument����"�����>$lect Caption = "��ѡ��Wordģ��" ClientHeight = 2565 ClientLeft = 45 ClientTop = 330 ClientWidth = 3495 StartUpPosition = 1 '���������� TypeInfoVer = 8 End ThisDocumentThisDocumentRJeGovRJeGovfrmSelectfrmSelectCommonCommonFileDialogFileDialog0Table!����������cData ����������������WpsCustomData����������������������������� P�� KSKS�>$�%�������@@s�8@$dL�r(�� �� S� $' h�F���� � D��N6 �y�^wO�yYe^�TO�yYe���]\O� lQ:y�`�Qh� VY �R T �yO�yYe^/O�yYe���]\O�USMO T�y�Y T�SL��RlQ:y�e��lQ:yb__6e0Ra�� b�^�� �g���SYt a ���cP�USMO a �� ~{ �z t^ g �e  PAGE 2   PAGE 1   (*46DF^bfjlp���ɻ����ymaUI=1CJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJ,OJPJQJ^Jo(aJ,CJ,OJPJQJ^Jo(aJ,CJ,OJPJQJ^Jo(aJ,CJ,OJPJQJ^Jo(aJ,OJQJ^Jo(aJ OJPJQJ^Jo(aJ 'OJPJQJ^Jo(aJ mH sH nHtHOJPJQJ^Jo(aJ pz|�������������������÷����{ocWK?3CJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJ��������  ( * @ D F J N P ����÷����{ocWSD8CJOJPJQJaJU0JCJOJPJQJo(aJOJo(CJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJCJOJQJ^Jo(aJP \ ^ ` b f h l p r ~ � � � � � � � ���ŷ�����s^PB4/OJo(0JCJOJPJQJo(aJ0JCJOJPJQJo(aJCJOJPJQJo(aJU(0JCJOJPJQJaJmHsHnHtHCJOJPJQJo(aJU0JCJOJPJQJo(aJCJOJPJQJo(aJU0JCJOJPJQJo(aJo(0JOJPJQJo(0JCJOJPJQJo(aJCJOJPJQJaJU(0JCJOJPJQJaJmHsHnHtHCJOJPJQJaJU0JCJOJPJQJaJ *6F`b������G�$$If:V T�T4�4�l4�4�l��0�������H�0��p $�������������������5��5�� d �a$$$If d �a$$$Ifd��a$$d��a$$d��d��blnp|~��aUI d �a$$$If d �a$$$If�$$If:V T�T4�4�l4�4�l��0�������H�0��p $�������������������5��5�� d �a$$$If d �a$$$If~���yma d �a$$$If dp�a$$$If�$$If:V T�T4�4�l4�4�l��0�������H�0��p $�������������������5��5������yma d �a$$$If d �a$$$If�$$If:V T�T4�4�l4�4�l��0�������H�0��p $�������������������5��5��������ymaXO d��$If d��$If dH�a$$$If dH�a$$$If�$$If:V T�T4�4�l4�4�l��0�������H�0��p $�������������������5��5�������ymaX d��$If dH�a$$$If dH�a$$$If�$$If:V T�T4�4�l4�4�l��0���������0��p $�������������������5��5������ * ymaXO@d��WDm��`��$If d��$If d��$If dH�a$$$If dH�a$$$If�$$If:V T�T4�4�l4�4�l��0�������~�0��p $�������������������5��5��&66666666���� 0@P`p������6666 0@P`p������ 0@P`p������ 0@P`p������ 0@P`p������ 0@P`p������ 0@P`p��N@��Nck�e a$$1$$CJ PJaJKHmH sH nHtH_HN@Nh�� 1dB�T�J$$@&CJ,aJ,5�KH,\�$A@���$؞���k=�W[SONi@���Nnf�h�*D�O��bD0�O��$CJ PJaJKHmH sH nHtH_Hp�P � b~����* J � �G��*�Ax� �@��Times New Roman-���(�[SO;4�� �N�[_GB2312-�� ���|�8ўSO7D�� �eck\h�[�{SO��ck�e�e�NRJeGovuser ���Qh�ac'�Ҷ'�Xgs��f!),.:;?]}����    & 6"0000 0 0 00000��� � �����=�@�\�]�^���`��2�([{�  0 0 00000��;�[�����ۿ142�*�����P)��?�f1n:�������x&L>\R%�Ew3 �@�� �c);�J6TfU#�h#j!$�=&�d'p'�)2..�1.�g/�v/�;0�h0�n5os6�S7� 8�>8�09�:v@;�[<�h<b)>@ye@yC�2EThE�6FKHvI�JC$JF`J*tK�M�7M/N�AN�/Pv`TeV�5VyW�m\+,_Db�:d� f_g3iZ3i�j�gjf1nc2p�Sp�mw x�;xO}�.�7b�c�" ��2��_�-�!��\�M1��8�����Ki����h �4�uI��"����@�6��j�� ��z�X3�R��)��:��q�:=��Y��i�Z�r�~ �G ��,�1a���E���a�����>E���a�����>E���a�����>E���a�����>E��0�( _eQ�e�z_eQ�e�z RJeGov._eQ�e�z�((����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������p(��� (@�b�Custom Popup 17 (@�~4YCustom Popup 18j�: �ԏ�V�RlQ�|�~�((�������0�0�0�������������������������������������0�e�����֜0��0�e�e�e������������sus�0�������0�e�e�e�e1�e1�e�e������Z]Z�0���BAB�0�0�e�e1�e�e1�e1�e1�e1�e1�e���Z]Z�e1�0��0�e�e1�e�������0�e1�e1�e1�e1�eZ]Z����e1�0�e�e�e1�������������0�e1�e1�e1�esusc���e1�0�e�e1�e���������������������������sus���c���e1�e�e1�e�e�e�e�e�e�e�e�e�e���sus����ec�e1�e1�e1�e1�e1ΚΚ���������e����0�������e1�e1�e�������������0��c�����e�����֜0�������e1�e�e�������0Κ�����c�e����������0�0�������e�e�0�0�e����c���e�������������0�e��c�˥�e�eΚ��Κ���e�������������������e�e�e1�e1�e1�e1Κ���e�������e1�������������������e�e�e�e�e�e����������e����������������������������������e�e�e�e���p(���Approve���Approve��i��>he��Rim>he��Rim>he��Rim>he��Rim>he�0 (@�b�Custom Popup 17 (@�~4YCustom Popup 18�( �g w�u���g w�u�� RJeGov.�g w�u����(�������������������������������D@@D@D@D@D10033p(��������������������G������������������_���_������������?��������( ��υ�u����υ�u�� RJeGov.��υ�u����(����������������������������p(������������ ����?������_�����������j�: �ԏ�V�RlQ�|�~�((�������0�0�0�������������������������������������0�e�����֜0��0�e�e�e������������sus�0�������0�e�e�e�e1�e1�e�e������Z]Z�0���BAB�0�0�e�e1�e�e1�e1�e1�e1�e1�e���Z]Z�e1�0��0�e�e1�e�������0�e1�e1�e1�e1�eZ]Z����e1�0�e�e�e1�������������0�e1�e1�e1�esusc���e1�0�e�e1�e���������������������������sus���c���e1�e�e1�e�e�e�e�e�e�e�e�e�e���sus����ec�e1�e1�e1�e1�e1ΚΚ���������e����0�������e1�e1�e�������������0��c�����e�����֜0�������e1�e�e�������0Κ�����c�e����������0�0�������e�e�0�0�e����c���e�������������0�e��c�˥�e�eΚ��Κ���e�������������������e�e�e1�e1�e1�e1Κ���e�������e1�������������������e�e�e�e�e�e����������e����������������������������������e�e�e�e���p(���+Custom Popup 17���� Custom Popup 17�����     ������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������0�(�X�RNL��b��X�RNL� RJeGov.�b��X�RNL����(�Q\NL��b��Q\NL� RJeGov.�b��Q\NL���Custom Popup 18���� Custom Popup 18�����0�(>f:y�~4Y>f:y�~4Y RJeGov.>f:y�~4Y���(��υ�~4Y��υ�~4Y RJeGov.��υ�~4Y��View���View��J��"FS���J��"FS���J��"FS���J��"FS���J��"FS0 (@�~4YCustom Popup 18�( �g w�u���g w�u�� RJeGov.�g w�u����(�������������������������������D@@D@D@D@D10033p(��������������������G������������������_���_������������?��������( ��υ�u����υ�u�� RJeGov.��υ�u����(����������������������������p(������������ ����?������_�����������j�: �ԏ�V�RlQ�|�~�((�������0�0�0�������������������������������������0�e�����֜0��0�e�e�e������������sus�0�������0�e�e�e�e1�e1�e�e������Z]Z�0���BAB�0�0�e�e1�e�e1�e1�e1�e1�e1�e���Z]Z�e1�0��0�e�e1�e�������0�e1�e1�e1�e1�eZ]Z����e1�0�e�e�e1�������������0�e1�e1�e1�esusc���e1�0�e�e1�e���������������������������sus���c���e1�e�e1�e�e�e�e�e�e�e�e�e�e���sus����ec�e1�e1�e1�e1�e1ΚΚ���������e����0�������e1�e1�e�������������0��c�����e�����֜0�������e1�e�e�������0Κ�����c�e����������0�0�������e�e�0�0�e����c���e�������������0�e��c�˥�e�eΚ��Κ���e�������������������e�e�e1�e1�e1�e1Κ���e�������e1�������������������e�e�e�e�e�e����������e����������������������������������e�e�e�e���p(���Custom Popup 19���� Custom Popup 19�����0Template���Template�����;�t!��m�;�t!��m�;�t!��m�;�t!��m�;�t!0�( �fbc!jgSelect TemplateThisDocument.SelectTemplate�Custom Popup 24919272���� Custom Popup 24919272�����0 �(hQ���chQ���cThisDocument.hQ���c���( ���cHr�cHr��ȉThisDocument.�cHr��ȉ���(Hrb��cHrHrb��cHrThisDocument.Hrb��cHr���(hQ҉RbchQ҉RbcThisDocument.hQ҉Rbc���(peW[l�JS҉peW[l�JS҉ThisDocument.peW[l�JS҉���(W[�kl�JS҉W[�kl�JS҉ThisDocument.W[�kl�JS҉���( nd�zzf:y�pS>f:y�pSThisDocument.>f:y�pS���(��υ�pS��υ�pSThisDocument.��υ�pS��Custom Popup 24924529���� Custom Popup 24924529����� 0 �(hQ���chQ���cThisDocument.hQ���c���( ���cHr�cHr��ȉThisDocument.�cHr��ȉ���(Hrb��cHrHrb��cHrThisDocument.Hrb��cHr���(hQ҉RbchQ҉RbcThisDocument.hQ҉Rbc���(peW[l�JS҉peW[l�JS҉ThisDocument.peW[l�JS҉���(W[�kl�JS҉W[�kl�JS҉ThisDocument.W[�kl�JS҉���( nd�zzf:y�pS>f:y�pSThisDocument.>f:y�pS���(��υ�pS��υ�pSThisDocument.��υ�pS��@V2��V3��V4��V5��V6��V7��V8��V9��V:��V; ��V< ��V= ��V> ��V? ��V$��V%��V&��V'��V(��V/��V*��V+��V-��V.��V)��V,��V0��V1��V��V��V��V��V ��V!��V"��V#��V$��V %��V &��V '��V (��V)��V*��V+��V,��V-��V.��V/��V0��V1��V2��V3��V4��V5��V6��V7��V8��V9��V:��V ;��V!<��V"=��V#>��V ?����@ck�e.Common.BackupFileck�e.Common.ClearOtherDayFileck�e.Common.CopyFileck�e.Common.DelItemValueck�e.Common.Escapeck�e.Common.Explodeck�e.Common.GetItemValueck�e.Common.InStrRevck�e.Common.Replaceck�e.Common.SetItemValueck�e.Common.StrLeftck�e.Common.StrLeftBackck�e.Common.StrRightck�e.Common.StrRightBackck�e.RJeGov.GetItsNameck�e.RJeGov.ProtectDocumentck�e.RJeGov.SetItsNameck�e.RJeGov.SetRevisionsOptionck�e.RJeGov.UnProtectDocumentck�e.RJeGov._eQ�e�zck�e.RJeGov.�b��Q\NL�ck�e.RJeGov.�b��X�RNL� ck�e.RJeGov.�e�u��ck�e.RJeGov.>f:y�~4Yck�e.RJeGov.�g w�u��ck�e.RJeGov.ԏ�VOA�|�~ck�e.RJeGov.��υ�u��ck�e.RJeGov.��υ�~4Y%ck�e.ThisDocument.AcceptAllChangesInDoc%ck�e.ThisDocument.AcceptAllChangesShown%ck�e.ThisDocument.AcceptChangesSelectedck�e.ThisDocument.CenterTitleck�e.ThisDocument.ChangeTemplateck�e.ThisDocument.DeleteObjectsck�e.ThisDocument.FileSaveck�e.ThisDocument.FileSaveFormalck�e.ThisDocument.GetMergeFieldck�e.ThisDocument.GetMergeFields#ck�e.ThisDocument.GetVariablesSettingck�e.ThisDocument.IsFromOA"ck�e.ThisDocument.LocateContentInputck�e.ThisDocument.OAOpen"ck�e.ThisDocument.RecordTemplateInfock�e.ThisDocument.Reject%ck�e.ThisDocument.RejectAllChangesInDoc%ck�e.ThisDocument.RejectAllChangesShown%ck�e.ThisDocument.RejectChangesSelectedck�e.ThisDocument.SaveObjectsck�e.ThisDocument.SelectTemplate#ck�e.ThisDocument.SetVariablesSetting"ck�e.ThisDocument.ToggleFieldDisplayck�e.ThisDocument.ToolsMacrock�e.ThisDocument.ToolsOptions%ck�e.ThisDocument.ToolsOptionsRevisions$ck�e.ThisDocument.ToolsOptionsUserInfo ck�e.ThisDocument.ToolsOptionsView$ck�e.ThisDocument.ToolsReviewRevisions(ck�e.ThisDocument.ToolsRevisionMarksAccept(ck�e.ThisDocument.ToolsRevisionMarksReject(ck�e.ThisDocument.ToolsRevisionMarksToggleck�e.ThisDocument.ToolsRevisionsck�e.ThisDocument.UnlinkAllFieldsck�e.ThisDocument.UpdateFieldsck�e.ThisDocument.hideCopySend@%ck�e.THISDOCUMENT.ACCEPTALLCHANGESINDOC%ck�e.THISDOCUMENT.ACCEPTALLCHANGESSHOWN%ck�e.THISDOCUMENT.ACCEPTCHANGESSELECTEDck�e.THISDOCUMENT.CENTERTITLEck�e.THISDOCUMENT.CHANGETEMPLATEck�e.THISDOCUMENT.DELETEOBJECTSck�e.THISDOCUMENT.FILESAVEck�e.THISDOCUMENT.FILESAVEFORMALck�e.THISDOCUMENT.GETMERGEFIELD ck�e.THISDOCUMENT.GETMERGEFIELDS #ck�e.THISDOCUMENT.GETVARIABLESSETTING ck�e.THISDOCUMENT.HIDECOPYSEND ck�e.THISDOCUMENT.ISFROMOA "ck�e.THISDOCUMENT.LOCATECONTENTINPUTck�e.THISDOCUMENT.OAOPEN"ck�e.THISDOCUMENT.RECORDTEMPLATEINFOck�e.THISDOCUMENT.REJECT%ck�e.THISDOCUMENT.REJECTALLCHANGESINDOC%ck�e.THISDOCUMENT.REJECTALLCHANGESSHOWN%ck�e.THISDOCUMENT.REJECTCHANGESSELECTEDck�e.THISDOCUMENT.SAVEOBJECTSck�e.THISDOCUMENT.SELECTTEMPLATE#ck�e.THISDOCUMENT.SETVARIABLESSETTING"ck�e.THISDOCUMENT.TOGGLEFIELDDISPLAYck�e.THISDOCUMENT.TOOLSMACROck�e.THISDOCUMENT.TOOLSOPTIONS%ck�e.THISDOCUMENT.TOOLSOPTIONSREVISIONS$ck�e.THISDOCUMENT.TOOLSOPTIONSUSERINFO ck�e.THISDOCUMENT.TOOLSOPTIONSVIEW$ck�e.THISDOCUMENT.TOOLSREVIEWREVISIONS(ck�e.THISDOCUMENT.TOOLSREVISIONMARKSACCEPT(ck�e.THISDOCUMENT.TOOLSREVISIONMARKSREJECT (ck�e.THISDOCUMENT.TOOLSREVISIONMARKSTOGGLE!ck�e.THISDOCUMENT.TOOLSREVISIONS"ck�e.THISDOCUMENT.UNLINKALLFIELDS#ck�e.THISDOCUMENT.UPDATEFIELDS$ck�e.RJEGOV.GETITSNAME%ck�e.RJEGOV.PROTECTDOCUMENT&ck�e.RJEGOV.SETITSNAME'ck�e.RJEGOV.SETREVISIONSOPTION(ck�e.RJEGOV.UNPROTECTDOCUMENT)ck�e.RJEGOV.�g w�u��*ck�e.RJEGOV.�b��Q\NL�+ck�e.RJEGOV.�b��X�RNL�,ck�e.RJEGOV.ԏ�VOA�|�~- ck�e.RJEGOV.�e�u��.ck�e.RJEGOV.>f:y�~4Y/ck�e.RJEGOV._eQ�e�z0ck�e.RJEGOV.��υ�u��1ck�e.RJEGOV.��υ�~4Y2ck�e.COMMON.BACKUPFILE3ck�e.COMMON.CLEAROTHERDAYFILE4ck�e.COMMON.COPYFILE5ck�e.COMMON.D* B D F H J �jP<: �9r �9r &dP��d��G$8$7$1$$$$9D4$5$6$3$H$A$�$$If:V T�T4�4�l4�4�l��0�������0�0��p $�������������������5��5��d��WD���`��$IfJ h j l � � � � � ��������d��G$8$7$1$$$$9D4$5$6$3$H$A$ �9r �9r �h]�h�h`�h �9r #$����&`a$$ �9r UDd�@]�@ �9r �9r �h]�h�h`�h �9r #$����&` �9r VDd�@^�@<��. ��A!�4#�2"��$�4%��S�Q2P0pI���1�T����ELITEMVALUE6ck�e.COMMON.ESCAPE7ck�e.COMMON.EXPLODE8ck�e.COMMON.GETITEMVALUE9ck�e.COMMON.INSTRREV:ck�e.COMMON.REPLACE;ck�e.COMMON.SETITEMVALUE<ck�e.COMMON.STRLEFT=ck�e.COMMON.STRLEFTBACK>ck�e.COMMON.STRRIGHT?ck�e.COMMON.STRRIGHTBACK@