ࡱ> lokrq` RbjbjqPqPE"::@10T8$, }j$((PPT !2J } } } } } }$~hfF-}!  -}PTN}%%% @PT1h% !2%&Vq-@5.T `OP)#- 0d}0}-x%d5.5. % -}-}% } D D   , DN y^w~vCSNNMb] zV[~N cPNXTW,gOo`NȉhcPUSMO T|NST|e_YT]\OUSMOQuegNNNNf[Sf[MOb/gLyN[ySя5t^;Nyx`QWёDR`QNh'`W\O0e`QVY`QN~{000000t^N+N[ySY_lf[yrXN[/~vCSN] zw~N I{/ & & 10bb;NyxNR`QyvTy+zyS+~9+yv'`(Segn+,gN҉r& & 20_N)RXyt^N+N)RTy+cCgS+SfNbNc^& & ,ghvkXQя5t^w萧~N Nyx`Q 10yNQ t^N+Wёy{|+WёyvTy+ё& & ,ghvkXQ3ubN_vw萧~N NWёDR`Q 10yNQ t^N+W\OTy+ RirTy+gS+cT+/f&TSCII{6eU_& & (,ghvkXQw萧~N NW\O0e 10yNQ V[~VYRt^N+VYRyv+VYRTy+I{!k+cTw萧~VYRt^N+VYRyv+VYRTy+I{!k+cTvQNc.<>  кЧ~jW@*@*@*hdh75CJKHOJPJQJ\^J-hdh75CJKHOJPJQJ\^Jo($hp.h7CJKHOJPJQJ^J'hp.h7CJKHOJPJQJ^Jo($h7CJKHOJPJQJ\^Jo(*hp.h7CJKHOJPJQJ\^Jo(%h7CJ$KHOJPJQJ^JaJ$o(+h[lh7CJ$KHOJPJQJ^JaJ$o(+hdh7CJ$KHOJPJQJ^JaJ$o(h7OJPJaJ o(h]h7OJPJaJ o(>    " ( . 4 : N \ r | $$1$Ifa$gd7Ff$$1$Ifa$gd7}*1$VDXD2^}gd7 $G$a$gd7G$gd7      " & ( , . 2 4 8 : L N Z \ p r z | ԾԾԾԾԾԾԾԾԾԾwww!h7CJKHOJPJQJ^Jo($hdh7CJKHOJPJQJ^J'hdh7CJKHOJPJQJ^Jo(hdh7CJKHPJaJ*hdh75CJKHOJPJQJ\^J-hdh75CJKHOJPJQJ\^Jo('h75CJKHOJPJQJ\^Jo(. : <  \ ^  >$$1$Ifa$gd7$$1$Ifa$gd7 8 < ~     Z ^  .0<>xz|~ض'hvIh|0JCJOJPJQJaJo(h|jh|Uh@Ihf1no(h@Ih7o(hdh7CJKHPJaJU!h7CJKHOJPJQJ^Jo($hdh7CJKHOJPJQJ^J'hdh7CJKHOJPJQJ^Jo(/& & (,ghvkXQw萧~N NVYRTcyS 10yNQ kXQ,gN\OQvzQ!.s0f[/g4ls^TS_v~Nm0>yOHev& &  PAGE 2   PAGE 1  >z|~ hh]h`hgd2@&`#$VDd^@gdfUO&dPgdf d9DgdfUO d9Dgd7Ff$1$IfUD]gd7謜wwwslh`h@Ihf1no(hf1n hKLh|hp'0jhvIh|0JCJOJPJQJUaJo(h|h2h|o(hvIh|0JOJPJQJo('hvIh|0JCJOJPJQJaJo()hfUO0JCJOJPJQJaJmHnHu$hvIh|0JCJOJPJQJaJ-jhvIh|0JCJOJPJQJUaJ$a$gdKL $dpa$gd;0 hh]h`hgd2$@&`#$UDd]@a$gdfUO   d9DgdfUOC&P 0pI1T2P0:pfUOA .!4"2#4$%SQ $$If!v h55P5555:555 5 5 5 #v#vP#v#v#v#v:#v#v#v #v #v :V l3 =6, 55P5555:555 5 5 999 / /  /  pxTkd$$IfTl3   y[#'.<&&P&&:&&&&&& =6000044 lapxT$$If!v h55P5555:555 5 5 5 #v#vP#v#v#v#v:#v#v#v #v #v :V lp =6,, 55P5555:555 5 5 9/ /  / /  pxTkd$$IfTlp   y[#'.<''P'''': =6000044 lapxTN@N Kicke $1$a$$CJ KHPJ_HaJmH nHsH tHN@N h 1$$dBTJ@&5CJ,KH,\aJ,$A@$ ؞k=W[SOFi@F nfh?L_n`3`3ވ`3+xbb +xb .j6`31`31`3`3?@00l3x{@A[op=>?@BCEFHIKLMN]^_nopqrstuvwxyz{|}~0@0@@0 @0 @0@0 @0@0 @0 @0@0 @0@0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0@0@0@0@0 @0@0@0 @0@0@0 @0@0@0@0@0@0@0@0 @ @0 @00000000000@0@0@0@0@0000000000000000000H0H0H0H0H0H0x{@A[=>?@CFIL]^_nqrstuvwxyz{|}~K00I00WI00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00I00@0 I00 0l300000000@0@0K00@000 000000000000I000V0  0003   > !(*3!!t    ,b$5|Bj%|EZ %F&@H 0(    0(  B S  ?#nwxz{  $%)*./23?BHITVZ[]^bcijnq<@qwxz{?AZ[np<@qx@NPZ]_aknq@q5BzHmMBqBOHthh^h`o( H\H^H`\hH) \^`\hH. \^`\hH. 4\4^4`\hH)  \ ^ `\hH. | \| ^| `\hH.  \ ^ `\hH) \^`\hH.hh^h`o( H\H^H`\hH) \^`\hH. \^`\hH. 4\4^4`\hH)  \ ^ `\hH. | \| ^| `\hH.  \ ^ `\hH) \^`\hH.ww^w`o( H\H^H`\hH) \^`\hH. \^`\hH. 4\4^4`\hH)  \ ^ `\hH. | \| ^| `\hH.  \ ^ `\hH) \^`\hH.5HmMqBO                `9        x>\ R%w3@c);S^TfU#h#j!$=&d'p')S,2..1.v/;0n5S7 809v@;[<h<Mh>@ye@yC2EThE6FvIC$JF`JK*tKM7M!}M/NANfUO/Pv`TeV5VyW Zm\+,_Dbc<=ef f_g3igjf1nc2pSpmw x;xO}.c" 2_bfd-!\87Kikh 4uI"E6j zX3R):q:=YiZ~&rG,&]@qt{1DocWordTռ TemplateNamexռ N>ye2014-01-01N>ye.doc4V"PE"VPE"V&PE"VPE"V!PE"V%PE"V(PE"V'PE"V$PE"V PE"V +PE"V ,PE"V PE"V-PE"VPE"V PE"VPE"V PE"VPE"V PE"VPE"V PE"V2PE"V/PE"V.PE"VPE"VPE"V3PE"V0PE"VPE"V)PE"VPE"V PE"V!*PE"V"PE"V##PE"V$PE"V%PE"V&PE"V'PE"V(PE"V)1PE"V* PE"V+PE"V,PE"V-PE"V.PE"V/PE"V0PE"V1PE"V2PE"V3PE"  DraftDraft>E1K>E1K>E1K>E1K>E0 ( _eQez_eQez RJeGov._eQez((p(" (@bCustom Popup 17 (@~4YCustom Popup 18"j: ԏVRlQ|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(ApproveApprovei>hei>hei>hei>hei>he0 (@bCustom Popup 17 (@~4YCustom Popup 18"( g wug wu RJeGov.g wu(D@@D@D@D@D10033p(G__? ( υuυu RJeGov.υu(p(?_"j: ԏVRlQ|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(+Custom Popup 17 Custom Popup 170 (XRNLbXRNLRJeGov.bXRNL (Q\NLbQ\NLRJeGov.bQ\NLCustom Popup 18 Custom Popup 180 (>f:y~4Y>f:y~4Y RJeGov.>f:y~4Y (υ~4Yυ~4Y RJeGov.υ~4YViewViewA"FSA"FSA"FSA"FSA"FS0 (@~4YCustom Popup 18"( g wug wu RJeGov.g wu(D@@D@D@D@D10033p(G__? ( υuυu RJeGov.υu(p(?_"j: ԏVRlQ|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(Custom Popup 19 Custom Popup 190TemplateTemplateq;t!1qK;t!1qK;t!1qK;t!1qK;t!0 ( fbc!jgSelect TemplateThisDocument.SelectTemplateCustom Popup 24919272 Custom Popup 249192720  (hQchQcThisDocument.hQc ( cHrcHrȉThisDocument.cHrȉ (HrbcHrHrbcHrThisDocument.HrbcHr (hQ҉RbchQ҉RbcThisDocument.hQ҉Rbc (peW[lJS҉peW[lJS҉ThisDocument.peW[lJS҉ (W[klJS҉W[klJS҉ThisDocument.W[klJS҉ ( ndzzf:ypS>f:ypSThisDocument.>f:ypS (υpSυpSThisDocument.υpSCustom Popup 24924529 Custom Popup 24924529 0  (hQchQcThisDocument.hQc ( cHrcHrȉThisDocument.cHrȉ (HrbcHrHrbcHrThisDocument.HrbcHr (hQ҉RbchQ҉RbcThisDocument.hQ҉Rbc (peW[lJS҉peW[lJS҉ThisDocument.peW[lJS҉ (W[klJS҉W[klJS҉ThisDocument.W[klJS҉ ( ndzzf:ypS>f:ypSThisDocument.>f:ypS (υpSυpSThisDocument.υpS4cke.ThisDocument.InsertBarcke.ThisDocument.hQccke.ThisDocument.UnlinkAllFieldscke.ThisDocument.wIDNcke.ThisDocument.CenterTitlecke.ThisDocument.ndzzf:ypScke.ThisDocument.k=)ۏcke.ThisDocument.ToolsOptions cke.ThisDocument.ToolsOptionsView$cke.ThisDocument.ToolsOptionsUserInfo%cke.ThisDocument.ToolsOptionsRevisionscke.ThisDocument.etecke.ThisDocument.hQ҉Rbccke.ThisDocument.ToolsRevisions(cke.ThisDocument.ToolsRevisionMarksAccept(cke.ThisDocument.ToolsRevisionMarksReject(cke.ThisDocument.ToolsRevisionMarksToggle$cke.ThisDocument.ToolsReviewRevisions"cke.ThisDocument.ToggleFieldDisplaycke.ThisDocument.UpdateFieldscke.ThisDocument.Rejectcke.ThisDocument.ToolsMacrocke.ThisDocument.FileSavecke.ThisDocument.SelectTemplatecke.ThisDocument.ChangeTemplatecke.ThisDocument.HrbcHrcke.RJeGov.υucke.RJeGov.eucke.RJeGov.SetRevisionsOptioncke.RJeGov.ԏVOA|~cke.RJeGov.υ~4Ycke.RJeGov.>f:y~4Ycke.RJeGov.bXRNLcke.RJeGov.bQ\NLcke.RJeGov.ProtectDocumentcke.RJeGov.UnProtectDocumentcke.RJeGov.GetItsNamecke.RJeGov.SetItsNamecke.ThisDocument.JS҉Rbccke.ThisDocument.peW[lJS҉cke.ThisDocument.W[klJS҉cke.ThisDocument.AutoOpencke.ThisDocument.doClipboardNullcke.ThisDocument.υpScke.ThisDocument.ubeueN4cke.RJEGOV.eucke.RJEGOV._eQezcke.RJEGOV.>f:y~4Ycke.RJEGOV.g wucke.RJEGOV.υucke.RJEGOV.υ~4Ycke.RJEGOV.bQ\NLcke.RJEGOV.bXRNLcke.RJEGOV.ԏVOA|~ cke.THISDOCUMENT.hQc cke.RJEGOV.GETITSNAME cke.RJEGOV.SETITSNAME cke.THISDOCUMENT.hQ҉Rbccke.THISDOCUMENT.JS҉Rbccke.THISDOCUMENT.W[SOncke.THISDOCUMENT.cHrȉcke.THISDOCUMENT.etecke.THISDOCUMENT.>f:ypScke.THISDOCUMENT.k=)ۏcke.THISDOCUMENT.HrbcHrcke.THISDOCUMENT.wIDNcke.THISDOCUMENT.DNcHrcke.THISDOCUMENT.υpScke.THISDOCUMENT.W[klJS҉cke.THISDOCUMENT.peW[lJS҉cke.THISDOCUMENT.REJECTcke.THISDOCUMENT.ndzz?@ABCDEFGHIJKLMNOPQRSTUVWXYZ\]^_`abdefghijmn.qtuvwxyz{|}~Root Entry F@^)Y Data 1TableāWordDocumentE"SummaryInformation([DocumentSummaryInformation8cMacrosz)`OP)VBA z)?)ThisDocument sRJeGov$frmSelect Common "'  !#$%&'()*+,."   8Ph p      < (`$464(` dh Lh    , 0 HX`hp<x "  & 0 @P h , $PpRxME0 $ ,(S"SS"<0i@ Lp)  8``` ``  ` ```` ` `` ` `    X    X  ` 8$``*(`( t2`.`4 $`6e$`8 te$ N  P0 Ap% TP % Vp (%`X p`ZX`\`^ ,\8  i   p x i i ordi H `\`Z NX 8  %`Micr` `\rd```  P %, i !i | x'   P ipi   % %  )08'%iXi  98`p`  8% P ` %`9`h vpi `  (% Hļ% hı %,0i I` & Ol %  wDoc% @ֶ% `bQue %`\Ż  & "$%`0 T8 \x ^ ` ,)b% `,)b.F% @P)%`Dr`\Ap 8Te(% V%iX b$% X@+iX b8% D  b% Z@ iF H% J8(% L) X7`Zword`\B@ \k\ ,% ``b `d`f޷ hX j %`l `` `\ > v @`@z `| J`\T! B@z `|T!`\9 (   V% xDiX %  % @'%` `   %7  (08@ Hh x,  ( @ ,X     >  "     0  8  @ H  P  ` p x "   4   "  0  @ H P  h \x  ,  T x      (  "      0@ H X `hpx "    " (08P p x  " " (08P p x  "  " 08 "@ HX`h "  " " "J` "hp~x(*0`h "px  4> P p D       \X`TPX `px( "   F "P "x v H ` p n (T0   D 0RPD &(P X&p:$(0(8`h "p .x   (  00@px   .$0 .H x 0$  8@HPX`hp 4x  0  P ` h p x  & &   ! !(!0!8!  6@! (x!!!!!.!!""" "("0"P"X"`" x" """ """"####  4 #X#`#h## *##.#$$8$@$H$P$X$"`$$$$$$*$$$$$% %%&8% `%x% %%%%%%% %%%&&  & (& 8&  H&h&  p&&  &&&&&|& h' x' ''''''x'H( X( h( x(((( (( B( "( &(  )0) 8)P) X)`)x)))))) " ) 8) ) * 00* `*Bp****+"+"@+h+"p++++++,,",  ,0, @,H, P, `,h, ,,  , ,",,,, ,,,,$- @-P-h-- ,-- -- .&. 8.$@.h. .. ...6.. $/ 0/ P/ p/ / / // (/&0 00 80 X0&h0 00  @00 00011 101 B 81@1H1P1h11 B 11111 1111 12 (20282@2 B H2P2`2x222 "2223 "33 3(3.@3p3  0333334(4 $04X4 "`4h4p4x4444 4 45 (50585@5H5P5 " X5`5h5 p55 5 555555 "5666  6"@6 h6p6x66 :666 66 B677 7 7(70787 H7`7h7p7 77 7777 "7888 888X8 `8 p888 (8"8888 889 9 9 0989@9H9P9 p9 x99 99"9 9 :90:"8: `: p:::::::::(:;; " ; (; 2@;x; ;;;; ;; ; ; < <  0<H<`< x<< <<(<<< "< < 2=8= @=H=`=x= == = = = =  => > 8>P> X>`>(h>>> "> > 2>> ?? ?8? @?`? h? x? ? ?  ??? ?@ @ @((@P@X@" `@ h@ x@@  @@@ @ @ @AA A(A0A8A@AHAPAXA`AhApAxAAAAAAAAAAA AAA BBBB "  B (B 8BPB  XB hB xB B B B B B B B B B B B B B 2B 0C 8C @C HC PC XC `C hC pC xC C C C C CC CCCC " C C C DD D0D  $8D`D pDxDD *DD"D E E(E0EHE`ExEEEEEEEFFFF F(F0F8F @F "`F "FFF FF F FFFG(G@GXGhGGGGGGGGGGGGH H "(H "PHxHH HHH H H " H H <H I(I 0I PI`IxII$I"I I IJ J  J (J0J 8JHJ hJxJ  J J J J J JJ JKKK " K  K <8K xKK K  KKKK L " L HL XL hL xL L L L L L L L L L  M M  M @M PM `M pMxM MMMM "M MMMM M MNNNN N" (N 0NHNPN hN NNNNN"N N $N  O 0O @O PO`OhOxO O O O OOOO O O P P P(P8P  @P PP `PpPPPP P PPPPPPQ "Q Q0Q8Q@Q HQPQ `QhQQQQQQQQQQQ (Q R(R0R8R@RHRPRXR `R pR R R R R R R RRRRRRRSSSS S(S0S 8S "@SHSPSXS `SFhS S S S S S T T T  T(T  0T @T PT `T pT xT TT TT "TTTT TT  TTU(U@UXU`U  hU xU U U UUUUUV(V0V "8V @V `VVV "V V VVV"VW W8W PW pWWWWWW WW "WWpX<X X XXXY0Y8YHY PY`Y "hY pY xYYYYYY YY "YY Y Y"Z((Z PZ `ZpZ xZ " Z 6ZZZZZZ ZZ Z  [@ [ `[h[  p[ [ F[[  [@\ P\X\  `\ p\ \ \ \ \\ \ \ ] ] (]H]  $P] 4x]]&]]&^@^&`^^&^^&^_&8_`_ h_p_(x__  "___ "___ _x]]]0]H]`]x]]]ļϢ]ϡĹؼ]BF 4. 6$D'  8//$F' :' <'" >'$ @'& ********cw', @$ @$$F'& @$$H',pk ********** J!8'(  J(8A@LA@NA@P  approveword (Rk T!V(X T!V(ZA\ ָʾλ & & $`|$F'^Hδļ &|$H'bHδģ ,'dHδıHDocWord %h!j'fHԭʹõļ TemplateName %h!j'lHԭʹõģWTFlag %h!j'nHԭеıB f lHFԭʹõģļΪգ˵һݣҪ¼ЩϢĵ ^ b dAp f ^ f f ^ n dexFԭļֺļֲȣôҪʾûǷıļֶӦģEIf LCase(gWordType) = "viewword" Then Exit Sub 'Dz鿴 If MsgBox("ϵͳ⵽ڷаļִӡ" & OldDocWord & "Ϊˡ" & NewDocWord & "ǷҪ޸ļֶӦģʽ", vbYesNo + vbQuestion + vbDefaultButton2, "Ż칫Զϵͳ") = vbNo Then AutoChangeFlag = False Exit Sub End If'rAt$ ѡkA@v ¼ǩʼϲ pjt 06.9.18ֻӱ !xA@zk|Bĵ򿪴 ~! Ż칫ԶϵͳA@||@o80BF J(A  5( $x5B@5( 5(  createword .Fields.UnlinkA@kpqh Mail Merge$(  draftwordKTView$(Draft$(Approve$(Template$(4ģ幤 approvewordK createwordKTAView$(Draft$(Approve$(Template$(4ģ幤viewwordKTADraft$(Approve$(View$(Template$(5ģ幤np J(|XBP޷ϲԴ ~! Ż칫ԶϵͳA@|op  !x (RdA@Ak ( J(8  J(koBp  draftwordK approvewordK createwordKT] B@ c:\oawork\ .doc'   B@] _'  %' $޷ϴWordĵǷԣ  Microsoft Word$|'d  SaveAsWord&UNID=  %' ok     Ƿԣ  Microsoft Word$|'kkx  n`|XBP ~! Ż칫ԶϵͳA@|o 8]x] J!8' $!'   J(8A@ T!V9X 9qko] $!'  T!V9X 9q ko]@]Xp J58'5'5' $!'   98 9 9kpqho`] $!' A@ko]8]Ph 5'5'5' $!'   9 9 9kpqho` A@d8 !!B@ko A@d !!B@ ko A@d ! (kxopX A@dH $B@k0o(A@oA@o*ڵǰĺ갲ȫ£޷ʹô˹ܣ Microsoft WordA@|oX](ꡱѡֻڿԱϵͳơ  룺(ʾĹ̿)Ա$' hacker;rjsoft $B@d Microsoft WordA@|koBF !RG|j]кϲ$ ' B@"  draftwordK approvewordK createwordKT"ǷҪµĸı浽OAϵͳУ  $ $| & "A@(!2002.10.25 PJT  Dim strCheck As String = strCheck = CheckBookmarks 'ǩʼϲ pjt 06.9.18  If strCheck <> "" Then MsgBox "ijЩʼϲǩɾĸ޷浽OAϵͳУԱϵ" & strCheck, vbCritical, "Ż칫Զϵͳ" Exit Sub  End If] _8 ' " %'* *$޷ϴWordĵǷԣ  Microsoft Word$|'d SaveWord&UNID=  &WordType=  &FileType= & &FileName= * %, $, %'* *ok  *   Ƿԣ  Microsoft Word$|'k k  k n |x Bp ~! Ż칫ԶϵͳA@|o@ 8ṩģ幦ܣģѡ On Error Resume Next@ gAllDocWord = ThisDocument.Variables.Item("LastWords").Value On Error GoTo ErrHandle: If gAllDocWord = "" Thenp gAllDocWord = gobjFtp.ExecuteAgent("EnumWord", "&Seq=" & Timer) 'ȡļüӦWordģA Call ThisDocument.Variables.Add("LastWords", gAllDocWord) End Ifbegin 2004-02-10BF]x 0'. .DijЩʼϲǩɾϵͳ޷ģ壬Աϵ . Ż칫ԶϵͳA@||kEnumWord&Seq= 2 %'*G$ȡļüӦWordģ r]]] *~$F,$:'4 ^\'6 8 4 8 6 8 d MҵļֺģϢ 8|$H!$F'b !>\ @ b'<k,صģļt_ͷģԭļ *~$H/0/ 8!$H/$FILE/ b'Bkd * D(F4 ֵ H DB@4ʾģ滻Իkend 2004-02-10'r(ȡԶʾļֱ B$J <$JHûѡȡ| k B < BLE ģļAN滻ģ|B ~! Ż칫ԶϵͳA@||o(ṩģ幦ܣģ滻ͷβ滻 2003-07-24B@] *Ҫ滻ģĵ]8 *ǰĵ]X *ݴķΧ]x ] ] .T <$ ~*ģ岻ڣ˳|k 1.رպۼA رպۼ¼(2.ģĵǰݿ] < `%.P8 ĵb P h7d!B@f7d!!.V'rng.Start = .Windows(1).Selection.Start.Bookmarks("Body").Select)rng.End = .Windows(1).Selection.Start + 1Body7j!!l V( VB@H7d!B@n7d!!d'^kqpFbrFr'^.3.üе滻ǰĵǰpHt@ T h7d!B@f7d!!.V7d!!l V(lBody7jB@H7d!!l V( VB@HqvFtvFvxxF"Ե,ʼβ. ^ģıͷΪɾͷ T%d!B@zd Ϊճͷ T%d!B@|k~x~F/=============β=============================="4.ģԺݵ~X'^ P@ KeywordText7!%!.V V!l V(lBodyEnd7j!.V h7d!B@7d!! V( VB@H7d!B@n7d!!d'^kFq'^.5.üе滻ǰĵԺ T h7d!B@7d!!.V#rng.End = .Windows(1).Selection.EndF KeywordText7!%!B@H7d!B@7d!!l V(lFBodyEnd7j!! V(lph`XFAttachmentStart7j!!l V(F VB@HF$ Ե ^ģıβΪɾβ T%d!B@zdΪճβ T%d!B@|kPqH@80(6.ºϲԴA@LA@NA@PA@v7.رģĵ P(R PB@B8.λ굽ĿʼA@\9.µļֺģϢ ^ b dAp10.һεĸϢ'B'<| 8Բģ⣬޷滻ģ壬ϵϵͳԱ$ ~! ~! Ż칫ԶϵͳA@| P P(R PB@Bk`'B'<|HB ԭ4Բ滻ģʱϵͳԭģ壡$ ~! ~! Ż칫ԶϵͳA@| TB@ P P(R PB@Bkp'B'<|XoP + ҵǩTrueѹƶĿʼ ʱָʾݵʾ 2003-07-24BFA''Body %jB@H B@'\zhB`'\iP8 2¼ĵʹõļϢģϢwordĵDowWordļTemplateNameģ*wordĵеıƺͱıƶӦ 2003-7-25DocWord %h@Ѿڱ޸ֵ DocWord %h(jd@ ӱDocWord  !hBk TemplateName %h  TemplateName %h(jd TemplateName  !hBk`WTFlag %h WTFlag %h(jdWTFlag  !hBko  ϲ !B@] ]0 !!Z'Z \ Z \ %!!!B@X (Ro@H BF 5xA@k] ]    CopySendText$!!. %!'  $:' \   \$$ . '0 \ !!Z \ \ %! \ %(d %! \ %( \ %(kxpıĸ߶] ] 33333$@$ CopySendText7! '  Set o = .Shapes("KeywordText") o.Top = o.Top - nStep KeywordLine7. !  ( CopySendText7. !  ( !  (k "ıΪյʱ߶ CopySendText %! ]8 CopySendLine %.  ! KeywordLine %(khk`:.Shapes("CopySendText").Width = MillimetersToPoints(146.3)5xA@zkq|BMsgBox Err.DescriptionoX ]  $'  'ixh ] 5   $' (] 5  !!!   $' qi]x !$ J'  MERGEFIELD  $ '   & = !'kki ] h B@ d B@ !AttachmentStart jB@ l B@*븽ʼλжϣ¼ʵλϢAttBody !j% !. !l (l ! (AttBody  !jBk ڴ븽d B@o BF]H]h  ! !$ J'  MERGEFIELD  $ ' $ `  !!( k k | B o  ] !R'  .!Zb .B@P kH  ] 5 . !!d !!dA@ ]0 5  !!! . !!d !!dA@ ]P 5j . Bookmark ! Bookmark !A@( q  (Ro p] !R'] ] 5 . !A@]( 5  !!! . !A@@8]H 5j . Bookmark !A@q]h \ .!Z 0  \ .%'0  (R¼¼A@vip"pjt 07.5.30 ӲάͼƬܖBF] "ͼƬ(*.bmp)|*.bmp9&9 * ,9(C@.5|kqά %B@תĵһҳ] B@2 6 %4'0 :8 >< 0 B@4Selection.GoTo What:=wdGoToBookmark, Name:="BodyEnd"BF "! !@%B!D5F(lC@H L9J P9N*@$R9L:@$R9ά9q(| B ~! Ż칫ԶϵͳA@||o2007-05-24 by czc,ȼرģٶݽԤŰBF ^G f'^j dG n'dj'rȼرģļʽAtʽ2AV ʽ2AXǩı SignDateTextAZLastPrintDTextAZλ굽ĿʼA@\|`BX ~! Ż칫ԶϵͳA@||(o 82007-05-24 by czc,ȼرģٶݽԤŰBF ^G f'^j dG n'dj'rȼرģļʽAtʽ1AV ʽ1AXǩı SignDateTextAZLastPrintDTextAZλ굽ĿʼA@\|B ~! Ż칫ԶϵͳA@||ho`x2007-05-24 by czc,ȼرģٶݽԤŰBF ^G f'^j dG n'dj'rȼرģļʽAtʽ0AV ʽ0AXǩı SignDateTextAZLastPrintDTextAZλ굽ĿʼA@\|?B? ~! Ż칫ԶϵͳA@||?o?2007-05-27 by czcBh? b!d μ9 μ9f9h9j9l/@9n9p9r v9t z9x9|9~999999 z99999d999 99 9 5( 7(q>|=B=|=o= 2007-05-27 by czcB= b!$R9$R99999 9=@9 9 999999 ,.FirstLineIndent = CentimetersToPoints(0.35) 99999999999999 9qP<|H<B@<|8<o0<ĵҳ2005-05-27 by czc]]Dim Brng As Range] pCount = Prng.Paragraphs.count !!Z'; \  \ %.#Set Brng = Prng.Paragraphs(i).Range  !! > !5( 9333333 @$R9 333333 @$R9 333333@$R9ffffff@$R9$R9?$R9ffffff@$R9$R933333=@$R9 9 9  $9"9&9( ,9*9.9092.BookFoldPrinting = False.BookFoldRevPrinting = False.BookFoldPrintingSheets = 1 694 :98q89d09 !5( <9333333@$R9 ffffff@$R9 333333 @$R9333333 @$R9$R9?$R9@$R933333=@$R9$R9 9 9  $9"9&9( ,9*9.9092.BookFoldPrinting = False.BookFoldRevPrinting = False.BookFoldPrintingSheets = 1 694 :98qp7kh7q`7X7oP7@ʽ5flagΪ0ʱáΪ1ĸתΪ2ȫŰ2007-05-24 by czcB6]+ݴķΧ 1.رպۼA رպۼ¼ 7d!!.bBody7j!!l b(lBodyEnd7j!! b( bB@H'''' X2A>A@ABk5 X1 X2 bA`k5 bAα֤Ч bAҳ bAq5|5B4|4o4ʽ5flagΪ0ʱáΪ1ĸתΪ2ȫŰ2007-05-24 by czcBF] +ݴķΧ 1.رպۼA رպۼ¼ AttBody !j%7d!!.bAttBody7j!!l b(l h B@ ! b( bB@H '''' X2A>A@ABkH3  X1 X2 bA`k3  bA α֤Ч bA ҳ bAk2q2|x2Bp2|h2o`2@ѡBF] !.b b bA`k1|1B1|1o1ı]] ı F %.J J J!!.H HG HA`jk01o(1@ ո Macro 2007-7-2 ӳ ¼ȫǿո !N9d5P(d9 VTC@Rq0ǿո !N 9d5P(d9 VTC@Rq 0 Ʊո !N^t9d5P(d9 VTC@Rq/־ !N^p^p9d^p5P(d9 VTC@Rq`/ֶ !N^l^l 9d^l5P(d9 VTC@Rq/o. 2007-7-10 ӳ]]]AL !!Z'Z. \ Z \ %.\ \$R9$R99999 9=@9!.Alignment = wdAlignParagraphLeft 9 999999 9 \@99@9d`-@99?9k0-9999999999 9q,,o,]P]h]'f#Ϊ+Ϊ-,ַ ַ-2$'b b bX 'd !$R9$R9$R9999q+ !$R9$R9$R999 d9qp+kh+o`+]]](@'l !.j j!d'  $:' \  \$ l \$ 'lk** l j(d B@n B@n B@n p !(  !( μ !d(/@ !d(n ld B@k)o)X ȫл Macro 2007-7-2 ӳ t !(roh) ȫл Macro 2007-7-2 ӳ x !(ro)]0H'z 0123456789.%'| \ ѭ12 !N z \$9d | \$5P(d9 VTC@Rq(( \o(`]h£ãģţƣǣȣɣǣˣ̣ͣΣϣУѣңӣԣգ֣ףأ٣ڣ'z4ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'| \4ѭ52 !N9~ z \$9d | \$5P(d9 VTC@Rq& \o&Call غۼ 999qH&o8&(]h !.VBody !j%Body %j!!l V(lBody %j!!l V( VB@H B@nk%o%0ʾӡı,flagΪ0 Ϊأ1Ϊʾ8%0%]]](]H]` LastPrintLine7. !  X0 !  X1|$k$LastPrintUtext7.  !  X0 !  X1G|jk$LastPrintDtext7. !  X0 !  X1|#k# X1  (  (  ( ! ! ' nStep = -tShape.Heightd #  (  (  ( ! ! ' nStep = tShape.Heightk"Set o = .Shapes("KeywordText").If Not o Is Nothing Then o.Top = o.Top + nStep KeywordLine7. G !  (j CopySendText7. G !  (j CopySendLine7. G !  (j SignUnitText7. G !  (j SignDateText7. G !  (j SignUDLine7. G !  (jq |  DoLastPrintShap==  A@|oX x1A@o8 0A@o  ǷAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTruBExposeTemplateDeriv$Custom izC1Option .licit Dim gobjFtp As Objec  User% SngUN ID WordType Body Sour0File&OldK%AllA 'ļ Ϣ1Ke$ D'ϡؼD colBookmarksNew CollLVSSub O@AOpen(MU,r H, YW, _ & RP, O)O@rror GoTo Errhandle:CSetY= /Cg.=h LC(g 1= Left(& "/",F A8= 7=IH8D:=F=# '*cw$g!>`=If In(`$") > 0` Then`g? h Right End If&**#g\= Appuaw.*1&1#DoMai`lMergProcessCo@pySendC`erTitl$?"approhvew}"$i.SaiActWindow.View.ShowFieldCoxdesd!TGridlinall LoBc ContInput 'ָʾλCyEgXC81?, L {) - 1)F|F'δCF  =N "! nH ģ WTFla>g?NR a Res Nex @T%*?Vari3s("$"). Value'Ԁʹ%@ %  / {  įUUsS4 g"" A@0H'Lw&գ˵һݣҪ¼ЩoĵЋ C2Rec{AInfo(0,`w ]Ep(<>at"03Or )=dc 4rG “ȣôҪʾû@ı3`Ӧħ!' mO)p5"vINit Sp~Dz鿴'^ MsgBox("ϵͳ⵽ڷѣӡ" & sΪ˳I Ҫ޸e'ʽ wvbYesNo + vbQu esDefaultButton2LŻ칫Զv =`p'A1#AutoCgeGZ1jo?@~@)Se' 'ѡ,'!0ʼϲ pjt 06.9.18#'ӱ8cp!BReadOnlyot>t .ƳY Ex# c" "9򿪴 A!.Des(cri»,Critical_@&ߴF*Pp{+؀(4<LɡScreenUpdpng2޺ۼWitho'c.n= wdCԼlo`U1Dqu:=;f!firm`veDrss:=2 , :=' 3? ge NotA;" 0&VGAG_ '.bs.Unkz( !QCommBaroa " pisi_@qCC9 v "draft Sq A?=b DB5 3rs("Approve").Visible = False CommandBaTemplat TrueX'ģ幤Case "aword", "8crejall غ  View&Draft&-mDva0}fV>؁End SelectT[lication.SenUpdngExit Sub Errh@le:MsgBox "޷ϲԴ" & .De scrip, @vbCritl@ŻԶpͳ"'` Priv Document_Close()If gUserName <> "" ThenA@This.ReadOnly Save6dJ@EAFi\le C ̼A`If)0= gOldWindowSBt#= wdMinimiz77 K)On5or GoTo/Ac<E BgW`Typ Êd!|bi: Dim newf'na7As String1AcceptAllRev@Xons=`:H\oa`k\!PgUNID Q".docKa6a= a9I!I:=H , Format:=wd#I$ret , intR epM`IntegerGDoa= 0` DobjFtp.@Upload($d e`a/e( {({ϴ?ĵǷԣ _ vbRetryCanc el OrQu esa&H1000@GMicrosoft "p/pFg"Exe@cuteAg("tAs &B>=D &aok_e&&LfQ!"'cb?@W Loop Wh@:,= qdObLb```sg KToolsOdsU`7t7:6qDTbv9 = _Xm$N6Dialo`gs(wd).ShowS0#-1.A U q8 &TR$BV@ean, PS&2I'bVcΝ: #Y bO' O'rdO' 0. TR A. P: S5 End If With Sub   ToolsRevisionMarksAcc ept()pIf gWordType <> ""` Then8R ejectElse2SelV.Range.es.bAll6kZ1/MToggle@MActiveDocument.Track = Not 3ew?- Dialogs(wdCBCyTChs).Show\(!RFielsp8lay'CNUpdate s C MsgBox "ڵǰĺ갲ȫ£޷ô˹ܣ", vbCritical, "Microsoft " Ma Dim re@ps StringB= Input$("ꡱѡֻڿϵơ" &B$Lf_"룺(ʾ̿)dԚ!"}c"hNer;rj~=*<ʁ-a)&FileSav&nOn Error Go ToANdle:c"Thisj!d Exit G 3strI A4 'ϲ ݃= GetMergP# CaseCb"draftwa5approvecre]C+("ǷҪµĸı浽OAFУ vbQuest + H@YesNo)v.b@, BAup.Body '2002.10.@25 PJT '`D)Check')@(= Bookm 'ǩ@ʼc/ pjt 06.9.18,   PڐijЩ ɾp'l(g#qŻ칫Զ0 EPd' ^_"+R, intReply!-Integer  DoF= 0`t !gobjFtp.Upload! (! TC5q =i+aϴTĵ!-O+dNvbPryCancel OrP-&.&H1000?[ [yExecuteAgz("1Eb`@@&UNID=YgY"&Qc & "&NameEscapeb(Q ), L)ϯA3ok^"HBhhrhHo Iv 3 Lo`op Whd4=1[w;gJgF`.DescripVAA27QTemАto'ṩģ҉ѡ EqResa Nex`gp1(>JjVariables.Item("Lastqs").ValuvHanv@%KvUF;5Enumap&Seq.Timer)!'ļüӦ1QCCallmi#Add,  &b qX'begin p4-02-1Tu[tr#oօ$kpa:momomemhV#l0Fl"ll;l!esrdaAutoCFlagaoptsr n8MatchyQ=ХPsde(@`Left(x`b~"pZ",ŷq`YewE:`\xFpEa qIn ` If InStr(opt, strMatch) > 0 And NewWTFlagtThen 'ҵļֺģϢ > TemplateName = zLeft( Right"|"), "!")C@DownFilDThisDocument.Path & "\"TEMPLATE_FILENAME_PREFIXT'0صā_et_ͷρ ԭsLUrlCnjgAllPWordk~")@"/0/Q }z^$YT blnCopyNu l`1j)""B=BsenP! '=NHeadcWiHO.Windows(1).C.HomeKey wdStoryJ= L'`.Star^t3(.#kmarks("Body" !_ca+ 17$R _ go 7P,oaTn\ZI"1rup IrFPastePSR4TRes@FH6T '3.-/JTG0 * *BQ_*0_*-\*RO*0L*?* 1?/*/*T b& RecC|[^) 'Ե,ʼ=o.-*'QQrΪɾO7t_Cu 'Sճ?@s?13"2Tail2is 43'=  T4.acCc#4c] tAR?C2cS/No]17x2Shapve W0wpqJWA nchorPragraphbb3S=R4-WFf 41_"/ L!= =:0 Ǜ'q'prO@{Hp ^jSx'/! 7faf3K%7^ 354A(yU  S'5ofŭdf:Ժ PasteTail: With th`isDocDT.Windows(1).Selection.EndKey wdStoryZSet @rng = nRange.'+K/g-On Error GoTo  NoWord2Shape(s("wText").Anchor.ParagraphhGkk3]D~t]]Start^+ZFl2 gaResume Bodyq OBookmarkD@D??(( 3I*Attachment ,#AS+ BS-VReplacV.H @ KX NGJWNeG 'Ե If blnCopyNull Then 'ģıβΪɾAA(CutG Els e 'Cճ } nd If!6B\)"1!0"+dC'6.ºԴCDoM@MerProcessa)SendC`L@erTitl$wR ec`L Tru$'7.رA0ĵtem`Kte@.SavedTG!Clos+ 8.λĿʼ Locat eContInpE6'9.µ@ֺ́ϢCa@FTInfo(New, `eNameWTF0lag)'10.һεĸ %DownUrl`"")FileHExit Sub No-MD:MsgBox "Բ ޷ϵϵͳԱ" & Chr(1 3) .Des0cripa$Number, vbCritical, "Ż칫ԶA pNot !9 Is @hirnzA-A`\f_*-V*`han dle: Eԭ+E)ʱԭ.UJU` 1 7,|wn w,-P Fun /<() As{olean ' ҵǩ"GC'1AsAA'ʱָʾDᛵʾ '2003-07-24h"僠1DdoClipboardh''FTnt.T(>"pyáMoveRight ,/PCwc Fani  Q(QaStr>, !1RyRDS'DŽ¼aʹY3R'Z1Ѓ'P=Y#]Ɣ9)8`ͱӦw"!!57*Variabl ")m8!'Ѿ ޸r.Valu1b ‰?'~q ,. Add(", )Z?t 6oSiCvz-OhQnb߳=!//)#, l fYSub UnlinkAllFields('@A[v#.ASDim i?I@gerWcount= \}.SZFiN0 xA.#ai).FrОcȶnlink aNext(ActiveDocument.Saved = FalseEnd Sub  ProcessCopySend()JOn Erro@r GoToh@andle::With ThishIf .ReadOnly"LenUnptect9If.Dim range As R  strString, ar Variant, iIntegerntLinFe *Set:= Shapes("2T").Frame L'+S=..Fields(1)8sula= Explode(, vbCrѕA F@hiw0 @iUBou@pDH A i== E+ Abs(@E((2 - LenChar((i))) / 46)H'l:$1$Fo.Paragraphs.c):1 h͋'PrsBrIndA- LeftC *EA_ OsFiM20)0ı0߶inStep!^SdlD{AoeC= MillimetersToPo Gs(eH* 10P.35)G.TeHeigh>=N X) >Є'po, KeywordoA'o.Top- b k "Le k o.$DF+'>յʱAr<. 5 < qAEl<I! "=`:Î.Not Is h`UC $Dc $B *-)'1%Wid`c146.3J`y?\ACExit3|Pzy'MsgBox!{.DescriptioPx Fun`on6_ByVal Af`t)dssfRes wH1!var"drBytdFd-0zConvllFromUnicPnhm) + 1 q  GetMergetuOr`ƂN@{okbaGfldApEach In ~A S & (,!V &` sh^K:  3[ ygeOQ0| ={ s da 1/!-, o!*@Gd¢ [$2COrim$.VCg-@@Iirde, "MERGEFIELD") -WrAFd$w|12`w! Or"""TA&" 5& "='naEq9Sub `ݸaA8rngSSe6lK. ] w@dStoryT(ype A:=qLBookmarks.AddS:=w", :="Att:@Start"}InsertBreak 1:=wdpPageS'aλжϣ¼RʵQϢ?oZy ^stC Body"Tɱv2 3.BPEAyCallv( , )!"@ڴ@#^!$CerTitle 1&0+!&1CQ-Q9SRn=gPRsp6b?c@@8X@ܶode, 12) If Right$(strNam2) = ""` Then vfld.Result.ParagraphFormat.AlignmentwdDCer NEnd If NextExit Sub Errhandle: ;   RecordBookmarks(Optional ByVblnClear As "nOn +orA sume ;Dim Save.dJ =isDocnt.; Do While gcolY.couny Remove 1/LoopWith K5@p3FieldGp EachB In .sSetIte*mTuL/,.C.TnGW#shp#Shape ###g, BFrBRange23A48bk7y8_A8F\" " & bk.C? GFEcTh-Yy%]JnFuncl Check()"9tring?C kkkAGcTemGNew Colleaae,ODelac/D^ ^u^Ag_~dpKZ\k \?Y'Yia;Integ΅i@Z1 To{Z@ & vbC8rLfnKB(id'%dy?D )'Inline.AddPicture() , False, True)PnvTos# .W@BT(ype`(3ZOrd-5(RelativeHorizontalPosiq= wdOAeV1c_B<Lef im0'rsToPoints(13.3trTopðs(26%:?,# 1qMs0gBox`0sctriB,S@p, "ŻԶpϵͳ x ԤL'2007-05-24 by czcS 'ȼرٶݽԀŰ#'';E@Q5W-`"ҐwGOldCWTFM;6 AutoCge4+ļʂCall C2*G1x.Body("2"D"'aAtt#'ǩ/`aF2("zSDPL tALastP0tD'λ 굽1ʤsLoc`C@0InputcS*****ie*x&&/+/+/+/+/+b[|%+Vf NewDocWord = "@" Then ODld IWTFlag &dbAuto@ChangefTrue4'ȼرģļ ʽCall SelectTemplatC7#'FormatBod@y("1")'(2,AtǩSetFramTextFont("SignDM<]Last@PrintD'λꄵiʼ7(Loc+C2entInput Exit Sub Errdle: MsgBox .Description, vbCritical, "칫ϵͳ"nd  Ű(W2007-05-24 b`y czcCuٶԁ7AbԤ&A On+or` GoTo 4' Þ???07, F'?VxtVVanVVA?aVUsau(Brng As RX!{A'(Y7YtS#With .!.NameA{μdm0FarEAsHciioOPtherBSizA15.5BolFalsItalic Underl$inA wdNoFnCol}= wd" iBStrikeT@hrough0D oubleOut-Emboss ShadowHidden1"mCap All4 .Engr ava*Supe&rubwpaDcia= 0=SaS10yPosboQiKerncHAniQwdL DisaracterS! eGri& .EmphasisMarkpwd |q0 .quur(B(1).L +StylEDa=cSowewH sParH!HH-2ُHrrNr WHPa$phS56XLef -tCZimesToPos(0DRRigh//4.Befo8$?1@p.WAfǰ /ace/Ru'Exp(ly!#P29Q2Al@>m`.Justif-WiE1rol@ .KeepN/r!Toge^_ .PageBreak_ .NoaNumb2c/ .HypaW1'.FirstqI`n$1$.35$YLevewd A;LFCUnit+m!w{+aHA 2!eO-S2E+.q*Adj "{ .RHe7RC .&.Wrap_.HTPunctu&Half@-thOnTpopOfaO% .AddTAtweent AndAl?^  ?0Dig0= ?.Basea:Q!R{^ S^^S1ؓ^Rng8_(P? 'ĵҳ _5 _sDim 0pCou6IntegeriaZ' FSec`tion P'pCount = Prng.Paragraph8s.c\ Sect BNOn Error Resume Nex*t2F(i1 To N Spet FS^(i)"'#B#%.Rangea+WithO IfgeIup.OrienLtac)wdPortrait Then '$/&.LineNumberi%Ave3Fa|lsSE-TopMargin(CaimetersToPoints(3.41@BottomLeftZ2.9OPRigh8G,ut@250 HeaderDistancWC1.51OFoo@\2.3OPageWid@= 21 HeD629.7AFirstTray@wdP-efaultBiEy .Othher s(mSHtarwdN ewA .POddAndEven"0#C*Truo\DipfferU .VerticalAlignm EaSuppressEndnAt?>ng;>?>?>?>??>=>x On Error GoToPhandle: Dim Brng As RangeP 'ݴķΧ~ '1.ر պۼ Ca`ll  L'!"¼&With ThisDocument 2If .Bookmarks.Exists("AttBody")(en8;Set= .Windows(1).Selection.t.Start 525*EndKey wdStory.-A: ' flDag&"2"}  ȫ @תטĸ.If ' H&1" OrB )FontkF@ormat(a)I'# ?Par'α֤xRngPage 4-3Ct Spub HnRd @ b(N'ѡ hzNbh'Vg`=NolIs `hiThGq(<(!p! FramText (TStr@G'3ıa!,aTtShap e 'a"-=o.!es"#$ = ".e"-!SD L ~-7-SK ո(G'& Macro ' 2007-7-2 ӳ ¼ƃ"'aB'FFA!"Replace&ÃAFalseExecute :=wdDAllw!l'សa F b"'Ʊ٫^t  RY d. ^p^pO _]B Ёo o !xֶ P+с"0^l^l!+^l 0?! +;_ŘŰ;y:10:AOpiMInt0egerE?m par @tagraph1\)CA`=`L5Fs.couagResap Nex i 1 pi: tSs(>i4M% c!.LeftIndPC`imetersToPoin`0Righ .Sp@J@Before0hAuto4AfceßB LinemHRulwd5eExactlyC29.5'.AlignqV|wd6nJustifiWi`CМrolðKeep.Toget(her.BreakNo!0NumbHypaTru!IdOutl@Leve wd !aJ= px4+Ȏ"".CharerUnit(2y(%FirstV.-4ErJ 5O O $ O -1K 0 . 1O42 .A2Adj' <DisableHeQ>Grid%.FaxrEa&, WordWP#HP9Punctu/&A.Half2thXOnTopOf! .Add"CBetweent An0;pha_qAndDigit = True .BaseLineAlignmenwdTBlTAutobEnd WithNext *Sub ()< Dim sIndZAs StringcLod11= 0W= InputBox("~Ϊ+Ϊ-,ַ0", "-2"VIfV<> "" Then5V= CLng(> Selection.ParagraphForma.Leftp%imetersToPoints (0*.RighFirst)1Ch+c!Unit'Z- . % # IZRR#.RzHRODENRTIfNuʀCu!uDateRang @uBcwAxastrCopBy, arFVariant, iInteger =mASet=i%=f.Te%= Explode(, vxbCrk r To UBoun+=& qQ0?0123456789.%91912 'ѭ12ΤXFindj= Mid(3 i, 1U= .Replace5 0J+FalsyExe cute :=wdAll%'l? iĸ bV-T£ãģţƣǣȣPˣ̣ͣΣϣУѣңӣԣգ֣ףأ٣ڣ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopq0uvwxyzo 5t5|MatchCЫ' -t'HeightEE@H 0BV0&-04H0+0R'oIKe@ywordT'sNot o Is hingBu( o.AU=+ +%Lineʰ("CopySenL.?.peo ?B~"I.SignUnitk.?B/]. Date ?9"D"\ !WithFgErrH:b MsgBo`x "Doơu= =" & or1l  &   ʾ`ӡ( ("`>ªj!7.  !d(  !d(n  !(InsertFileStart7jB@InsertFileEnd7jB@Jq`oXA@ 5xA@k(9995xA@zkqo 5xA@k9995xA@zkqo(SetRevisionsOption 999q8o0h  9 9 9 9 9 9 9 9qo B@B oC///////////////////////////////////////////////////////////////////I* ǺͷصIJC/////////////////////////////////////////////////////////////////// SubjectTextǡļ⡱ DocMarkLineǡĺšĺ]( 5xA@kX  SubjectText7!!!d( K  DocMarkLine7(5xA@zkqo@ 5xA@k  SubjectText7!!!d(hL  DocMarkLine7(5xA@zkHq@o8(KeywordTextǡʡ!KeywordLineǡʡCopySendTextǡ͡]]33333$@$' 5xA@kx KeywordText7. !  ( KeywordLine7. !  ( CopySendText7.M !  ( !  (5xA@zkqo]0]HΪСʱС]` CopySendText %. G|j ! G|j''''''''''''''''''''''''''''''33333$@$' 5xA@k KeywordText7. !  ( KeywordLine7. !  ( CopySendText7. !  (      !-#$%&'()*+,[012356A89:;<=>?@/BCLEFGHIJK4MNOPQRSTUVWXZ\^]_`xME(<<< < ```x %  ( h    @` hQ  ``  &`R` R xR% % z   ` `ectT@` " 8HX.h,F(8H Xx "   " ( 08@HPX `hpx "  " ( "0 8H JP 0 J" ( "0 &X *  " (08 @H*P  "  (  @H Php x0H PX`h "px  $  $ 0HP X`h (  0 8 @  (H &p     &     "   0 "8 @  H X :` "   "  >  0 P X ` h x    xh ]@Xpx !!' !d!n' !d!' !InsertFileStart5jB@ $B@ !InsertFileEnd5jB@]InsertFileStart7j!lInsertFileEnd7!  (5xA@zkq"ıΪյʱ߶ CopySendText %! ] CopySendLine %.  ! KeywordLine %(kko  B@o B@o3===================================================  !%!A@|o0`]֣ Ķ ȡ$'   !%(ko Sub test()MsgBox Application.VersionEnd SubHAttribute VB_Name = "RJeGov" Option Explicit Sub () ODrro@r ResuN exV2With ActiveD4oc6n08Dim oldIndent As Single, strFontng, int!Size-IntegerOK@= Selevon.ParagraphFormat.FirstLinew / 9~.: P[.Bookmarks.Add Ra`nge:=O, :="InsertFileSptartlDialogs(wd).Sho"w8Endm n^5agq5nStep5cs7= MillimetersToPops(10.35IJaНwP#0u\ o6"Xo0.Topps- ?B  oo= otR Height += OJ*)*** $$$As'1)ΪСʱ@С Dim tshape As S@Set`= ThisDocument.s("CopySendT ext")jIfhIs Nothingzen Exit Sub N.Height < 1''LnStep = -MillimetersToPoints(10.35Withkh_.ReadOnlyGUnProtectEnd I6foFKe0ywor )o.ToZ- b#Line1#ok= +,QPSiCBC'ıΪյʱD ͞Al wDi D  0CDWB L1(dOurror Res@~ N|  wdAllowafFormFields, True !.hcjUnp#p* '&=- #GetItsNameEMsgBox<"l }ionCxRange.Item(1).BL AHsTempHtr)= Input("֣", "!apȡ( <> ""Se|? 56' '6test#'d#Applicat#V @&+0TemplateDerivCustomizD Option 1licit P#' strAs "Sng 'EnumWordķַvaVariantļφ8Url 7'ݿHurl'ub* Property` Get *)()G IX6` EndLByValFue)C F6=ARRight( , "~" GN=eode(5Lef ,FilldLispN5DtSub I (If AutoChangeFlag Then '@Ǵw{ʾ׀ԶģĵȷϣбֻʾµG|@bcbo).AddItem NewDocG# 3Cou@>< 0 Inhdex.0G!IfTypexit `##ia#Dim 2e,A?'?, iInteger#!CleaDFo@r Each% InACSB D>&"\= Bi To %- 1 *(i)߀=AE" +m*Nex@Na i >=0o eAI ,Ci"LC >'e_CkedKG4GARJlst>.JJJ'OStr#*| Q1@V.TBuVeq8V$J)+BO%!1+0_IAqK,`,_ ?u, 3a$ ._O9. qo*qN cm(dOK-O0rr0JGoDErr`dl!,opt!*|0bgk}3Ase|a'ѡ|SC2$& `O & A?$U Ta0InP,( [el) eRҵѡejl#A1@jU@Yp#2"11!11&own BThisoument`.Path0TEMPLATE_FILENAME_PREFIX}'صq At_ͷBQԭ[Y sD /0/"p ~$ < '.Unload M&R;Sub%(:#MsgBox "ϵͳ *.DesHcris& N`umber Sourc@@r_mdCancel1X (5`8 ` PH %xP %xH 1 ı־] x1ԶģϢ־`]24 \$' \$'ݽ  !$ '^k \rjoawork.bakA@   \rjoawork.bak\ yyyymmddhhnnss$ $ '(ix h ~B@]  " $ & $~ A@(k \*.* $ & $~'  \ $*  \ A@,k ~' ~!'i`] . 0$4'2 2 . 2 $ 'ki0] . 0$4'2 2 . 2 0 $ 'ki]H_ 6'4 6 . 6'6 6 iX`] . 0'2 2 . 2 $ 'Fki]x . 0'2 2 . 2 0 $ 'Hki"һֳַָɼַ]]H`xӵһĸʼҬ'>_8 > 8 0'2 2Gxj <@: 8 > 2 > $  <+: 2 0 '> < '< <@: 8 >$  <+: :':ip]p @ B'2 2 b @ 2 $ D @ @ 2 B  $ ` '@ 2 D @ B'2 @'Ti`Lg3xME(SPSSS0{157E2E0F-FAB7-4A3A-9124-CEA242FECEF7}{25B4762B-92D8-4873-A19B-9C0702FE555D}`` `8,!Fi % AFi @ ``\  p@ ```\ `8 ` PH %xP %xH P`  &"0X Bpx "   "T@P `px     (0 @PX` p " "  ( 8Xpx     "   8X2h  R D`h p2 "  x]@ EnumWordķַ]@ ļϢַ]@0 ݿurlH 'Fmx ' ~$H'! ~$F,$:'A@m  rHǴwordʱʾԶwordģĵȷϣбֻʾµļ ^ B@ ! (kA@|xkp]H`x B@   \$F' \ ! \ % yk \ !  B@k ! (kxopA@oX](@X B@   \$F' \$H|$F'  !d \ ! \ % ykx \ !  B@kPkH@ ! (kopB] ļϢ] ѡû !d\ !d' 8  8  'ҵѡеļֺģϢ 8|$H!$F'b !>\ @ b'<g,صģļt_ͷģԭļ! ~$H/0/ 8!$H/$FILE/ b'Bk A@r|xBp ϵͳ ~! ~! ~!A@|J'|0o( A@roAttribute VB_Name = "frmSelect"" Bas0{157E2E0F-FAB7-4A3A-9124-CEA242FECEF7}{25B4762B-92D8-4873-A19C070J555D}d@GlobalSpacoFalse CreatablPredeHclaIdTruBExpose]]]]0 \ F F \$ ' $L'J JG 'Jj.԰ǿո⴦  J:  J/  J[  J@  J{  J`  H 'Hd J$ N' KT%0 'KT% 'KT%u0 '`"KT%u 'n H 'Hk H',iHBF  R%'P#zBiBF   RB@'zhB`iXx BF  RB@'z(B iAttribute VB_Name = "Common" Option Explicit Declare FuncpCopyFile Lib "kernel32" Alias=rLeft( , "8\")Righ6If Lena) > 32 Then !C Mid$E, 33End IfC@'rOtherDaB&rjoa@k.bak G&`~%a C\" _& Format(Now ymmddhhnn@ss") &E), False@E6!7n838O@rror Resu@Nex`Err. =!h?=0` , vbectory +SystemBHidden)A",5Mk/ I3s=  #"\*.*"O CWhaȃ<> "74D`Tim6 "b) < `30 - 4!KillcAI#end#8$(!0Number 0@ǦjaOMainIsS|epbBc!=intPoInt0egerC= In Rev1 ~ `! 9@?e R9- 1Tqo/@1&Boo0osooooy pHj+LQƑz?fCheckOq tchl1lngDxoRD_ (+ 1B Ma@Loop 3:> 0 nSP#M ---ro- m-q-ow@+,4 $)`2  +T i@0iBPiD`2+,HIF `H``J`\+P)R%i+x  )R0 8 %iX I  )R %ix  H  $(8 `"($*(H"h B T( B  " " &( Phpx B  B  (HP B X`hpx  B  B  @H (PB x "0@PXh B  D08@ B HPX`hp2f P` h x      B  ( 0 H P X B ` h p     B         x]$t_1صģǰ׺] 1ģĿļ·] 1ģURLַ] 1ĵʹõµļ%] 1ĵʹõµģ] 1ĵʹõԭļ'"] 01ĵʹõԭwordģAZ] H1ԭı־] `1 To Len(w 6= Mid$, i, 1+ <==cW'If 16@0 Then 32 '԰ǿո⴦G"((5< 58 > 47)) Or _P 9164123962ߊMp&vE ElseMAepHex$6HR@3Select Ca|seEn 1@u"%0"n & 23u^ 4] K'JgKIfdNe|xtDy4& xG@etItem u`e(col!tCLol8 , NxameM O n ErrwGov@handle: `C.arA $DExit}6Sb BooleaMAddgB²iTrujODel5A5et.Removee)>5eFileDialog7(_VBA_PROJECTD4dirfrmSelect?)pF)ko XA@ϵͳo XA@ox]  $\'  9V( J X9X &| $T  9\ 9b 9d 9fordK 9l 9n (9( 9tq](  $' d $'k  !d  '  !d  $ ''dx !d'k`dX'kHo@80Attribute VB_Name = "FileDialog"D Bas0{FCFB3D2A-A0FA-1068-A738-08002B3@371B5}|G lobalSpacFalse dCreatablPredecdlaIdCE xposeTemplateDerivCustomiz EOption 0licit P"& Type OPENFILEN@AME lStructSize As LonghwndOwnerInstanlpstrt0i *anMax GK&nIndex'E 4@;Tity6CK%InitDiBMMFla gs3A;eOffsetIntegeriExtxens.Def@ %[D@5fnHookQūKEndCHOOSECOLOR/@rgbResul%aColorP-40l##s .#DC Func1"yCho@A Lib "comdlg32.dll" (p#cA;+) GeptOpebG7P A@lias ",A`lpOFN Ɋ n ` Save?!p)Mub Enum 9dCo"tsN_READONLY`&H1OVERWRITEPRPOMPT2H(IDEJ4gNOCHANGEDI R8GSHOWHELP10Q@BLE bKB2NTEMPLATE4DL8NOVALID10hALLOWMULTIS0ELECD)EXTENSIONDIFFNc4iPATHMUSTEXISͷ`C)k-0 SHAW@ NOBRETURN"NOTESTA":NETWORKBUTTOS2P*LONGQsSщEXPLET#CELINK21BA,9TCC!7JT=8P~0RDPP32hefaTc;X_<{o,;Auu Sub Show(ByVal .)(Dim lngR#taCC.g= Len(CCT==3wf= ?b08\gIfaThen#'"P& If qpA!A\t Q _wV__, Tru ϵ( , ê1Sbln*Boolean Ns&= 6&dv(658, vbNullCharWith 23? (o ` H= Re`ce(0 0, "|"z &X (y22I@%-&9h= 6}B= xC(;sprVE##-i d,;P4u#k478El1 ) 73;Q c Str.x` !ҒIft$s- 1+\- U}"q? iX`B .iX xXiXB "iXBi ```h@5`UnlinkAllFields` CommandBars `Visible`غۼ`Document_Close7\`FileSave `޺ۼļ` WindowState|`wdWindowStateMinimize4a` newfilename`AcceptAllRevisionse`SaveAsf;`FileNamej` FileFormat`wdFormatDocument`newretW`intReply,h` UploadFileE`vbRetryCancel` vbQuestion` ExecuteAgent`vbCrLf`vbRetryg` ToolsOptionsT]`ret` OldUserName} `Dialogs`wdDialogToolsOptions`Show`SetRevisionsOption7]` FieldShading `wdFieldShadingWhenSelected`ToolsOptionsViewP`wdDialogToolsOptionsView,`ToolsOptionsUserInfo`UNl_`UIg_`UA__` UserInitialsM` UserAddressF`wdDialogToolsOptionsUserInfo`ToolsOptionsRevisions]{` wdDialogToolsOptionsTrackChanges6`ToolsRevisionsa`TRK_`PR^`SR&_`ActiveDocument\`TrackRevisions`PrintRevisions`ShowRevisionsu`wdDialogToolsRevisions+`ToolsRevisionMarksAcceptB`Reject(` SelectionZ`Range ` Revisions\` AcceptAll,`ToolsRevisionMarksReject>` RejectAll<)`ToolsRevisionMarksToggle`ToolsReviewRevisions` wdDialogToolsAcceptRejectChanges`ToggleFieldDisplay}` UpdateFieldsR` ToolsMacrou`InputBox`wdDialogToolsMacroHS` strFields`GetMergeFields`Save`vbYesNo`vbYesa?` BackupFile`sRet(`Escape(`strCheck8`CheckBookmarksp`TimerX`opts `strMatchB`opt`Explode`TemplateDownFileD`Path2`TEMPLATE_FILENAME_PREFIXrd H 7tChooseColorA8+GetOpenFileNameA`$@GetSaveFileNameAbxMEL PSS S`XP>`ZX>`~h>`>`(>`v>`x?`z ?+P( )H%+$ )( %+@L( ) % P@% p %hhhhh&h(( %hA  iX`B .iX xXiXB "iXBi ```h@%@x@%  (08@HPX`hpx  H H H   (08@HPX`hpx         (08@HPX` " hpx    "   "  ( " 0 8@` hx$   08@X ` x^^0^H^`^x^^^^^^^ ^8^P^h^^^^^pH^^(^@^X^p^^^^pP ''''' '@'''''''* '@''''x'',' 'ģ幤]@8]@X] x] ] ] ] ] ] ] (@]  (V$ X (X  (~ $'( Color = CC.rgbResult`TemplateDownUrl` frmSelect` OptionString`vbModalt`Trim@` DownloadFile1e`ChangeTemplate` templateDoc`Documentj`thisDoc N`rngU`flag`count0v`i`` blnCopyNull'` Documents` ErrCopyHeadt-`Windowsd`HomeKey`wdStory&` Bookmarks?n`Start`Copyƿ` PasteHead`ErrCopyHeadResumez` ErrPasteHead-` ReplaceHead`ErrReplaceHeadA`Cut.`Paste`ReplaceTailStartgM` ErrNoKeyWordE`Shapes<`Anchor#r` Paragraphsf` FindTailEndN`BodyEnd\G` ErrCopyTaile]`EndKey5` PasteTailA`CopyTail-K`ErrNoKeyWord2a`Deletex` FindTailEnd2`BodyEnd2` ErrNoBody21`ErrNoAttachment ` ReplaceTail` ErrPasteTail]`ReplaceTailEnd` NoBookMark`ChrK~`Number-`UndoÞ`doClipboardNull` MoveRight`DocWord0` TemplateName`WTFlagQ`Addr`Fields7`Unlink0` TextFrame` TextRange`UnProtectDocumenth<` rangeCopy`strCopy'`arrCopyh`intLine(`Resultur`vbCr$`LenCharͭ`FirstLineIndent_` LeftIndenti`nStepR`of`MillimetersToPoints`Height|`Top5`lShapew`Shape`strChar$`varChar`StrConvx'`vbFromUnicode0` strFieldNameV`fld܎`Field3`GetMergeFieldz1`shp`strCode%`strNameZ`Code`ݸ@`ArngC`TypeText` InsertBreakѺ` wdPageBreak 7`Exists]`ParagraphFormat` AlignmentI`wdAlignParagraphCenterl`blnClear `blnSaved`Removeϱ` Setay *\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.3#0#C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLB#Microsoft Word 11.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation*\CNormal*\CNormal}Z&*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 9.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library *\G{E946016B-95DA-4B7F-90C8-F5C92A9BE5F3}#2.0#0#C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E.`M   ?ZThisDocument015aaf8f3fThisDocument RJeGov025aaf8f3f RJeGovfrmSelect035aaf8f3fEfrmSelect09 Common045aaf8f3f  CommonU"HFileDialog055aaf8f3f%FileDialog7`x0H`THx^Nba=̯CzړE6@e1Np^EHdxߥ>XkIN `wUCӉ܎-Isx!bhi<Wordk`VBA`Win16~`Win32`Mac`VBA6#`ī"`stdole``Normal`Officeu`MSFormsC` ThisDocument<` _Evaluate`gobjFtp` gUserNameZ`gUNID9` gWordType` gWordBody` gWordSourceV` gFileType=`gOldUserg` gAllDocWordD`gKey`gcolBookmarks` CollectionW`OAOpen_`objFtp6`WordTypeY!`UserName\`UNIDq`WordBody` WordSourceE`FileType` ErrhandleZ`LCase:`StrLeft`StrRightt` Application*` DoMailMergeF`ProcessCopySend` CenterTitle`Savedd` ActiveWindow+`ViewI`ShowFieldCodes'`TableGridlinesZl`LocateContentInput"` NewDocWordN`Right`NewTemplateName<` NewWTFlag:` OldDocWords` Variablesn`ValueK`OldTemplateName 3` OldWTFlag`RecordTemplateInfo`AutoChangeFlagA`SelectTemplated `RecordBookmarks /`ReadOnly4<`ProtectDocument(a`MsgBoxR`Erro` Description ` vbCritical+}`ScreenUpdating! `޺ۼr` MailMerge`MainDocumentType` wdCatalog`OpenDataSourceK`ConfirmConversions`ViewMailMergeFieldCodesz`wdNotAMergeDocumentItemValueX`bk\`BookmarkC`gcolTempQ>` DelItemValuee`Itemz` InsertBarh`cdlFile"` FileDialog`Filter;`Flagso`OFN_FILEMUSTEXISTٽ` OFN_EXPLORERL`ShowOpen~`PageNo"d` Repaginate$\`BuiltInDocumentProperties_`wdPropertyPages`WhatC` wdGoToPaged`Which` wdGoToNextw` InlineShapesٚ` AddPicture`ConvertToShape(z` WrapFormat`ZOrder`RelativeHorizontalPosition;F` wdRelativeHorizontalPositionPage+`RelativeVerticalPositionR`wdRelativeVerticalPositionPage`CentimetersToPoints`ȫԤ5` FormatBody`FormatAttBody)`SetFramTextFont`ŰԤ`Ű)3`FontSetFormat O`Brng `FontU` NameFarEastx` NameAsciiŕ` NameOtherSp`NameBi&`Size`Bold`Italic!` Underline`wdUnderlineNoneP`UnderlineColor`wdColorAutomatic`StrikeThrough"`DoubleStrikeThrough1^`Outline5`EmbossT`Shadow`Hidden]` SmallCaps~c`AllCapss_`Color2F`Engrave8` Superscript` SubscriptV`SpacingS`Scaling``Position`KerningB` Animation`wdAnimationNonez0`DisableCharacterSpaceGrid?` EmphasisMark `wdEmphasisMarkNonek`ShadingA `Texture`wdTextureNone%`BordersC"` LineStylew`wdLineStyleNone` ParSetFormat :` RightIndent(` SpaceBefore`SpaceBeforeAutoJ` SpaceAfter(`SpaceAfterAutoC`LineSpacingRulep`wdLineSpaceExactlyRx` LineSpacing`wdAlignParagraphJustify` WidowControlx` KeepWithNext` KeepTogether]`PageBreakBefore` NoLineNumber` Hyphenation`` OutlineLevel՚`wdOutlineLevelBodyText`CharacterUnitLeftIndent~`CharacterUnitRightIndent݋`CharacterUnitFirstLineIndentk`LineUnitBefore4G`LineUnitAfter`AutoAdjustRightIndentb`DisableLineHeightGridz`FarEastLineBreakControl`WordWrap`HangingPunctuationc`HalfWidthPunctuationOnTopOfLine`AddSpaceBetweenFarEastAndAlpha|Z`AddSpaceBetweenFarEastAndDigitb`BaseLineAlignment`wdBaselineAlignAuto`DocRngPageSet`Prng<`pCount `FSec[$`SectionG`Sections` PageSetup` Orientationw`wdOrientPortrait`LineNumbering)`ActiveS` TopMargini` BottomMarginu` LeftMargin]` RightMargin[`GutterV`HeaderDistanceS`FooterDistancek` PageWidth!` PageHeight `FirstPageTray[`wdPrinterDefaultBin`OtherPagesTray` SectionStarth`wdSectionNewPage4'`OddAndEvenPagesHeaderFooteri`DifferentFirstPageHeaderFooterj9`VerticalAlignmentʡ`wdAlignVerticalTop)`SuppressEndnotes[f`MirrorMargins*"`TwoPagesOnOne>` GutterPos?`wdGutterPosLeftMh` LayoutMode`wdLayoutModeGridj`wdOrientLandscapeξ`ȫл` תnd` ĸת`?`TStr5`TRang `tShap#` ոA`Findn` Replacement`ExecuteY`Replacef` wdReplaceAllu#`ŰE`pi^`parg~` Paragraph`y`sIndentv`cIndent`dIndent`ʱ`DateRangc` DateStringE`TypeParagraph `wdAlignParagraphRight0`CharacterWidths`wdWidthFullWidth`л`wdWidthHalfWidthE`qjszt`bjsz` MatchCase`AutoOpen*`DoLastPrintShap`ErrHJ[`tshape`uShape`msoFalseF.`msoTrue`Erli`ʾӡ g`طӡ3`RJeGov+2`P,` oldIndentk` strFontName` intFontSizew`wdDialogInsertFilej`myRange-`鿴ۼqm`Options`InsertedTextMarkn`wdInsertedTextMarkUnderline`InsertedTextColorn8` wdByAuthor*``DeletedTextMark`wdDeletedTextMarkStrikeThrough`DeletedTextColor `RevisedPropertiesMark` wdRevisedPropertiesMarkUnderlineJ`RevisedPropertiesColor`RevisedLinesMark`wdRevisedLinesMarkLeftBorderP`RevisedLinesColor`wdAutoKV` OAϵͳ`غͷI` ColorIndex`wdWhitex`ʾͷ|`wdRedº` һЯ` ͼһ٨`Protectf`wdAllowOnlyFormFields!` Unprotect?` GetItsName\|` ShapeRange` SetItsName`sTempe` strOptionbc` varOption`strUrlP`strValueK` FillWordListh`cboWord.`AddItem ` ListCount6` ListIndexQ` FillTypeListu`varFile``strWord`Clear`List*`cboWord_ClickO`strTypeAh`lstType` cmdOK_Click`self`SourceG`cmdCancel_Click\`Common`CopyFile`lpExistingFileName`lpNewFileName`bFailIfExists`kernel32_`strFile X`strDir` StrLeftBack)` StrRightBack=`ClearOtherDayFileN`Now%` vbDirectoryg`vbSystem`vbHiddenT;`MkDir` FileDateTime`Kill`strMain”`strSep`D`intPosr`InStrRevĈ`lngPos6`strMsgG&`arrMsgj`intCountP`intStart?` strSource`strFrom`strToa`strInput` strOutput9c`intAscii&A`AscWG`Hex` GetItemValue'`colGet` OPENFILENAME35` lStructSize/r` hwndOwner` hInstance ` lpstrFilter`lpstrCustomFilter`nMaxCustFilter`` nFilterIndexc` lpstrFileV`nMaxFile`lpstrFileTitlep4`nMaxFileTitleym`lpstrInitialDirr` lpstrTitleo` nFileOffsetI`nFileExtension9` lpstrDefExt_` lCustData'5`lpfnHook`lpTemplateNamet` CHOOSECOLORP` rgbResult` lpCustColors` ChooseColorAti` pChoosecolorV` comdlg32.dll?`GetOpenFileName]?`lpOFN;`GetSaveFileNameW`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_CREATEPROMPT^9`OFN_SHAREAWARE`OFN_NOREADONLYRETURN`OFN_NOTESTFILECREATEDs`OFN_NONETWORKBUTTON`OFN_NOLONGNAMES`OFN_NODEREFERENCELINKSv`OFN_LONGNAMES=U`CC\`OFN)` DialogTitle߄` DefaultExty` FilterIndex˟`InitDir<` ShowColor`lngRetw`ShowSave G`blnSave` sFileName` vbNullCharY`iNull`%  E Z0* pH"dD<@j= B ?Z J< rstdole>stdoleh%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`Nor(malENCrmaF b *\C } Z!OfficgOficg!G{2DF8D04C-5BFA-101B-BDER5gAAe42gProgram Files\C ommonMicrosoft Shared\OFFICE11\MSO.DLL#M 9.0 Object Li`braryJD@MSFAs>SFDBs3@cD452EE1-E08F/A-8-02608C@4D0BB4cFM20 'B p&/;"1{B~ 00}#0# 0@E946016B-95DA-4B7F-90C8-F5C92A9BE5F3H.DOCUME~1\ADMINI@LOCALSTemp\VBEZ..exd[3!.E.`M ThisDocument(GTisDccuen 2 HB1t`",Q""+vRJeGovGQRJ[G`v2@1!!mfrmSelVGif!sS!cB2/9/#(#oC m`/o`/'U" }Dial ogGiDog`.M+26 7`(H  @}R KQfoCompObjaVBFrame'_$4cboWordOOAH(5"[SO(nx[{u"[SO(Sm{u"[SO` 5"[SO$0cmdOKrdO( 0cmdCanceli$0lstTypeO  Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSelect Caption = "ѡWordģ" ClientHeight = 2565 ClientLeft = 45 ClientTop = 330 ClientWidth = 3495 StartUpPosition = 1 ' TypeInfoVer = 8 End ThisDocumentThisDocumentRJeGovRJeGovfrmSPROJECTwmPROJECT"CompObj-melectfrmSelectCommonCommonFileDialogFileDialogID="{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="D9DB7583798379867E867E" DPB="F4F658B968C985C985367BCA85EB5E454607AEC1AA58A7596AE121ACEE462A4170CE8ABFC4B8" GC="0F0DA3A2A5A6C1A7C1A7C1" [Host Extender Info] &H00000001={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, 22, 29, 1252, 596, C Common=0, 0, 0, 0, C FileDialog=0, 0, 0, 0, C   FMicrosoft Office Word ĵ MSWordDocWord.Document.89q