ࡱ> twsz R 4bjbjBDyyd M18LH<hj:  6:1hhhhhh$(kmD7h- 7hLdhZ)Z)Z)56Z)6Z)Z)V0@z610=B%1 !6h<h1xn'n11&nn$1pZ)7h7hB(hn, :    ͂WSSNl?e^ sQN[upnGupnW129S0131-1S0131-2S?bK\ePQ[vlQJT VlQqQ)Rv^ ,g:gsQN2020t^12g31eOl\OQ 0sQNupnGeOO[:S9e ] zNg yvB-1a0WWW V gW0W N?bK\[e_6evQ[ 0͂?eS02020038S Q[_6eupnGeOO[:S9e ] zNg yvB-1a0WWW VQV gW0W Nv?bK\SD^\ir0 PW=͂WSSupnGupnW129S0131-1S0131-2S?bK\]ReQupnGeOO[:S9e ] zNg yvB-1a0WWW v?bK\_6eV 勫_6e?bK\@b gCgNgwmN Ny_6eN V_6eN*g(Wyv?bK\_6eePeHhnx[vePOS~{gPQN?bK\_6e蕾b_6eePOS0syv?bK\_6eePeHhnx[vOS~{0,dgP]Ǐ :NOupnGeOO[:S9e ] zNg yvB-1a0WWW V gW0W N?bK\_6evz)RۏL ~blQqQ)Rv ,g:gsQ9hncVRb 0V gW0W N?bK\_6eNePagO 0T 0Ym_lwV gW0W N?bK\_6eNePagO 0v gsQĉ[NS 0upnGeOO[:S9e ] zNg yvB-1a0WWW 0WWWV gW0W N?bK\_6eNePeHh 0 [_6eNgwm\OQ?bK\_6eePQ[ Q[DN͂?eS020210 20S?bK\ePQ[fN0 _6eNY N gePQ[v S(WePQ[KNew60QT)n]^Nl?e^3uL?e Y _NSePQ[KNew6*NgQT)n]^-N~NllbcwL?eɋ0 yrdklQJT0 DN͂WSSNl?e^sQN[upnGupnW129S0131-1S0131-2S?bK\vePQ[͂?eS02021020S ͂WSSNl?e^ 2021t^9g10e DN    ͂WSSNl?e^ sQN[upnGupnW129S0131-1S0131-2S?bK\vePQ[ _6eN͂WSSNl?e^ 0W@W͂WSSupnGNl'YS͂WSL?e-N_ l[NhN _,g LRS _6eNgwm 7u 1963t^1gQu sOO͂WSSupnG_l~n Ng\:S2-15b^NUSCQ204[0 VlQqQ)Rv^ ,g:gsQN2020t^12g31eOl\OQ 0sQNupnGeOO[:S9e ] zNg yvB-1a0WWW V gW0W N?bK\[e_6evQ[ 0͂?eS02020038S v^NNlQJT0_6e?bK\@b gCgNgwmN Ny_6eN ?bK\PW=͂WSSupnGupnW129S0131-1S0131-2S ^\yv_6eV0V(W 0upnGeOO[:S9e ] zNg yvB-1a0WWW 0WWWV gW0W N?bK\_6eNePeHh 0ĉ[v~{ePOSgPQ _6eNN?bK\_6e*gb?bK\_6eePOS Ee?bK\_6e蕝Olb,g:gsQ\OQ?bK\ePQ[0 ~g͂WSSupnW129S0131-1S0131-2S?bK\MON 0sQNupnGeOO[:S9e ] zNg yvB-1a0WWW V gW0W N?bK\[e_6evQ[ 0ĉ[v_6eV vsQ`QY N upnW129S?bK\CgS00022621 ^Q{by76.58s^es| W0WS1-2003-01-1114 W0Wby58.60s^es| W0W'`(:NV gRb ?bK\(u:NOO[ ~upnGW9e nxCg[\~[ g~nx[^Q{by97.83s^es|0~)n]'Y f?b0WNW0Wċ0O gPlQSċ0O ?bK\;`NTNl^668952.00CQ0 upnW131-1S?bK\CgS00106221 ^Q{by37.25s^es| W0WS1-2004-01-0212 W0Wby37.30s^es| W0W'`(:NV gRb ?bK\(u:NOO[ ~upnGW9e nxCg[\~[ g~nx[^Q{by38.19s^es|0~)n]'Y f?b0WNW0Wċ0O gPlQSċ0O ?bK\;`NTNl^484382.00CQ0 upnW131-2S?bK\CgS00106220 ^Q{by47.19s^es| W0WS1-2004-01-0211 W0Wby46.70s^es| W0W'`(:NV gRb ?bK\(u:NOO[ ~upnGW9e nxCg[\~[ g~nx[^Q{by48.42s^es|0~)n]'Y f?b0WNW0Wċ0O gPlQSċ0O ?bK\;`NTNl^603789.00CQ0   &,2\hnpúlS ްʛޛr_%Hhxj'h OJQJ\aJ o(1hhXxh OJQJ\aJ cHdhxj'o(hhXxOJQJ\aJ o((hhXxB*OJQJ^JaJ o(ph3hhXxB*KH OJQJaJmHnHo(phu'hhXxB*OJQJ\aJ o(ph$hhXxB*OJQJaJ o(phhhXxOJQJaJ o(  " , . L \ b d l r x | 㰠ukbYKhh(OJPJQJo(h>&OJaJ o(h+OJaJ o(hhXxOJo(hh1@OJQJaJ o(hXxOJPJQJaJ o(hz KhXxOJPJQJaJ o(hh1@OJQJ\aJ o(hhXxOJQJ\aJ o(h1@B*OJQJaJ o(ph$hhXxB*OJQJaJ o(phhhXxOJQJaJ o(hz KhXxOJPJQJaJ | X$dD9DG$a$gd>& $dD7$a$gd>& d9DG$gd>& d9DG$gd~ d9DG$gdm*gdXxd9DG$WD`gd$|d]|a$gd HVXǯ|ePB6Bh>&B*aJ o(phh>&B*OJaJ o(ph(hh>&B*OJPJQJaJ o(ph,hh>&B*CJ,OJPJQJaJ,o(ph0hh>&B*CJ,OJPJQJRHZaJ,o(ph3hh>&B*CJ,OJPJQJRHZ\aJ,o(ph/hh>&B*CJ,OJPJQJ\aJ,o(phh>&OJaJ o(jh>&Uo(hh(OJPJQJo(.hh(h|6OJPJQJcHdhxj'o(XZr,(r())***&+t++++&,t,,,, |dWD`|gd$d9DG$a$gd>&ZDVZ\8bl۹ۓm۹YY۹۹&h>&B*OJPJQJ^JaJ o(ph&h>&B*OJPJQJRHZaJ o(ph"h>&B*KH aJmHnHphu%h>&B*KH aJmHnHo(phu%h>&B*OJPJQJ\aJ o(ph"h>&B*OJPJQJaJ o(phh>&B*OJQJaJ o(phh>&B*OJaJ o(phh>&B*aJ o(phh>&B*aJ ph",(vr(j((2)4)X)h)))$*&*J*Z*z*|***"+$+++",$,,,"-$---.^/`////022˷˷~th>&B*o(ph5h>&hheB*OJPJQJaJ cHdh-j'o(ph'Hh-j'hheB*OJaJ o(phh>&B*aJ ph&h>&B*OJPJQJ^JaJ o(ph%h>&B*OJPJQJ\aJ o(phUh>&B*OJaJ o(ph"h>&B*OJPJQJaJ o(ph,Sev;NN/f_6eN:Nċ0ON& d9DG$gd2222 3 3333333 3$3(3*3,3.3:3<3>3@3D3F3H3J3L3N3P3\3^3`3b3f3h3j3l3n33ƴ{umƴ{umeah1@jh1@Uh@h%jeo( h%je0J%h|60JCJOJPJQJmHnHu)jh@h%je0JCJOJPJQJU h@h%je0JCJOJPJQJ#h@h%je0JCJOJPJQJo(h%jehjhUhXh Zo(hh>&CJOJo( h>&o(h>&OJaJ o(h>&OJaJ &2 3 3333333"3$3&3(3F3H3J3h3j3l3 hh]h`hgd@$@@&`#$UDdVDd]@^@a$gd)i &dPgdkb d49DG$gd$d4$d&d9DG$NPa$gd333333333333333333iM40h>&1h>&B*CJnOJPJQJaJnmHnHo(phu6h>&@B*CJnOJPJQJRHPaJnmHnHphu*h>&@B*CJdOJPJRHUaJxo(phhfhQKH aJo("hbFYh'%.KH aJmHnHo(uh%je?hZ h%je@B*CJ\OJPJQJRHBaJ\mHnHo(phu hIkaJB*hIk@B*CJdOJPJRHUaJxo(phhhh1@h1@h1@mHnHsHujh1@Ul3333333333333444 4 d49DG$gd$a$gd>&$a$gdQ$a$gdZ $a$gdIk$a$3334444 4hXh Zo(hh>&h>&KH aJ"h>&B*KH aJmHnHphu%h>&B*KH aJmHnHo(phu@&P 0pI1T2P:p. A!4"#Q$n%Sn z?KǼ(*z?KǼ(*z?KǼ(*z?KǼ(*z?KǼ(*z?KǼ(*b 02 0@P`p2( 0@P`p 0@P`p 0@P`p 0@P`p 0@P`p 0@P`p8XV~PJ_HmH nHsH tHN`N )icke $1$a$$CJ KHPJ_HaJmH nHsH tH$A`$ ؞k=W[SOFiF nfhxjm)ʬuWLfdݮ+5_4csj-V?k3rm}gz gs嚋7xwsȈR W*)|jȫKXͫ dXIBF؇bnh ( *'vɗ3KZjz'c*_=}<9ݻw~]8^~_o?xYýg~^G}J0Emh=Ԅ Ξa>s$-, Oɠ=Hp Ua/ UO d*:(.fTU/!9$V[|hrvs-iUt. 6ڪ4Cebs)bMjBekp um,fd$͑{6GUVf~b#Vb@qTTW.ޛd)i@vdq9Y^X7{2%uHx+af6]>f#sm*qqDHehK)@?71oggo`:fղekp£2֌Nj8ǰD CB?81e>nEeU}H]dm1iQ6褣֧ "0  "03 D 00LOp 233 4 !| X,22l3 4  !(*0FHO!!!@ @H 0(  H(  B   HDԔDocMarkLine#" ?    ?.bSubjectText`T`T`T`T#" ?   S .DocWordC"`? tB  C 0ԔDocMarkLine#" ?  .BSubjectText`T`T`T`T#" ?   S .DocWord3"? B S  ? - "l n` +n#n,7#Ol/ " `e7#e,BodyBodyEnd    !&(-.9GKLNOQlpshu{+EGdey  #$-8M\lmnq  ";@EH ).3bg -68AIQW\`sx} 1478<QZ\`fmot|    * , / 2 7 8 < Q Z \ ` f m o t |     # % & / 1 : ; = @ F G I L S X ^ c g h j p ~      " # . 4 7 : < @ A B G O Q g w   ! # $ > A Z [ \ ] c d f g i j l m o p r s t ~  TV{} "&IL9<18/ 2     ' + P S v | d f g i j l m o p 3s3s3333ss33s3333333s333333333s 1 d f g i j l m o p r t ~  Z b d d f g g i j l m o p 5BzHmMBqBOHthh^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^BE-F c&PX(AFP^-n`kHF ) = : zv Z 9q  G /J 1?::0,`5 `(@W+8tg1; U$i$%(&_%'M'>N'{'~'M(1)9) *T.+`+o+V]QV\VSuV Y{Z<[]]]o4_HP`cbkbdd^+dfde+ehe%je#3gugghuh)iHibLi_j;k^kfqk&l6lspwhq{qrtOtuB/vKwXxgyEuz~+~Y~f~ ;<?7+ HnI{m*g!b^c5wc76s+XzM;q;7l4D 1S>&@=sXEr* $:}Eb!$Q.>}gC+Z9b$u=QZ`1@mr 9V,eC t!h;f 6[I ZjZ3 3qv 'pT~J,gA [fnVbl\/doenHfBLopPG=*wl.1:Ik-d"{uZ!Qd f DocWord TemplateNamelQJT2&TemplateName=lQJT.doc&docwordnum=1&filetitle=lQJT.doc7V"BB BDVBB BDV&BB BDVBB BDV!BB BDV%BB BDV(BB BDV'BB BDV$BB BDV BB BDV +BB BDV ,BB BDV BB BDV .BB BDVBB BDVBB BDVBB BDVBB BDVBB BDV-BB BDV BB BDVBB BDV3BB BDV5BB BDV4BB BDV0BB BDV/BB BDVBB BDVBB BDV6BB BDV1BB BDVBB BDV )BB BDV!BB BDV"BB BDV#BB BDV$*BB BDV%BB BDV&#BB BDV' BB BDV(BB BDV) BB BDV*BB BDV+BB BDV,2BB BDV- BB BDV. BB BDV/ BB BDV0BB BDV1BB BDV2BB BDV3BB BDV4BB BDV5BB BDV6BB BD +Custom Popup 17 Custom Popup 170(XRNLbXRNL RJeGov.bXRNL(Q\NLbQ\NL RJeGov.bQ\NLCustom Popup 18 Custom Popup 180(>f:y~4Y>f:y~4Y RJeGov.>f:y~4Y(υ~4Yυ~4Y RJeGov.υ~4YCustom Popup 19 Custom Popup 190Custom Popup 22837859 Custom Popup 228378590 (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 22854092 Custom Popup 228540920 (hQchQcThisDocument.hQc( cHrcHrȉThisDocument.cHrȉ(HrbcHrHrbcHrThisDocument.HrbcHr(hQ҉RbchQ҉RbcThisDocument.hQ҉Rbc(W[klJS҉W[klJS҉ThisDocument.W[klJS҉(peW[lJS҉peW[lJS҉ThisDocument.peW[lJS҉( ndzzf:ypS>f:ypSThisDocument.>f:ypS(υpSυpSThisDocument.υpS7cke.ThisDocument.InsertBarcke.ThisDocument.W[SOncke.ThisDocument.DelAllVarcke.ThisDocument.hQccke.ThisDocument.ndzzf:ypScke.RJeGov._eQezcke.RJeGov.g wucke.ThisDocument.ToolsOptions cke.ThisDocument.ToolsOptionsViewcke.ThisDocument.UnlinkAllFieldscke.ThisDocument.ProcessCopySendcke.ThisDocument.wIDNcke.ThisDocument.CenterTitlecke.ThisDocument.cHrȉcke.ThisDocument.k=)ۏ$cke.ThisDocument.ToolsOptionsUserInfocke.ThisDocument.etecke.ThisDocument.hQ҉Rbc%cke.ThisDocument.ToolsOptionsRevisionscke.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.RJeGov.υu cke.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.HrbcHrcke.ThisDocument.JS҉Rbccke.ThisDocument.peW[lJS҉cke.ThisDocument.W[klJS҉cke.ThisDocument.AutoOpencke.ThisDocument.doClipboardNullcke.ThisDocument.υpScke.ThisDocument.ubncke.ThisDocument.uxncke.ThisDocument.ubeueN7 cke.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҉Rbc cke.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.uxncke.THISDOCUMENT.ubncke.THISDOCUMENT.W[klJS҉cke.THISDOCUMENT.peW[lJS҉cke.THISDOCUMENT.REJECTcke.THISDOCUMENT.ndzz V  0@ P  i Z'`IZ'   Oh+'0\   $ 0<DLT ļRJeGovNormalµ4Microsoft Office Word@F#@T8@xB ՜.+,0 X`px RJSOFT^    !"$%&'()*,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abdefghijlmnopqruvy|}~Root Entry F#SBx%Data #1Table+nWordDocumentBDSummaryInformation(cDocumentSummaryInformation8kMacros x=B0=BVBA x=B0=BdirCommon {"0RJeGovV,__SRP_0 f   !"#$%&'()*+,-./0123456789:;<=>?@ABCDFGHIJKLNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrsuvwxyz{|}~0* pH"dD<@j= B cZ5c J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\Windows\syst em32\e2.tlb#OLE Automation`Nor(malENCrmaF b *\C a m!Offi"cgOfi*cg!G{2DF8D04C-5BFA-101B-BDE5gTAAe42gProgram Files\CommonMicrosoft Shared\OFFICE14\MSO.DLL#M 9.0 Object LibraryJ@MSFAs>BSFDBs$3@cD452EE1-E0D8F/A-8-02608C4D0BB4cFM260 'B p&/;"1{B~ A00}#0#G 50 A6018876F-E983-4AE8-8263-AD8468@5DEF2E6Users\ADMINI~1\AppData\Local\Temp0\VBEb7.e=rLeft( , "8\")Righ6If Lena) > 32 Then !C Mid$E, 33 End 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ȃ<> "74BD`Time "C!/) < `3 - 4!KillcAIend#8$(!0Number 0@ǦjO0MainIsSe>pbBc!=intPoIntegerC= In Rev' ~ `! 9@e R9- 1Tqo/@1&Boo0osooooy pHj+LQƑz?fCheckO 8tchl1lngDxoRD /(+ 1B Ma@ `Loop 3:> 0 nSP#M ---ro- m-q-o@+,4 $) 47)) Or _P 9164123 96 2ߊ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)>5e  %# xMEP<<<<< <<<x ````x b#% ` (`r@% h`t@ 3 ` < `I  @`P`  `a `o`` 9@ 9  ` ++`////` ////@ //// * % ͷ%  `  P `    `  $ ` `&&(P@hh%(P@h(P@h(P@h(8x (t`(`0x tp`hPr 8t`r 8(xP@ cZ5c  "  8HX.h,F(8H Xx "    " ( 08 @ H PX `hpx "     "  ( " 0 8H JP 0 J" ( "0 &X *  " (08 @H*P  "   (  @HP Xpx   \0 " \H PX`h " px  $  $ 8 P X  ` h p      \ $p   \ (  0 8 @  (H &p     &     "    0 " 8 @  H X :` "   "  >  0 P X ` h x    xh ]@Xpx !!' !l!v' !l!' !InsertFileStart5tB@ $B@ ! InsertFileEnd5tB@H]InsertFileStart7t!v InsertFileEnd7t!7.  !l(  !l(v  !(InsertFileStart7tB@D InsertFileEnd7tB@Dq`oXA@ 5A@k(9995A@kqo 5A@k9995A@kqo(SetRevisionsOption 999q8o0h  9 9 9 9 9 9 9 9qo "B@B @oC///////////////////////////////////////////////////////////////////* ǺͷصIJC///////////////////////////////////////////////////////////////////SubjectTextǡļ⡱DocMarkLineǡĺšĺ]( "5A@kX  SubjectText7!!!l(    DocMarkLine7(5A@kqo@ "5A@k  SubjectText7!!!l(   DocMarkLine7(5A@kHq@o8(KeywordTextǡʡ!KeywordLineǡʡCopySendTextǡ͡]]]33333$@$' "5A@kp KeywordText7. !  ( KeywordLine7. !  ( CopySendText7. !'UMsgBox "Top1==" & CStr(o.Top) & ",height=" & CStr(o.Height) + ",nStep=" & CStr(nStep)MsgBox "vTop==" & CStr(vTop)@ !  (   (XUMsgBox "Top2==" & CStr(o.Top) & ",height=" & CStr(o.Height) + ",nStep=" & CStr(nStep)5A@kqo]H]`]xΪСʱС] CopySendText "%. G|j ! G|j''''''''''''''''''''''''''''''X33333$@$' "5A@k KeywordText7. !  ( KeywordLine7. !  ( CopySendText7. !'V MsgBox "Top3==" & CStr(o.Top) & ",height=" & CStr(o.Height) + ",nStep=" & CStr(nStep) MsgBox "vTop==" & CStr(vTop) !  (   ( V MsgBox "Top4==" & CStr(o.Top) & ",height=" & CStr(o.Height) + ",nStep=" & CStr(nStep)5A@kq"ıΪյʱ߶ CopySendText "%! ] CopySendLine "%.  ! KeywordLine "%(kko  "B@o "B@ o3=================================================== P !"%$!A@8o0]֣ Ķ ȡ$'& &v & !"%$( 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^5agq5nStep5cs7QvTop3S= MillimetersToPoPs(10.35AWQa?z#v op7h"8o.P ps- B  oso= ot?y1W'MsgBox " 1==" & CPStr()",heightH) + ",R Ho3 +=Z   2 & (o.Height) + ",nStep=" &@ CStr(p) If .ReadOnly` ThenhBProtectDo@cument8E`nd IfW ith Su b  ͼ(tOn Error ReBsS NexVDim  As Single_oVariaavTop#'<ΪСʱСtsh8ape4 Set  =is{.Ss("CopySendTZ"hIs Noth\ Exxit  < 1'U= -MillimetersToPoints(10.35(AgG4%UnA!Oo = FKKe0ywor K o.w@m -|$Line\nE#G!' MsgBox "+3=B-)",hى( m9(+LR=  .*j4Sh@[ 1'"yı Ϊգy$@Th>vMow!l| R\T l rh# g H = y  w@dAllowaFormFields, Tru cjUnpc9'=-GetItsName#ED}Sel`ion#Range.Item(1).BL HsTempHtr4= Input("֣", "aȡ΃ <> ""Bg@~pD##!F' '"test'ApplicatV`fp  *\CNormalrU~~~~~~~~~f QBOzp a Y:Qq) a  A  ) I i 9 i I i 1Q9Y )Ii91   \x'>@,ט(X)  ThisDocumentRJeGov frmSelectCommon FileDialogF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLLVBA i ` F5C:\Program Files\Microsoft Office\Office14\MSWORD.OLBWord ap0FC:\Windows\system32\stdole2.tlbstdole qL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLLOffice a.E .`M C:\Windows\system32\FM20.DLLMSForms o`Jch].4C:\Users\ADMINI~1\AppData\Local\Temp\VBE\MSForms.exd ak Fx\g|l@AZ j.@DS2@-ԮCwRT3 FDocument DelAllVarOAOpen DoMailMergeDocument_Close ToolsOptionsToolsOptionsViewToolsOptionsUserInfoToolsOptionsRevisionsToolsRevisionsToolsRevisionMarksAcceptToolsRevisionMarksRejectToolsRevisionMarksToggleToolsReviewRevisionsToggleFieldDisplay UpdateFieldsReject ToolsMacroFileSave޺ۼļSelectTemplateChangeTemplateȫлLocateContentInputRecordTemplateInfoUnlinkAllFieldsProcessCopySendLenCharGetMergeFields GetMergeField/ Fݸ CenterTitleRecordBookmarksCheckBookmarks InsertBarȫԤŰԤŰ FontSetFormat^ F ParSetFormat DocRngPageSet FormatBody FormatAttBodySetFramTextFont ոŰʱл ת ĸתAutoOpendoClipboardNullDoLastPrintShapʾӡطӡҳҳ 88l 48<@DHLPTX\ F F4rU~~~y   objFtpWordTypeUserNameUNIDWordBody__SRP_1E__SRP_2 __SRP_3M frmSelecth WordSourceFileTypeDocWord TemplateNameWTFlagstrChar strFieldName ! fldblnClear y(BrngPrngflagTStr)rU l$`DA`1;000000$rU 0::I!Y Y ` a1`:WWW_____ _    _    _    _    _   __0   0 h  0   0   0   0 x  0   0 p  0   0 h  0   0   0 (  0 h  0   0   0 (  0   0   0   0 H   0 H   0   0 H   0   0  0  0 @  0   0 x  0   0   0   0   0   0   0 @  0   0   0   0 H  0   0 (  0   0   0   0   0   0   0 `  0   Hx$ 4Qxt t  t  t ctH(@tx0   0   0   0 @  0   0   `      !"#$%&'()*+,-./0123456789`$`$`$A`$`$`$`$A `$ `$ `$  `$I `$`$` $ ` $I`$`$`$ `(I`!#0` %Qi000$`)$ `-,I`1&,`5/8` 9 =/$ `=$I`A(`E(`I0$  `M$I !`Q$ "`U$ #`Y, $`]Y=9,I %`aY=9, &`eq=9( '`i0( (`m0$I )`q( *`u0$ +`y$ ,`}$I -`$ .`$ /`$ 0`$I 1`$ 2`$ 3`$ 4`(I5`0$6`$7`$ 8`$I9` nID="{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" VersionCompatibLxME(SPSSS0{C69609B0-5556-417D-8C17-6FE96862DFC1}{FA38BA16-C3AA-4230-A94B-951915515A6C}(b,`,,!Pi d APi. 0@< %`>'0`f**cw D :p@< `>`F`f J`B `L PPH %xP %b(b* pHpHpHpH`H PcZ5c `  &"0X Bpx "   "T@P `px     (0 @PX` p " "  ( 8Xpx     "   8X2h  R D`h p2 "  x]@ EnumWordķַ]@ ļϢַ]@ ݿurlH ('Pmx .'( (~$\', (~$Z,$D'*A@0m  HǴwordʱʾԶwordģĵȷϣбֻʾµļ r 2B@4 2!6 2(8kA@:|xkp]H`x 2B@@ < * <\$Z'> f 2!6 f 2%B >yk f 2!6 > 2B@4k 2!6 2(8kxopA@:oX](@X HB@@ < * <\$Z'> <\$\|$Z'F > 2!d f H!6 f H%B Fykx f H!6 F HB@4kPkH@ H!6 H(8kopV] ļϢ] ѡû 2!d\ H!d'L B * B L 'ҵѡеļֺģϢ B|$\!$Z'v "!H\ J v'Fg,صģļt_ͷģԭļ (~$\/0/ B!$\/$FILE/ v'Lk A@r|xVp ϵͳ ! ! !NA@|0o( A@roõAttribute VB_Name = "frmSelect" " Bas0{C69609B0-5556-417D-8C17-6FE96862DFC1}{FA38BA16-C3AA-4230-A94B-951915515A6C} dGlobalSpaco False Cr@eatablPredeclaDIdTru BE`xpose0TemplateDerivCus tomizD Option 1licit P#' str!As Sng 'EnumWordķַHvaV@ariantļ`Ϣ 8Url 7'ݿurl'ub* Property Get& *)()G IX6 EndLByVLalFue)C F6=AR@Right( , "~"GN=eode(5Lef  , FillqdLispN5DtS(ub I (If AutoChangeFlag Then 'Ǵw{ʱԶģĵȷбֻʾpµ|@bcbo).AddItem NewD|oc# 3Cou@> 0 Index.f0G!IfTypexit `##i#Dim 2e,A?'?, iInteger#CleaDFor Each% InACSB D>&".\= i To %- 1 *(i) ==AE" +m*Nex@Na i >=0o eA I ,Ci"LC >'e_CkedKG4GARJlst.JJJ'OStr#*| Q1@V.TBuVeq8V$J)+BO%!1+0_IAqK,` ,_ ?u, 3a$ ._O9. qo*qN cmdOK-O0rr0JGoDErr`dl !,opt!*|0bpk}3Ase|a'ѡûS'C2$& `O & A$U Ta0InP,( [0el) eR@ѡejl#A1@jU@Yp#2"11!1&ownC BThisoument.Path0TEMPLATE_FILENAME_PRE8FIX}'`صq At_ Qԭ [ Y sD /0/"p $ < '.Unload M&R;Sub %(:#MsgBox "ϵͳ*.Descris& Number Sourc@@r_mdCapncel1X (5FileDialog/ThisDocumentK_VBA_PROJECTC9PROJECTtn)UtChooseColorA8GetOpenFileNameA`$GetSaveFileNameAxRRRRR RMEL PSS S@@@<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}8@ h0hHh`hxhhhʹhhhh h8hPh0hhhhhhh h(h@ xhXhphh0h'hh +P( )H'\%+$ )$ %+@L(( ) %XP%p %j j,j j (%   i` 6i xXi ##ii ```h@%jCjCjCjCj8Cj`CjCjCjCj Cj( CjP Cj2x Cj Cj Cj Cj Cj@ Cjh Cj4 Cj CjC" P"0 pjX jxj.*0   8x`h @P @ Px pX (  0  x (j Cj( CjP Cjx Cj Cj Cj CjCj@CjhCjCjCj2CjCj0CjXCjCjCjCj4Cj CjChX  P x  @( P X   x 0  x0 @`jxCjCjCjCjCj@CjhCjCjCjCjCj0Cj2XCjCjCjCjCj CjHCj4pCjCjC x@H @0 PXPX   x0 hpx jCjCj@CjhCjCjCjCjCj0CjXCjCjCj2CjCj CjHCjpCjCjCj4CjCjCXH p@x @PX   h0 x 0P  @x @@8cZ5c (*\Rffff*0?63355a63\0(*\Rffff*0?63355a63\1(*\Rffff*0?63355a63\2%  (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 ''''' '@'''''''2 '@''''''4' ']@ ]@ ] 0 ] X ] x]  ] ] ]  ] @]  (  (  ( $' Color = CC.rgbResultko A@o A@ox] . $\'  9 9 ,| $\  9 9 9 9 9 9 090 9q](  $'d $'k  !  '  !  $ '.dx !'.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 LonghwndOwner Instanlpstrt0i *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 (y2 2I@%-& 9h= 6}B= xC(;sprVE##-i d,;P4u#k478El1 ) 73;Q c Str.x` !ҒIft$s- 1+\- U"q?      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~~BB=CKCo9hx\g|l@AZ j.@DS2@-ԮCwRT3xS2@-ԮCwRT3x\g|l@AZ jME( $ ,S"SS"0<<\ 0L<0L<<*<h`  @@ F`N==iH iJiLiN(iPHiR hiT$ ``J))P `4Jy x` `` `  ` p` ```` ` ` h` `` ` `  `    `   ( `   h `    `    `  (`   `  `  `J##`t`"`&`( En ` #`4Vi`:Dr`(Ap H ` 22>`" cr`> `@`B  XH `p Z KT% ^ % ` Vi%`b te$`d幤`f^(`h ,p ` J #i  H ` $3i i(  ^i 6 `(I`f`d b `J,88Z p %`ll`\ `fZ`X`'` '   %, ` 0i( i  x `  @`N 4i  9i   `% 08B@% `0J 8 ) `%i8i  `d`` x` < p% d`KH  "           &         0 8 " @ H P  X h            "       (  0 8 @ H " P X ` x               "   ( 8 @ H " P X ` x               "   (@H " P Xhpx "   "  (0 " 8@H " PX` " hJp " ~Xx* "    04#8>4p    . x2   ! \7HP TK@H P`hpx(D"    6 R0   \ 0b8T  (0(8` " h p  F " "  vH H  08@ HnXT08@H  Pp D RDP & &:@$( "  .  P`h   0   (8 .P$ .  0@$p      4 X ` h p      !!! !(!&0!&X!!!!!!!!  6! ( "H"P"X"`" Bh"."""#### #@#H#P# h# ### ######$$  4$H$P$X$p$ *$$ >$.%0%H%h%p%x%%%"%%%%%%*%&& &(&0& 8&H&&h& && &&&&&&' ' '('0'8'  @' X' h'  x''  ''  ''(((|( ( ( ((((((x)x) ) ) )))) )) B ) "* &(* P*`* h* * *8*2****** "  * 8+ 8+ X+ 0x+ +B+, ,8,X,"`,",,",,,-(-0-P-X-" `- h-x- -- - -- --  - ." .. . . (.0.8.@.$I`. .B. .. ,@. / /*(/ H/&YX/ /$X/// / / //06_0@0 $P0 x0 $0 0 00 !1 %101 (81&E`1 1 21 1&F1 11  @182 @2H2P2X2`2 h22 B  222222 B  22 223 !3 (30383 ;H3!h3  3 333 B  33)3334 "@ 4H4P4X4 " `4h4 p44.44  04505@5P5`55 $55 " 5555!5)56 06 H6,h6 66 6666 "  6666  66 6 677 7 7(7 )87 P7"Tp7 7 777 ;7)77"T8@8  H8 P8X8`8 :Hp8 88 88 B 888 89999 (9@9H9P9 `99 9999 "9999::8: @: P:`:h: (p:" :::: ::: : ; ;; ;(;0; P; X;p; x;;"; ; :;<"< @< P<`<h<p<<<<<<(<<< " = = 2 =X= `=h=== == = = = >  >(>@> X>p> x>>(>>> " > > 2>?  ?(?@?X? `?? ? ? ? ?  ??@ @0@ 8@@@(H@p@x@ " @ @ 2@@ @@AA  A@A HA XA hA A  AAA AA AB(B0B8B"  @B HB XBpB  xBBBBBBCCCC C(C0C8C@CHCPCXC`ChCpCxCCCCCCCCC CCC CCDD "  D D (D@D  HD  XD hD xD D D D D D D D D D D D D 2D  E (E 0E 8E @E HE PE XE `E hE pE xE E E 0E E E EEEE "  E E F (F0F 8FPF  $XFF FFF *FF"G (G 8GHGPGhGGGGGGGHH H(H0H ,8HhHpHxHHH H "H "HII II I 0I@IHI`IxIIIIIIJJJ J(J ,0J`JhJpJxJJ J "J "JJK KKK  K (K "  0K 8K <PK KK K KKKL$L"@L hL xLL L L LL LL LL  M M  M @M PM `MpM xMMMM "  M M <M MN N  8NHN`NhN N "N N N N N O O  O (O 0O 8O HO hO xO  O O O O O O OO PPPP " P (P@PHPPP `P pPPPPPP"  P PPP P QQ(QHQPQ" XQ `Q $xQ Q Q Q QQQQ R R R 0R@RHRXR `R pR R RRRR  R R RRSSS S 0S@SPS`ShSxSS " S SSSS SS SSTT T0T@THTPTXT`ThT (xTTTTTTTTT T T U U U  U 0U 8U HUPUXU`UhUpUxUUUUUUUU U " UUUU UFU 0V @V PV `V pV V V V VV  V V V V V V WW WW " W(W0W8W PWXW  hWxWWWWWW  W W X X (X8XHXXXxXXXX " X X XXY " Y Y 8YXYhY" pYxY YY Y YYZ0Z8ZHZ PZ`Z " hZpZpZ<Z 8[ X[h[p[[[[[ [[ "[ [ [\ \ \ \(\ 0\8\ " @\H\ P\ `\"x\(\ \ \\ \ "  \ 6]8]@]H]P]X] `]h] p]  x]@] ]]  ] ^ F^`^  h^@^ ^^  ^ ^ ^ _ _ 0_P_ X_ h_ x_ _ __  $_ 4_(`&H`p`&``&`a& aHa&haa&aa aa(ab  " b(b8b " @bHbXb" `bhbbbbbbbbbcccc c(c0c8c@cHcPcXc`chcpcxcccccc c ccccdd0d@dXdpddddd *dd .de e(e 0ePeXe`ehepexeeeeeeeeeeeff f(f0f 8fHf " PfXfhf ff ff"f f g  g 0g @g Pg `g pg g g *g (gg hh (h@h"Hh ph h h h h h h h i i ( i (Hipixii ix]0]X]]](]P]]x]ļϢ]ϡĹؼ]]P @ "!B @B@D0o(hVF H.& J$X', L//$Z'( N'* P'. R'0 T'2 ********cw'8 T$ T$$Z'2 T$$\'8kH ********** ^!L'4 ( ^(LA@`A@bA@d , approveword "(fk h!j(l h!j(nAp ָʾλ 2 2 $t|$Z'rHδļ 2|$\'vHδģ 8'xHδıDocWord "%B!|'zHԭʹõļ TemplateName "%B!|'~HԭʹõģWTFlag "%B!|'HԭеıVP z ~HFԭʹõģļΪգ˵һݣҪ¼ЩϢĵ r v xA z r z z r  xexFԭļֺļֲȣôҪʾûǷıļֶӦģEIf LCase(gWordType) = "viewword" Then Exit Sub 'Dz鿴 If MsgBox("ϵͳ⵽ڷаļִӡ" & OldDocWord & "Ϊˡ" & NewDocWord & "ǷҪ޸ļֶӦģʽ", vbYesNo + vbQuestion + vbDefaultButton2, "Ż칫Զϵͳ") = vbNo Then AutoChangeFlag = False Exit Sub End If'A$ ѡkA@ ¼ǩʼϲ pjt 06.9.18ֻӱ "!A@kP|HV@ĵ򿪴 ! Ż칫ԶϵͳA@|oVF ^(A " 5( 05B@5( 5(( If gWordType = "createword" Then '.Fields.Unlink UnlinkAllFieldsY End Ifq Mail Merge$( , draftwordKTView$(Draft$(Approve$(Template$(4ģ幤 approvewordK createwordKTAView$(Draft$(Approve$(Template$(4ģ幤viewwordKTADraft$(Approve$(View$(Template$(5ģ幤n ^(|V޷ϲԴ ! Ż칫ԶϵͳA@op ( "! "(fd0A@ ,$X createwordAkk 4 ^(L  ^(ko]H]` ^!L' $!'   ^(LA@ h!j9l 9q0k(o x] $!'  h!j9l 9qko]](@X ^5L'5'5' $!'  , 9L 9 9kqop] $!' A@ko]] 8P 5'5'5' $!'  , 9 9 9kqoh ,A@d !!B@ko ,A@d !!B@kho` ,A@d8 ! (ko( ,A@d $B@kohA@oA@o*ڵǰĺ갲ȫ£޷ʹô˹ܣ Microsoft WordA@o8(]h(ꡱѡֻڿԱϵͳơ  룺(ʾĹ̿)Ա$'  hacker;rjsoft $B@dp Microsoft WordA@k8o0VF "!fG|j]кϲ$' "B@ , draftwordK approvewordK createwordKT"ǷҪµĸı浽OAϵͳУ   $  .A@ !2002.10.25 PJT] $'"& ǩʼϲ pjt 06.9.18 "NijЩʼϲǩɾĸ޷浽OAϵͳУԱϵ " Ż칫ԶϵͳA@|h k` ]_H '( . &%*'& &$޷ϴWordĵǷԣ , Microsoft Word$'(d SaveWord&UNID= * &WordType= , &FileType= 2 &FileName= & &%0 $0 &%.'& &ok  &   Ƿԣ , Microsoft Word$'(k k ( 2k n | V ! Ż칫ԶϵͳA@oP  V@ ]`A@6A "B@8 "B@/ newfilename = "c:\oawork\" & gUNID & ".doc"K ThisDocument.SaveAs FileName:=newfilename, FileFormat:=wdFormatDocument]x_` '( . &%*': :$޷ϴWordĵǷԣ , Microsoft Word$'(d SaveAsWord&UNID= * &FileType= 2 &FileName= : &%0 &%.': :ok  :   Ƿԣ , Microsoft Word$'(kk ( 2|V ! Ż칫ԶϵͳA@oṩģ幦ܣģѡ 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-10VF] $'" "DijЩʼϲǩɾϵͳ޷ģ壬Աϵ " Ż칫ԶϵͳA@|0k(EnumWord&Seq= < &%.'6G$ȡļüӦWordģ ] ] ]0 6~$Z,$D'> r\'@ B > B @ B x MҵļֺģϢ B|$\!$Z'v "!H\ J v'Fk,صģļt_ͷģԭļ 6~$\/0/ B!$\/$FILE/ v'Lk`XdP 6 N(P4 ֵ R NB@4ʾģ滻Իkend 2004-02-10'(ȡԶʾļֱ L$T F$THûѡȡ|xkp L F &BVE ģļAX滻ģ|(V  ! Ż칫ԶϵͳA@|oH (ṩģ幦ܣģ滻ͷβ滻 2003-07-24V] *Ҫ滻ģĵ] *ǰĵ] *ݴķΧ] ] ] ".^ F$ ~*ģ岻ڣ˳|k 1.رպۼA رպۼ¼(2.ģĵǰݿ]0 F j%.Z8 ĵlH Z r7n!B@p7n!!.`'rng.Start = .Windows(1).Selection.Start.Bookmarks("Body").Select)rng.End = .Windows(1).Selection.Start + 1Body7t!!v `( `B@H7n!B@x7n!!d'hkqzFl|F|'h.3.üе滻ǰĵǰz~ ^ r7n!B@p7n!!.`7n!!v `(vBody7tB@H7n!!v `( `B@HqF~FF"Ե,ʼβ. hģıͷΪɾͷ ^%n!B@d Ϊճͷ ^%n!B@k0( F/=============β=============================="4.ģԺݵ'h Z< Set rng = .Shapes("KeywordText").Anchor.Paragraphs(1).Range CopySendText7!%!.` `!v `(vBodyEnd7t!.` r7n!B@7n!! `( `B@H7n!B@x7n!!d'hk Fq'h.5.üе滻ǰĵԺ ^ r7n!B@7n!!.`#rng.End = .Windows(1).Selection.EndF8.Shapes("KeywordText").Anchor.Paragraphs(1).Range.Select CopySendText7!%!B@H7n!B@D7n!!v `(vxFBodyEnd7t!! `(v@80(FAttachmentStart7t!!v `(F `B@HF$ Ե hģıβΪɾβ ^%n!B@d Ϊճβ ^%n!B@k q6.ºϲԴA@`A@bA@dA@7.رģĵ Z(f ZB@B8.λ굽ĿʼA@p9.µļֺģϢ r v xA10.һεĸϢ'L'F|8Բģ⣬޷滻ģ壬ϵϵͳԱ $ ! ! Ż칫ԶϵͳA@ Z Z(f ZB@Bk0'L'F|V ԭ4Բ滻ģʱϵͳԭģ壡 $ ! ! Ż칫ԶϵͳA@ ^B@ Z Z(f ZB@Bk@'L'F|(o H + ҵǩTrueѹƶĿʼ ʱָʾݵʾ 2003-07-24VFCall doClipboardNull''Body "%tB@H B@'pz V'pi 2¼ĵʹõļϢģϢwordĵDowWordļTemplateNameģ*wordĵеıƺͱıƶӦ 2003-7-25DocWord "%B@Ѿڱ޸ֵ DocWord "%B(|d@ ӱDocWord  "!BBk TemplateName "%B  TemplateName "%B(|dH TemplateName  "!BBkWTFlag "%B WTFlag "%B(|dWTFlag  "!BBkoH  ϲ !B@] ] !!d'dP f d f %!!!B@ (fo VF "5A@k] ] 0 H ` CopySendText$!!. %!'  $D' f   f$$ . ' f !!d f f %! f %(dx %! f %( f %(k0(ıĸ߶]x ] 33333$@$ CopySendText7! '  Set o = .Shapes("KeywordText") o.Top = o.Top - nStep Set o = .Shapes("KeywordLine") o.Top = o.Top - nStep CopySendText7. !  ( !  (k"ıΪյʱ߶ CopySendText "%! ] CopySendLine "%.  ! KeywordLine "%(kk:.Shapes("CopySendText").Width = MillimetersToPoints(146.3)5A@k q | V MsgBox Err.Descriptionop  ` ]H  $'  'i    "] 5   $' ]  5  !!!   $'x p qh i` @] !$ T'  MERGEFIELD  $ '   & = !'k k i ]X r B@ d B@ !AttachmentStart tB@ l B@*븽ʼλжϣ¼ʵλϢAttBody "!t%  !. !v (v ! (AttBody  "!tBkx ڴ븽d B@oH xVF]]  "! !$ T'  MERGEFIELD  $ ' $ t  !!(kx kp h |` VX oP @ ]h] "!f'  :!db :B@k "] 5 !$ T'  MERGEFIELD : !!d !!dA@k`X] 5  !!! !$ T'  MERGEFIELD : !!d !!dA@k] 5t : Bookmark ! Bookmark !A@Hq@  "(fo(]X "!f']p "] 5 : !A@"] 5  !!! : !A@"`X] 5t : Bookmark !A@"q] f :!d $  f :%$'$  "(f¼¼A@i"pjt 07.5.30 ӲάͼƬܖVF]H (ͼƬ(*.bmp)|*.bmp9,9. 2 490C@65.|kqά "%B@Dתĵһҳ]h "B@: > "%<'8 B@ FD 8 B@4Selection.GoTo What:=wdGoToBookmark, Name:="BodyEnd"VF (!. !H%J!L5N(lC@P T9R X9V333333*@$Z9:@$Z9ά9qH|@V8 ! Ż칫ԶϵͳA@|o2007-05-24 by czc,ȼرģٶݽԤŰVF rG z'rj xG 'xj'ȼرģļʽAʽ2A^ ʽ2A`ǩı SignDateTextAbLastPrintDTextAbλ굽ĿʼA@p|Vx ! Ż칫ԶϵͳA@|Ho@2007-05-24 by czc,ȼرģٶݽԤŰVF rG z'rj xG 'xj'ȼرģļʽAʽ1A^ ʽ1A`ǩı SignDateTextAbLastPrintDTextAbλ굽ĿʼA@p|?V? ! Ż칫ԶϵͳA@|?o?2007-05-24 by czc,ȼرģٶݽԤŰVF rG z'rj xG 'xj'ȼرģļʽAʽ0A^ ʽ0A`ǩı SignDateTextAbLastPrintDTextAbλ굽ĿʼA@p|>V= ! Ż칫ԶϵͳA@|=o=@2007-05-27 by czcV= j!l _GB23129 _GB23129nTimes New Roman9pTimes New Roman9rTimes New Roman9t9v9x9z ~9| 999999999 99999d999 99 9 5( 7(q<|<V<|;o;2007-05-27 by czcV; j!$Z9$Z99999 9=@9 9999999 ,.FirstLineIndent = CentimetersToPoints(0.35) 99999999999999 ) .BaseLineAlignment = wdBaselineAlignAuto 9q0:|(:V :|:o:ĵҳ2005-05-27 by czc]x]Dim Brng As Range]pCount = Prng.Paragraphs.count !!d'h9 f  f %.#Set Brng = Prng.Paragraphs(i).Range  !!  > !5( 9  @$Z9ffffff@$Z9ffffff@$Z9@$Z9$Z9?$Z9333333@$Z9$Z9 33333=@$Z9" &9$ &9( ,9*9.&.DifferentFirstPageHeaderFooter = True90 49296989:.BookFoldPrinting = False.BookFoldRevPrinting = False.BookFoldPrintingSheets = 1 >9< B9@q6d6 !5( D9 ffffff@$Z9@$Z9ffffff@$Z9 @$Z9$Z9?$Z9333333@$Z933333=@$Z9 $Z9" &9$ &9( ,9*9.&.DifferentFirstPageHeaderFooter = True90 49296989:.BookFoldPrinting = False.BookFoldRevPrinting = False.BookFoldPrintingSheets = 1 >9< B9@q4k4q44o4ʽ5flagΪ0ʱáΪ1ĸתΪ2ȫŰ2007-05-24 by czcVP4](+ݴķΧ 1.رպۼA رպۼ¼ "7n!!.jBody7t!!v j(vBodyEnd7t!! j( jB@H'''' b2AFAHAJkH3 b1 b2 jAhk3 jAα֤Ч jAҳ jAq2|2Vx2|p2oh2Hʽ5flagΪ0ʱáΪ1ĸתΪ2ȫŰ2007-05-24 by czcVF]+ݴķΧ 1.رպۼA رպۼ¼ "AttBody "!t% 7n!!.jAttBody7t!!v j(v r B@ ! j( jB@H '''' b2AFAHAJk0  b1 b2 jAhk0  jA α֤Ч jA ҳ jAk0q0|/V/|/o/ѡVF] !.j j jAhkx/|p/Vh/|`/oX/(ı]]ı N "%.R R R!!.P PG PAhjk.o. ո Macro 2007-7-2 ӳ ¼ȫǿո !V9d5X(d9 ^\C@Zq.ǿո !V 9d5X(d9 ^\C@Zq- Ʊո !V^t9d5X(d9 ^\C@Zq@-־ !V^p^p9d^p5X(d9 ^\C@Zq,ֶ !V^l^l 9d^l5X(d9 ^\C@Zq,ox, 2007-7-10 ӳ]H]`]xAT !!d'b, f b f %.d d$Z9$Z99999 9=@9!.Alignment = wdAlignParagraphLeft 9999999 9 f@99@9d*@99?9k*9999999999 h9qP*H*o@*]]]'p#Ϊ+Ϊ-,ַ ַ-2$'l l lX 'n !$Z9$Z9$Z9999qP) !$Z9$Z9$Z999 n9q(k(o( ]`]]'v !.t t!d'  $D' f  f$ v f$ 'vk (( v t(d B@x B@x B@x z !( !( _GB2312 !l( !l(v vd B@kX'oP' ȫл Macro 2007-7-2 ӳ ~ !(|o&  ȫл Macro 2007-7-2 ӳ  !(|o&`]' 0123456789.%' f ѭ12 !V  f$9d  f$5X(d9 ^\C@Zq% fo%](@Xh£ãģţƣǣȣɣǣˣ̣ͣΣϣУѣңӣԣգ֣ףأ٣ڣ'4ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz' f4ѭ52 !V9  f$9d  f$5X(d9 ^\C@Zq8$ fo $p Call غۼ 999q#o#] !.`Body "!t% Body "%t!!v `(vBody "%t!!v `( `B@H B@xk#o#0ʾӡı,flagΪ0 Ϊأ1Ϊʾ""]p]]]] " LastPrintLine7. !  b0 !  b1| "k"LastPrintUtext7.  !  b0 !  b1G|jk!LastPrintDtext7. !  b0 !  b1|0!k(! b1  (  (  ( ! ! ' nStep = -tShape.Heightd  (  (  ( ! ! ' nStep = tShape.Heightk8 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@o1A@o@0A@o  %!l _GB23129nTimes New Roman9pTimes New Roman9rTimes New Roman99v9x9z ~9| 999999999 99999d999 99 9qX !5( 9  @$Z9ffffff@$Z9ffffff@$Z9@$Z9$Z9?$Z9333333@$Z9$Z9 33333=@$Z9" &9$ &9( ,9*$.OddAndEvenPagesHeaderFooter = False9.' .DifferentFirstPageHeaderFooter = True90 49296.MirrorMargins = False989:999 >9<99 B9@q` 99{Gz?$Z9(\?$Z9@$Z9 @$Z9999q (o !(. % ҳ 7!  7!B@Dk8  7!B@ 7!%! C@ C@5(5( 5(5l(n5l!n5l(p5l(r5l(v # .ParagraphFormat.RightIndent = 14 ! .ParagraphFormat.LeftIndent = 14q żҳ 7!  7!B@Dk  7!B@ 7!%! C@ C@5(5( 5(5l(n5l!n5l(p5l(r5l(v " .ParagraphFormat.RightIndent = 14 ! .ParagraphFormat.LeftIndent = 14qqoxpAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$Custom izC1Option .licit Dim gobjFtp As Objec  User% SngUN ID WordType Body Sour0File&OldK%AllA 'ļ Ϣ1Ke$ D'ϡ ؼD colBookmarksNew CollLV Sub Del#Var(X) RvFor Each v In . iksC v.etANexf0End @OA Open(o, 9b, Os r, >_Kl k, Ki=Orr;GoTo Errh@andle:SdetF= /Cg.= LC(g1= Str Left(& p"/",!= !V =$A(DcF=#H '*cw$gAKA7 If= (`$") > 0@en`~g h Rpight FIf&**#gi= Appa!.*1&1#DoMailMergDWProcessCopyS(endCerpTitl$?"approvew"$*gSaiActWindow.View.ShowFieldCodes!TrGri0dlinal l Loc@ContInput 'ָʾλCegXC8?, L {) - 1) F|F'δcF " N "! CnH ģ WTFlag?NR ϣF Res Ý @T%s("$D")Tlue'ԭʹ|s("iK/# įU?UsS4 g""< Ac0Th en'&w &Ϊգ˵һݣҪ@¼ЩAvĵ C2Rec4Info(0,`w ]E ( <>atE"03Or )=udc 4rG C“ȣôҪûǷ ı3԰Ӧħ!' mO)p5"vIN)pit~ 鿴@'eMsgBox("ϵͳ⵽ڷаѣӡ" & sΪ˳I Ҫ޸e' @ʽ wvbYesNo + vbQuesDefaultButton2LŻ칫Զ >=`(h AutoCgeGZ0 jo@~@)Se' ',G'!0ǩʼϲ pjt 06.9.18#'ֻӱcp!BReadOnlyott O ."ͳY Ex# & c" "9󣺇A!scriR,Critic|al_@& Pp+؀LɡScreenUpdpng2@޺ۼWxithc.n"= wdCloU1Dqu:=;ffirm!`vers@s:=2 , :=' ? gea NotA7"' @&fGQG i !'.s.Un k (`! CombmBar@u b Qpisiq 8C9 @"draft ѵ CommandBars("View").Visible = False Draft ZTruXApprove&Templat 0_'ģ幤Case "aiword", "creF all غۼ ȅv0}Ov?m3 >؁End Selectv[lication.SenUdpdng@Exit Sub Errhle:MsgBox "޷Դ@" & .Descrip, vbCritl@Ż칫Զϵͳ"' Priv Document_Close()If gUserName <> "" ThenAThisE.ReadO8nly Saved AE}!Filea'"Lm(gWmTyxpe)` mCAoށo0ļ+ 7Ifg9#= gOld Win dowSta-= wdMinimS'ub'u MarksAccept(43 Rejs^a`Rangeg.#All q&C  pA Q1 3 G _sTogglj  a 13xN"No0:1$??, O b@SCH _brDisPy l"Ҿeƛcuڵĺ갲 £ʹô˹ Microsoft f"Ma@5qP[\A\Input("ꡱֻڿȀԱЁơ! Lf_"(ʾĹ̿)", "Ա")  If ret = "hacker;rjsoft" ThenDLDialogs(wdToolsMacro).Show)Else3MsgBox "vbCriticalMi@n Word"Dnd If ESub  FileSave(On Error GoTo handle:"kThisDocument.di Exit ,lm strFields As String 'к*= GetMergeJ:Select C ase guTyp "draf twapprovecrea>t&[p("ǷҪµĸı浽OAϵͳ]Question + vbYesNo)} {B@up],Body '2002.10.250 PJTG#A DiBRCheckRP= Bookmarks 'ǩ@ʼC^ pjt 06.98.18 ?<>< "ͫ$Š@ijЩAɾ@N޷Oϵ" &0,@SŻ칫Զ`E$E URF, in@tReplyYI@nteger GDo = 0sA = gobjFtp.Upload?(gU?na e0/AHEV!,ϴ ĵYʚԂV_/ vbryCancel8 Or 0[&H1000ϋ0 a e,"ExecuteAg("Aj"&UNID=!Bg! C"&a!|  & "&a-' Name $4Escape(), 嘞)P6!fokufE 6"&^Lfb6 _7_7 1fLoop Whh=@BILIa#v Č.Descxrip!_ ޺ļcC#newfn "mWUnlinkAllCj3Call S:kAccept RevisbsOt '@c:\oa kk\1.docpP.rM5.:=,2Format:=wd%}c !RR DQh.QQQ0 6f_QD5"QQF/D%,P~PÖ,BPg PAsMPDKMMsMsoL D OLfo//L0Xg vbggXKG/K~y$KHկHH":"OGOTem pl E'ģ ܣѡ4A&KRes෠ NextgE 0 And fWTFlag!ThenA'ҵļֺģ imBTemplateName]wRightC"|x! x DownFil!"Thisument.PathTEMPLATE_FILENAME_PREFIX E-'0صā_et_ͷρ ԭ2snLUrlnj "/0/">=$,WL* EifNextCElsefrmSelect.Option@ing(&W'ֵShow vbModal 'ʾL滻ԻI+'e.2004-02-10AutoC`hangeA'Fa1LȡԶʾATrim( d)""A'ûѡA"Exit SubC4Call gobjFtp.0load", iA "P'O b C"e! 'a+AErr(dle:#MsgBox .Descr i?, 8Critical`Ż 칫*ϵͳĈP  ('ṩ!ܣ!aͷβ' @3-07-24 OnAGoToADim t$ ~ As "1'ҪA %yC'hĉre RR# '@ݴfзΧgf`Boolean count!Integer'i!Set t= i_Dirf$JN#L= _ 3ڣ˳ \c'1.رպۼBU b'E¼!G'2.A ,ā'ǰ6@( >blnCopyNu l`1j)""B=BsenP! '=N HeadcWiHO.Windows(1).C.HomeKey wdStory%=  R&'.Sta|rtK.kmarks("Body"u \=_ca+ 1?7$R _ go a 7P,oaTn\,I"1rup IrFPast>ePSR4TResЅH6T'3.-</JTG0 * *BQ_*0_*-\*RO*0L*?* 1/*/*T b& RecC|[^) 'Ե,ʼo. -*"YH'QQrɾ>7t_Cu! 'Sճ?@s?13"2Tail2?is 43'=  T4.acCc#4c] tARC2cS/No]!6' 2`Shape0W@wpہJWAnchor`ragraphrb3O"qFS__ 0/D8-;9\rFja i c"/ !( b0`r ++Ow/tt n|' /? 7okqek en blnCopyNull = True|End If<GoTo PasteTail:0HWith E rr6Resume * >|Y'5.üе滻ǰĵd  thisDocR.Windows(1).Selection.cKey wdStorySet rngRang'%3.On or NoBWord2X'.Shapes("wText").Anchor.ParagraphhGk4 SendMDPt??Start@BG&B>F@dG2‘ADBody EIPSA R'BookmarkVDUO( ( 3I*Attachment ,#AS+ BS-VReplacBV ( Paf,dN@Q'%+Bjg2t 'Ե"GIf )Then 'ģıβΪɾ|!}uCutElse ' ճ * !6c!B\)"1!0"+dC'6.ºϲ"CDoM MereProcess~C`LerTitl$wRecL'7.pA0at$em`Kte.SpavedT'ȩClosd $ 8.λBḿʼCLocateConbtInpE69.µļֺB́ϢCa TInf`o(Newa, `eNameWTFlag)'10.һε`ĸ %D ownUr"")File"EExit Sub No-MD:MsgBox "Բ⣬޷ϵϵͳԱ" & Chr(1 3) .Des0crip$Number, vbCritical, "Ż칫Զ!t p8Not ! Is hiqa9b7 ܄ 0.F//wn/$0handle: EԭC ʱ 󣬱pԭ._UJU 1 77;,= w,- Fun” /<() As !/lean ' ҵǩGC'!1AƶsA@A'ʱָʾDᡵʾ '2003-07x-24h"xæDDdoClipboaLrda''Tpnt.!=(yצMoveRight ,?Tc Fani  R(QqStr>, 8ARyRATS'¼a8YS7Z1M'0TY3]ØƔ)8ͱྺpӦ2! !57*Variabl")}85'Ѿ ޸ֵ.ValuAb҉?'q ,.Add(", IC?t 6oSiC v z-Oian O C /  ?/ )# T, l vYSub UnlinkAllF˶ields()  'ϲ@ActiveDocument.F.UnlinkDim i As Integer*count2>6= eShappes.(On Error Res Nex tFi = 0 To 7\ (i).T>FrameRangep25'aved=False End Sub  ProcessCopy0SendfGoZlhandle:!With T8his hIf .ReadOndlyen Un8tectKIfr=&h#AstrEString, arVariant, @ntLine}'Set = C{("AGe"Rg&')=Ds(1)Ksul!0= Exp lode(, pvbCrA UrB@d(DH A i == E+ Abs(((2 - LenChar)) / 46)H':$1R.Paragraph  h͋AdFirs"9Ind \-ULeftGA Ebe` 9U  /0@vic0ı0߶inStep!^SdlD{AoeC= MillimetersToPo Gs(eH* 10P.35)G.TeHeigh[=N X) >Є'po, KeywordoA'o.Top- b l !"le + o.%D+-M'>Ϊյʱrx/I5 < qEl;hpa Shapegf s|.zg %`"Fr@"Range'(b()de?z) )ak*/,bk,[p,A,_G "e " & bk. GOadcÁ= { $Func@ Check()BIh૏GaWTemXNew CollecL_Delsc/Dn nw_7_7A5 d/ Q+- .A.S  ,E ,Q iIgeri %B>oggk-  & vbCrLf@7iA!(i$wO,05q'¼|¼ |~7e7'pjt 07.5.30 άͼƬInser0tBar cdlFQya5Dialog b54 `^l "c(*@.bmp)|b"eJzlags@OFN_FILEMUSTEXIST Or AEXPLORERShowOpen 0Gc 7_  1Q$3Leats("").-etu''תĵҳcPageNo+*RepaginaU4엀BuiltInEPropP ies(wdys*SeS.BWha`t:=wda,qch%-, :=No db>dyD ?vb'Inline.AddPicture() , False,ue)nvTo# .W0@B!Typ e`(3ZOrder 5(RelativeHorizontalPosiq= wdOAeV1c_B<Left im0'rsToPoints(013.1trTop26.6?%:,# 1o˕Ms0gBox`0scri,S@ppŻ칫Զϵ|ͳ xӄ` @ȫԤL'2007-05-24 by czcS 'ȼرģٶݽԤŰ#';E@Q5W+`" JOldCWTFM;6 Aut$oCPge4TruuDǵرģʽ  Call SelectTemplate`'FormatBody("2")P XAt ^5ǩı;SetFramTextFont("SignDx )LastPrintD +'λ@굽iʼ7Loc+C2entInp ut Exit Sub Errhandle: MsgBox  .Description, vbCritical, "Ż칫Զϵͳ"+nd0 4 ŰԤ(2007-05-24 b y czc!' pŽ'$( On,or` GoTo4' If NewDocWord = "" Then1 OldD WTFlag  AC AutoCge TruM6݂1 C,'?쿬_V_V`bVALVVVipVXV\VVV}0VfV VxtheB(Brng As Range%a}(7ꯔt #With .!.NameA_GBp2312ÁFarEټAsciiaTimes Roman `Other~B#Siz 16 BolbFalsT\R Italic@UnderHlinwdNonvCol`kp= wdcipStrikeThrough.Double_1 OutT  Emboss.Shadow.Hi$dds= SmPCap .All?PXEngrav1.0upers .S ubA .SpaciP2= 0MSS10yPdoson@iKernHAni3QwdL Di saracter eGri& .Emphas@isMark w^d |q0 .qunr(B(1).L +StylEF1?cSoeOJdParC_JZJ_J-2_Jrr. 'JPa$phSs L.Lefu.tC]GsToPos(0TRigh//4'eBefo%Apl/WAf /ace?bc0Ru#0eExP)lys"#P29.8 Al m`/Justif-Wi`Frol@ .Keep=N/ !To ge`_ .PageBreak!_ .NoaNu mbRe/ .Hypa1'.FirstqI`n$$.35C$ZLevew>d !<<&DUn|it+m!{+asIA 2<O-_S#+.q*A\dj "{ .SĵLineHeightGrid = False  .FarEastBreakControlTru XWordWrap:HangingPunctuation'lfWidth)OnTopOf4AddSpaceBetweenAndAlp haiDigit' .BaseCAlignmenwd l Auto!pEnd Wi$th ExLSub Errhandle:    DocRageSet(Prng As$ Re)'ĵҳ 2005-27 b`y czcCDim pCou?IntegeriJ'A B G FSec KC'= .. Parag@hs.c DJ On @Mor Resume NeTxtCFi|1 To5 MN ( (iDO '6)@ .ZAt If7hup.Or&iwdPortraThen 'k_G.AN umberq.A`ctive`j \n XMar| C`imetersToPoints(3.7&D .Bottom2.8Lefnt RA5 Gut 0HeaderDi`stanc+!1b.0 Foo <2t.4oP|B2.1s9q6First Tray1 wdPIefaultBinCOtherasÆCmStarCNewA ddEven" 0C*w.DiffenrU 3jVertical Eg .Su@ppressn Cs Mirror\Q.Two#OnOn?T'.BookFo>lBORe>v DmShheet 1c7Prowd?LayoutMod wdu ETpTTB^L0|scappJTT/Q@Tt-X2?G .T[T^^.S$/Qs(T.8QFߗeT T?i(T1T2_QTToX .TTMlTW*TeonT+sTerTC'OQ0Ɓpoh_]N.T= w߯TT.T=0Tn?O@OBTTAEWTd7TPMTUTkUIf%VNƷиmatBo@dy(flaStԋ'ʽ'Ϊ0@ʱ̡Ϊ1@ĸתa2ȫŰ274 GopCͅ{'e ķΧD1.ر պۼCa`ll &'a%¼ciThisPntc!x.Windows(1).Sel>< Brng.Start = .Bookmarks("Body").Range+ 1 Endl*r fSelect('If flagV"2" Then Call ȫл@תĸ  If'  F1" OrMNFontSetFormat:()'8 '=uPar&'α֤Ч)!ҳDocRngPage0/WithCExit Sub Errhandle:N  GAtt(B|As StringL'ʽP' 0ʱ/Ϊ10Bz2ȫŰ2007-05-24 by czcOn .or GoTo0Dim (Ã'*ķb1.ر`պۼg'N [is@eumenGThe.cstW")v4= .Windows(1).csion~#} i) GKey wdStory K= n , z?t1 ai *@3  #ي@'ҋaCkź('ѡʽzNbhVG"sNotlIs `hJqb5?(!e Fr amTexnt|(TA΀ııuR TQ Nwt0Shappe 'S1S=Ies]0$ = .B e$,4pqSl@ ո#' Macro '  e7-2 ӳ ¼C'a"]#FW! #R я"XReplace`tpFalseExecute !:=wdAllsg6' 0qa " 0. pk s 'Ʊ #^t C P9־Ho^p^pO K _s _!!ֶ P l^l!+^l 0+wCq ;C៓;y:10: AOpiMInt0egerE?m 0parg@tagrap\)CA`IFs.couGagResp NN[q i@+1R pi! "tSs(i4M% c!.LeftXIndPC`imetersToPoin`0pRigh  .Sp@JBefhore0hA8utoJAfsceB LinemRul wd5eExahctlئ.29.5w '.AlignqVwd/68 nJustifiWi`ControlKeep.Together.BreLakNoqNumbζe .Hyphenation = Tru OutlineLeveltwd @BodyTextA If iN1 T. .CharacterUnitLeft@Indent-2.5*Righ+0)FirstLY-4 ZElsWJ5WJ1 Jn6dk.`BepforeyAf AutoA`djustD@isableHBeWGridFaG.FarEaTBreakCo0ntro WordWrapLHangingP unctuHalfWidthH OnTopOf(&AddSpaceBetween)AndAlphaO! DigiL-BasBGAlignmèwdABZlEoWitJhAN AS@ub  () Dim sAs StrIFcGLongdBE= = InputBox("Ϊ+A"Ϊ-,ַ", "8-2"`z <> ""j{= CLng(l!#@ Selec. P@g EhForTma .*C.ime@\sToPoints(0 w+\o7(r f)J@ <)`))y/)5))R%'2*IfNuʱ`Cu!uDateR @u?BcwAxast rCopy, arFVariant, Integer =mASet=i%=f.%= Exp lode(, pvbCr59{0 To UBouxnd(t7@(xi) @ +p  GS h1 p^ ""FTypeVF K.a&+:1.4Fw.Nam"_GB2312/Siz16Q! A:=O1kȫлA1'  Macro ' 2007-7-2 p_*7>R`wdFull>9(thSub ת13A0:{qjsz, bP9>i= .BLine"P If ( .Visible@}msoFals@5^= "0 ") OrS Tr u 1 Then DExit w@E1V1Ut@mJ1Not  Is @h@PK A; e;Q V; 8ĕ8D8(C .Q ?5 5N`*ED1" .QKA< 5,/HHg=t.Tpop -`('E-be.Heighdp^vch1ghQmdc fSv$+5'Ajo{FKe@ywordTJi'9aio h o*=+   p@{ aSen, ?"J.SignUni>tk.??@ Date ?t DO`W""`m"Q_lva`yH:2 MsgBox "==" &{ql.p~(un| ("jn?тi_@pXl ҀåbzActiveStyles(wdNormal0).Fo .NameFarE@:"_GB2312"3V Ascii1Timenew Roman}Other~/*SizA16hBolL.ItalicUnderlwdNonG4 vCol= wdAut ticStrikeThrough.Dou_a].OutT  E`mbossSdow.Hidd$en.SlCap .Al- ?a;En0grav Superscript .SubRpac= 0%cng10yPosit`aiKernC6 Qnim o1w dAL DisaCharacterS eGri& .Empha0sisM wd wJG :t.Page lup8NNumbe1.#=@Oriw Portraif |p giC ; sToPop`s(3.7fB,otP/r2.8Leftq .Rq 5q Gut 0 s(0Hea?0tanc*s(1.Foo?@)4yqWid = /s(21OӞ? "29;F ir`!Tray 0wd2erDefaultBi6.V s.S3NewCA('.Od2dEven)erFooter = True ' .DifferentFirstPageHea0derF\Fals .VerticalAlignmgwd Top .SuppressEhndns/ S'.MirrorMargin  .TwotsOnOne/.BookFoldPr@intingR evSheetX1xGut$Po wdLeftCharsdLiW28 sgR22 ayo utModqwdLGrid X` WithCA ActiveDocuk.SnapTo TShapeA1̀ DistanceHorizontalCimeA?sToPo@[s(0.01) E53Oric^2.5S3.7 SpaceBetweeni-06I  IsÁA2FrombrOptionssplayA 3Sub  ҳ`(@.LSetup.OddAndEvenasI.Se K( <'ʆ#If .c0s(wd ima@ry).Ex`Js ThenbURange.Del O'"IfNumbers`.Add f:=DgOutside, :=i"'CFrame:s).g InsAfk " "Before " ParagraphFormat. aac UnitInd#B:Right_)O])erF .N#FarEast"Ascii3`.nt) OtFhb Siz14I' hK*l! ).W!G' ż?k5F=5Q2))5d 5r=x7355r55thE#Cn 6665 666:96pN6]6&~26w691&96`:6;3.66t.66ttta *\G{000204EF-0000-0000-C000-000000000046}#4.1#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.5#0#C:\Program Files\Microsoft Office\Office14\MSWORD.OLB#Microsoft Word 14.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\system32\stdole2.tlb#OLE Automation*\CNormal*\CNormalaZ5c&*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.5#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE14\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{6018876F-E983-4AE8-8263-AD84685DEF2E}#2.0#0#C:\Users\ADMINI~1\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M  cZ5c ThisDocument0963355a63#ThisDocumentu RJeGov0;63355a63 RJeGov+#frmSelect0<63355a63OfrmSelect0 Common0>63355a63R CommonU"H&FileDialog0?63355a63+FileDialogU`)x0H`gl Op d^LH9:P6Kge Lea>IoHʸf[7 p Wordk` VBA`Win16~`Win32`Win64x`Mac`VBA6#`VBA7#` ī"`stdole`` Normal` Officeu` MSFormsC` ThisDocument<` _Evaluate`gobjFtp` gUserNameZ`gUNID9` gWordType` gWordBody` gWordSourceV` gFileType=`gOldUserg` gAllDocWordD`gKey` gcolBookmarks` CollectionW` DelAllVarԑ`vm` Variablesn`Deletex`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`ValueK`(OldTemplateName 3` (OldWTFlag`RecordTemplateInfo`(AutoChangeFlagA`SelectTemplated `RecordBookmarks /`ReadOnly4<`(ProtectDocument(a`MsgBoxR`Erro` Description ` vbCritical+}`ScreenUpdating! `(޺ۼr` MailMerge`MainDocumentType` wdCatalog`OpenDataSourceK`ConfirmConversions`ViewMailMergeFieldCodesz`wdNotAMergeDocument5` CommandBars `Visible`(غۼ`Document_Close7\`FileSave `޺ۼļ` WindowState|`wdWindowStateMinimize4a` 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 `vbCrLf`wdDialogToolsMacroHS` strFields`GetMergeFields`Save` vbQuestion`vbYesNo`vbYesa?` (BackupFile`strCheck8`CheckBookmarksp`sRet(`intReply,h` UploadFileE` vbRetryCancel` ExecuteAgent`(Escape(`vbRetryg` newfilename`UnlinkAllFields`AcceptAllRevisionse`newretW`TimerX`opts `strMatchB`opt`(Explode`(TemplateDownFileD`Path2`(TEMPLATE_FILENAME_PREFIXr`(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` FindTailEnd2`BodyEnd2` ErrNoBody21`ErrNoAttachment ` ReplaceTail` ErrPasteTail]`ReplaceTailEnd` NoBookMark`ChrK~`Number-`UndoÞ` 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ϱ` (SetItemValueX`bk\`BookmarkC`gcolTempQ>` (DelItemValuee`Itemz` InsertBarh`cdlFile"` FileDialog`Filter;`FileNamej`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`wdBaselineAlignTop3` 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`wdBaselineAlignAuto`y`sIndentv`cIndent`dIndent`ʱ`DateRangc` DateStringE` TypeParagraph `wdAlignParagraphRight0`CharacterWidths`wdWidthFullWidth`л`wdWidthHalfWidthE`qjszt`bjsz` MatchCase`AutoOpen*`doClipboardNull`DoLastPrintShap`ErrHJ[`tshape`uShape`msoFalseF.`msoTrue `Erli`ʾӡ g`طӡ3`ҳx?`Styles p` wdStyleNormal`BookFoldPrintingP`BookFoldRevPrinting~`BookFoldPrintingSheets` CharsLineV?` LinesPageg` SnapToGridP` SnapToShapes`GridDistanceHorizontal&8`GridDistanceVerticalF`GridOriginHorizontal6`GridOriginVertical`GridSpaceBetweenHorizontalLines`GridSpaceBetweenVerticalLines.0`GridOriginFromMargin@u`Options`DisplayGridLines`ҳ.`Footers`wdHeaderFooterPrimaryd` PageNumbers`PageNumberAlignmentY`wdAlignPageNumberOutside` FirstPage`Frames8` InsertAfterq5` InsertBefore.`wdHeaderFooterEvenPages1` RJeGov+2`(P,` oldIndentk` strFontName` intFontSizew`wdDialogInsertFilej`myRange-`(鿴ۼqm`InsertedTextMarkn`wdInsertedTextMarkUnderline`InsertedTextColorn8` wdByAuthor*``DeletedTextMark`wdDeletedTextMarkStrikeThrough`DeletedTextColor `RevisedPropertiesMark` wdRevisedPropertiesMarkUnderlineJ`RevisedPropertiesColor`RevisedLinesMark`wdRevisedLinesMarkLeftBorderP`RevisedLinesColor`wdAutoKV` (OAϵͳ`(غͷI` ColorIndex`wdWhitex`(ʾͷ|`wdRedº` (һЯ`vTop` (ͼһ٨`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` _B_var_LCase'` _B_var_Right9` _B_str_LeftV` _B_str_Trim` _B_str_MidX` _B_str_Right#(` #+OS   Z@0BP@@ R"$0Bble32="393222000" CMG="C8CA6472687268776D776D" DPB="90923C23592359DCA7245901825B9AED0227F6E26BEF36777D4642387E4FC4DC36A910A2" GC="585AF407F507F507" [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, 25, 25, 802, 484, C Common=0, 0, 0, 0, C FileDialog=0, 0, 0, 0, C (H  @}R KQfrmSelect0=B0=Bf oCompObja_O$4cboWordOO$0cmdOKrdO( 0cmdCanceli$0lstTypeO AH(5"[SO(nx[{u"[SO(Sm{u"[SO` 5"[SO Microsoft Forms 2.0 FormEmbedded 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 ThisDocumentThisDocumentRJeGovRJeGovfrmSVBFrame'PROJECTwmCompObjnelectfrmSelectCommonCommonFileDialogFileDialog  FMicrosoft Word 97-2003 ĵ MSWordDocWord.Document.89q