ࡱ> ad`gq` RbjbjqPqP? ::# 84h@@VVV -9ggggggihClBg!gVVgBpVV-\-r)T*V4 ` IJj)q+g0h)ll*l*gg6^hd $ DN 5uƉS{Qu{|v6R\OdQ`QYHhh YHhUSMO S SRvlQz YHhe t^ g e ^Sv6R\OdQ`Q;NcN`QN[`Qp~5u݋`Qv^JT`Q Ty6R\O:ggQ[{NdQhTgdQekeY TfNY T@b^\:ggLyfz;NSO5u݋SxkMOpe;`e;`6eeQw@\[8ha  *,6FHJX\h  ¹t`J*hRhR5@CJOJPJQJaJo(&h,hR5@OJPJQJaJo(&hRhR5@CJOJPJQJo(hRohRCJaJo(hf hR>*CJaJo(hR>*CJaJo(hf hRCJaJo(hRCJaJo(&h~hR5CJ$OJPJQJaJ$o( hOE5CJ$OJPJQJaJ$o(/h( hR5@B*OJPJQJaJ o(ph*,  $dp$Ifa$gdR$a$gdRgdR H   * 4 :.... $$Ifa$gdRkd$$IfTl4ֈ}e'i0\:T@ p 0=4 laT4 > H N T Z ` j t ~ Ff $$Ifa$gdR DFHJNPTVZ\`dfrtvx|~ʾʬʎvfvfUfvOH hW0CJo( hW00J!h( 0JCJKHOJmHnHujhW00JCJKHOJUhW00JCJKHOJhejheUhht@o(U"hRhR5OJPJQJaJo("hRhR5CJOJPJQJo(h[hR5aJo(h[hR5OJQJaJo("h6xhR5OJPJQJaJo(&hRhR5@OJPJQJaJo( Ff $IfgdRFf6 $$Ifa$gdR DFHLNRTXZ^`ojhhhhhhhhgdRwkd$$IfTl 0\:G o30=4 laT$IfWDn `gdR $IfgdR vz t^ g e     -  PAGE 2 - `~gdR$a$gdF  &#$gdd(hht@o(hthGhehFhW0CJOJo(hW0=&P 1C2P0:pRA .!5"#$%SQ $$If!vh555T5@ 5p5 #v#v#vT#v@ #vp#v :V l40=+,555T5@ 5p5 4aT$$If!vh55858585858555 5 5 85 85 85 8555W#v#v8#v#v #v #v 8#v#v#vW:V l4D0=+,55855 5 5 8555W4aT)kd$$IfTl4Dz}% ]e5#'1,i037\:888888888W0=DDDD4 laT}$$If!vh55858585858555 5 5 85 85 85 8555W#v#v8#v#v #v #v 8#v#v#vW:V l0=,55855 5 5 8555W4aT&kd$$IfTlz}% ]e5#'1,i037\:888888888W0=DDDD4 laT}$$If!vh55858585858555 5 5 85 85 85 8555W#v#v8#v#v #v #v 8#v#v#vW:V ld0=,55855 5 5 8555W4aT&kd^ $$IfTldz}% ]e5#'1,i037\:888888888W0=DDDD4 laT$$If!vh5G 5o3#vG #vo3:V l 0=,5G 5o34aTN@N cke $1$a$$CJ KHPJ_HaJmH nHsH tH$A@$ ؞k=W[SOFi@F nfhB@B> ckee,g$a$5B*CJnPJph8YR8 ech~gV-D M @C@b@ ckee,g)ۏUDNWD]`FOrF 8 Char ;^`;CJaJ  R            R !"SK00T0,D0K00firx}!"#%&()+,./>?@ABCDEFGHIJKLMNOPS00000 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 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 000 0 0@0I00@0I00@0I00@0I00@0@0@0@0@0I00< 0000000000000vfirx}!"S@0@0@0@0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 K0%0'&@0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 K0102D@0 @0 @0 @0 @0 @0 @0 @0 @0 @0 @0 K0=0>K00 K0?0@K00 K00 . "   4 ` "!t  ,b$5|Bj%|EZ %F&@H 0(  0 0(  B S  ?RBodyEnd"S"S$%,./4QV\]`adefhiqrwx|}##%%&&()+,./BCS##%%&&()+,./BCS3f"##%%&&()+,./1;>BCS##%%&&()+,./BCSuz45BzHmMBqBOHt  \ ^ `\hH. \^`\hH) T\T^T`\hH. \^`\hH.  \ ^ `\hH) @ \@ ^@ `\hH.  \ ^ `\hH. \^`\hH) ,\,^,`\hH.hh^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.5HmMqBOuz                         `9        65OEZ( %ay$4tL#?$d( 28BBGG>UN STaV`-ci+inlvqNMs\ux_lz{Fxl65qZ^$BRQ$wL9]`h zT>b3W0peDxfirx}!"SLJLSeal] TemplateName]ljl eHr^5u-;`@\Se.doc$V-w>? V1w>? Vw>? V0w>? Vw>? V4w>? Vw>? V2w>? V3w>? V w>? V w>? V w>? V w>? V w>? Vw>? Vw>? V w>? Vw>? V w>? Vw>? Vw>? Vw>? Vw>? Vw>? Vw>? V#w>? V w>? Vw>? Vw>? Vw>? Vw>? Vw>? V w>? V! w>? V"!w>? V#"w>?   DraftDraft?????0 ( _eQez_eQez BASEUOS._eQez((p( ( ꁨRcHrꁨRcHr BASEUOS.ꁨRcHr" (@bCustom Popup 17 (@~4YCustom Popup 18"( ԏVRlQ|~ԏV OA|~BASEUOS.ԏVOA|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(ApproveApprove h h h h h0 (@bCustom Popup 17 (@~4YCustom Popup 18 ( g wug wu BASEUOS.g wu(D@@D@D@D@D10033p(G__? ( υuυu BASEUOS.υu(p( ?_ ( ԏVRlQ|~ԏV OA|~BASEUOS.ԏVOA|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(+Custom Popup 17 Custom Popup 170 (XRNLbXRNLBASEUOS.bXRNL (Q\NLbQ\NLBASEUOS.bQ\NLCustom Popup 18 Custom Popup 180 (>f:y~4Y>f:y~4Y BASEUOS.>f:y~4Y (υ~4Yυ~4Y BASEUOS.υ~4YViewVieweAreAreAreAreAr0 (@~4YCustom Popup 18"( g wug wu BASEUOS.g wu(D@@D@D@D@D10033p(G__? ( υuυu BASEUOS.υu(p( ?_"( ԏVRlQ|~ԏV OA|~BASEUOS.ԏVOA|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(Custom Popup 19 Custom Popup 190 CreateWord CreateWord1KHZ1KHZ1KHZ1KHZ1KHZ0 (@bCustom Popup 17 (@~4YCustom Popup 18 ( ꁨRcHrꁨRcHr BASEUOS.ꁨRcHr ( ԏVRlQ|~ԏV OA|~BASEUOS.ԏVOA|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(CheckCheck1K_V1K_V1K_V1K_V1K_V0 (g wS?zg wS?zThisDocument.g wS?z ( ԏVRlQ|~ԏV OA|~BASEUOS.ԏVOA|~((0000e֜00eeesus00eeee1e1eeZ]Z0BAB00ee1ee1e1e1e1e1eZ]Ze100ee1e0e1e1e1e1eZ]Ze10eee10e1e1e1esusce10ee1esusce1ee1eeeeeeeeeesusece1e1e1e1e1ΚΚe0e1e1e0ce֜0e1ee0Κce00ee00ece0ec˥eeΚΚeeee1e1e1e1Κee1eeeeeeeeeeep(5"cke.ThisDocument.ToggleFieldDisplaycke.ThisDocument.SelectTemplatecke.ThisDocument.UpdateFieldscke.ThisDocument.Rejectcke.ThisDocument.ChangeTemplatecke.ThisDocument.UnlinkAllFieldscke.ThisDocument.ProcessCopySendcke.ThisDocument.FileSavecke.ThisDocument.ToolsMacrocke.ThisDocument.g wS?zcke.BASEUOS.GetItsNamecke.BASEUOS.ProtectDocumentcke.BASEUOS.SetItsNamecke.BASEUOS.SetRevisionsOptioncke.BASEUOS.UnProtectDocumentcke.BASEUOS.g wucke.BASEUOS.bQ\NLcke.BASEUOS.bXRNLcke.BASEUOS.ԏVOA|~cke.BASEUOS.U_ucke.ThisDocument.ToolsOptionscke.BASEUOS.echR%cke.ThisDocument.ToolsOptionsRevisions$cke.ThisDocument.ToolsOptionsUserInfo cke.ThisDocument.ToolsOptionsView$cke.ThisDocument.ToolsReviewRevisions(cke.ThisDocument.ToolsRevisionMarksAccept(cke.ThisDocument.ToolsRevisionMarksReject(cke.ThisDocument.ToolsRevisionMarksTogglecke.ThisDocument.ToolsRevisionscke.BASEUOS.eucke.BASEUOS.>f:y~4Ycke.BASEUOS._eQezcke.BASEUOS.υucke.BASEUOS.υ~4Ycke.BASEUOS.ꁨRcHr$cke.BASEUOS.eucke.BASEUOS._eQezcke.BASEUOS.echRcke.BASEUOS.>f:y~4Ycke.BASEUOS.g wucke.BASEUOS.ꁨRcHrcke.BASEUOS.U_ucke.BASEUOS.υucke.BASEUOS.υ~4Y cke.BASEUOS.bQ\NL cke.BASEUOS.bXRNL cke.BASEUOS.ԏVOA|~ cke.THISDOCUMENT.g wS?z cke.BASEUOS.GETITSNAMEcke.BASEUOS.SETITSNAMEcke.THISDOCUMENT.REJECTcke.THISDOCUMENT.FILESAVEcke.BASEUOS.PROTECTDOCUMENTcke.THISDOCUMENT.TOOLSMACROcke.BASEUOS.UNPROTECTDOCUMENTcke.THISDOCUMENT.TOOLSOPTIONScke.THISDOCUMENT.UPDATEFIELDScke.BASEUOS.SETREVISIONSOPTIONcke.THISDOCUMENT.CHANGETEMPLATEcke.THISDOCUMENT.SELECTTEMPLATEcke.THISDOCUMENT.TOOLSREVISIONScke.THISDOCUMENT.PROCESSCOPYSENDcke.THISDOCUMENT.UNLINKALLFIELDS cke.THISDOCUMENT.TOOLSOPTIONSVIEW"cke.THISDOCUMENT.TOGGLEFIELDDISPLAY$cke.THISDOCUMENT.TOOLSOPTIONSUSERINFO$cke.THISDOCUMENT.TOOLSREVIEWREVISIONS %cke.THISDOCUMENT.TOOLSOPTIONSREVISIONS!(cke.THISDOCUMENT.TOOLSREVISIONMARKSACCEPT"(cke.THISDOCUMENT.TOOLSREVISIONMARKSREJECT#(cke.THISDOCUMENT.TOOLSREVISIONMARKSTOGGLE@R@@UnknownGz Times New Roman5Symbol3& z Arial;ўSOSimHei-5 |8N[1NSe-N[;[SOSimSun;5 N[_GB2312!1h()G6)GB'++-!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[5iCd""Ww* 2qHP?d(2ckeeNRJeGovpSS    Oh+'0t  $ 0 < HT\dl ļRJeGov Normal.dotӡ4Microsoft Office Word@F#@$ 4@G@I+՜.+,0 X`px RJSOFT"   !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOQRSTUVWYZ[\]^_bc@fijklmnopqrstuvwxyz{|}~Root Entry F@) Ie$Data 1TablelWordDocument? SummaryInformation(PDocumentSummaryInformation8XMacros` I` IVBA ` I` IdirwCommon h9BASEUOS3__SRP_0   !"#$%&'()*+,./0123456789:;<=>?@ABCDFGHIJKLMNOPQSTUVWXYZ[\]^_`abcdefghjklmnopqrsuvwxyz{|}s0* pH"dD<@j= B U J< rstdole>stdole h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\syst em32\e2.tlb#OLE Automation`Nor(malENCrmaF  *\C m!OfficgOficg!G{2DF8D04C-5BFA-101@B-BDE5gA*Ae42gProgram Files\CommonMicrosoft Shared\OFFICE12\MSO`.DLL#M 9.0 Object LibraryJ@MSFAs>!SFDBs3@cD452EE1-E08"F/A-8-02608C4D0BB4cFM20 'B p&/;"1{B~ 00}#0# р0@3C0B22C0-3DD0-4BFC-8CCB74810AFAE3H.DOCUME~1\ADMINILOCALSTemp\V BEZ..exd[3!.E .`PM DThisDocum@entGTAisDccDuen 2 HB1t","" +bDBASEUOSGbDBAADEUOM 2* !mfrmSDelVGfsS`kc &2/ /](AoG-C`0m 0o 0&2I/U"brU~~{    ob>?C/U" dNCopyFileAxME(6 < <P @+\`p@ i^`!i`ibT @f @j @p @t_%(  +`   if`h(`+jh`0 ih`0+4` )izi|`~+8` @1iz`i|`~+:h` 8ii i``f+` Ji+`` Qi(iH`+B`nkYiz i|`~n+h`Lk8 aiz Xi|`~n L `P4k jii| d@(```\`~HX  + `k |i 0iPi`~j+" `  I ````ʐRp @HN@b@l@p hH `h`ZHp hH `h``Bx0 p ` tX `0 t `p`lp hH `h`` t 0 `p`lp hH `h`` t `p `lp hH `h``zt `p `lp hH `h``zt `|pX p hH `h``zt `|p`|p`zt`hp hH `h``|p `zt 0`h`|p`h H(`hH`ztx`|pp hH `h`@Ll  `h`zt`|pH `t `pp`l@H @8 `zt``t`p8 `l    P`|p@4 `zt`|p`hx`t`pXH0x`H00`l`zt`|px`8t`p`l@\  xX8p@L `x`pt`p`l ppd@X @H @8 @( @  @  H h  U$*\Rffff*0<55e1a415"*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f H  $(8 `"($*"( B  PXhT@ B  HP Xh"p " & (08@X B  `hp B  B (8Pp x   B  (0 @`hB    B   B (08HPpx (B   ("(8 `p  B  DX@`hp B  x2f                    0 8 @ H X x]$t_H 1صģǰ׺] p 1ģĿļ·] 1ģURLַ]  1ĵʹõµļ] 1ĵʹõµģ] 1ĵʹõԭļ]  1ĵʹõԭwordģ] 1ԶģϢ־`] f\$4'h f\$8'  !$ 'k8 h \CoreBase.bakA@j  f h\CoreBase.bak\ lyyyymmddhhnnss$ $\'i zB@H]P h n p r $~ hA@tkP h\*.* p r $~'0 0 h\ 0$v l h\ 0A@xk ~'0 z!'jih] z |$'~ ~ z ~ $ '4kPiH] z |$'~ ~ z ~ | $ '8ki]D8P \$8'f \$4\'   $'k` f  f'fk8d0 f f!$ 'fkk  f':ihA@4  a  . $,'  $ 'ix]H_` '   H'  i(`] z |'~ ~ z ~ $ 'Bki]x z |'~ ~ z ~ | $ 'hki"һֳַָɼַ]]H`xӵһĸʼҬ'_   |'~ ~Gxj @   ~  $  + ~ | '  'x @  $  + 'Li@]p  '~ ~ b  ~ $    ~   $ d ' ~   '~f 'i]] ] ]0    $ ' $' G 'j.԰ǿո⴦  :  /  [  @  {  `   'dh $ ,' KT%0 'KT% 'KT%u0 'KT%u 'n  'k '"iжAttribute VB_Name = "Common" Option Explicit Declare FuncpCopyFile Lib "kernel32" Alias 32 Th ^"74D Thime "!/) < `3 - 4ì!KillcAIe\nd#8$(!0N@umber 0@@jOMainIsSepbBCc!=intPoIntegerCC= In Rev' ~ `!+D rAr#$- 1'^aFo{osooooy pHj+LQ  RndTrim>Loca~lq-YFP3b0lnAdBv\, #UnixxO"_Path  eo]6 \`#&7#0' ;'p? PG*Get@S!(32d1(1PgBga=B2b]1S AE^]?nT%xn^xoT$p) R( 7'zC%/ C-#Randomize Do UntilR/|= u` & Hex(0 * 10 ^ 9CLoop3GI,pN`Checki/MatchBq UlngUxoqtH(+ 1_rHB Bs  p> 0 HE/1GEQJ@T3 _d_d/dҥ/P /dzTcnC  ,tۿݿc1 % 34  ?cy?c !]'һַָpɼUX odesƅ x.1arrMsg(? Counta/7Star'ӵ ĸʼՎ҂!= 1Dd4 intPos = InStr(pStart, strMsgSep) If0 Then Exit DoBReDim Preserve arCount .Mid$(w -xC#;$+ LenC {& + 1Loop![YPExplode: End Function  Replace@(ByValSource As2 in From To )n Ʉ*Intpeger 1| \Do Whileŀ> ^0@n-=@afta- 1) +8++ Right|,Fo |) |u#1D$ 0To)?4akF2lEscapHlInput]]Out eEChar2AsciilB!Long`For i/1 @WKg% iB= E", i,`3&=`|cWa9.#= 1632 '԰ո⴦ (a< 58@(dg> 47)) Or _>J9JA64123 96 g8=W9&a"gpElse-!2H8ex$()Select Casee`#H "%0" 2  3u>4=UA?%*D23DIfdNextDy4& o |*xMEP<> L*L<< @`  ` `ĵ``GaiZ %J% ` `Comm`.Vis`sddl P% ` 6 `p tkG P` rkO ` tk ^ `  g ` t h ` {`  `  $ ` `` n.Fo & ` `` Ran v `  ` (H`  .`  `0e.PaH@hPH@hPH@hPH@hPH@hP%H@hPH@hP@x ( H@hPH@hPx  t ` %x ` H v0 @x  % %tx ` @r @x t ` 8 (tP `  Hp U$*\Rffff*0=55e1a415*\R1*#c6*\R1*#17e*\R1*#c1*\R1*#17b"  < :P,& < <(6h  " (8.Hx,F( 8Xx "  < ( (  HX Dp & B(:0p : * ((0 " 8@HP X` h   "   (HP "X`h px      "    (08 " @HPX`hpx "   J 0 J@ "  " &       * H h  p x   "       *      ( 0 " 8 @ H (h            ( H `         "          ( H `         "  0 " 8@ HX :` "  " > 0PX ` h x  x6ActiveDocument.Variables("LJLSeal").Value = "GaiZhang"4ThisDocument.Variables("LJLSeal").Value = "GaiZhang" 0.ĵɹ ~ʾϢA@xBGaiZhangLJLSeal %J(L&5 ThisDocument.CommandBars("Template").Visible = False6 ThisDocument.CommandBars("jpassword").Visible = Falsepsddloamanager12345678P l B@reActiveDocument.Save = TrueThisDocument.Save = Trueo@ ]Ա !!' !!' !!' !InsertFileStart5pB@Mi $B@ ! InsertFileEnd5pB@!V]InsertFileStart7p!l InsertFileEnd7p!7.  !(  !(  !(InsertFileStart7pB@ InsertFileEnd7pB@ qoxh ](@X5oldIndent = Selection.ParagraphFormat.FirstLineIndent!intFontSize = Selection.Font.Size!strFontName = Selection.Font.Name16'  _GB2312'>.Bookmarks.Add Range:=Selection.Range, Name:="InsertFileStart" Dialogs(wdDialogInsertFile).Show<.Bookmarks.Add Range:=Selection.Range, Name:="InsertFileEnd"]p BeginMark7p!lBodyEnd7p!7.p  !(  !(3myRange.ParagraphFormat.FirstLineIndent = oldIndent$.Bookmarks("InsertFileStart").Delete<".Bookmarks("InsertFileEnd").DeleteqoA@ 5tA@k pjt 07.09.19.TrackRevisions = True995tA@vk8q0o( pjt 07.09.19 9.PrintRevisions = False.ShowRevisions = Trueqo 5tA@k pjt 07.09.19.TrackRevisions = True995tA@vk qoPSetRevisionsOption 999qo  9 9 9 9 9 9  9  9qho` B@B (o@C///////////////////////////////////////////////////////////////////* ǺͷصIJC///////////////////////////////////////////////////////////////////9`SubjectTextǡļ⡱!'DocMarkLineǡĺšĺ]P 5tA@k  SubjectText7x!!!( D  DocMarkLine7x(5tA@vkqxoph` 5tA@k@  SubjectText7x!!!( " DocMarkLine7x(5tA@vkqoKeywordTextǡʡ!KeywordLineǡʡCopySendTextǡ͡]] $' 5tA@k KeywordText7x. !  ( KeywordLine7x.! !  ( CopySendText7x. !  ( !  (5tA@vk8q0o(]X]p $' 5tA@k KeywordText7x. " !  ( KeywordLine7x.l, " !  ( CopySendText7x. !  ( !  (5tA@vkqo  B@o B@NB@o3===================================================` !*%,!A@x`o0H]֣ Ķ ȡ$'0pr 0 cr 0 !*%,(Tko Sub test()MsgBox Application.VersionEnd SubHAttribute VB_Name = "BASEUOS" Option Explicit Sub ĵ()  'ActiveDocument.Variables("LJL@Seal")(luGaiZha ngxThis3:MsgBox "ɹ", vbCritical, "ʾ&s6r' CommandBaruTemplatbeuisiF0alsejpassword Protect P:="s ddloaFager12345678NoReset:=D, Type:=wdAllowOnlyFormFielDdssSavmTdru1 '@End CȠEO`rror $ NexWith8"Dim @oldInd As Single, strFont¬ng, intSizeA Inte@D= SelQ.ParagraphCat.FirstLine . ( - .Bookmarks.Adxd R@i',  zInsertFileSta rtKalogs(wdDiAG ).Show@< m my-g Set= .(G(" , a).!./#n/ C=iE\B FIDMthi@ d !"lclԶŰlll Strol'lml'l;a('lf "16HY"΀_GB2312''6u=[D's?u `EHd`_u:BegiL/ *  ީ'/6s   90  2r B B!.#edTгX .wGUrlGЫColp= wdByAuthorcM <qkeThroug O S/(RedPpies  g P@T)FLeftB@e B'@oOAϵͳ\lo0K @'/ '{ͷ@IJ//w/= Sub غͷ () On Error Resume Next2'\jectT"ǡļ!DocMarkLine!š@ĺ%Dim o As @Varian]With ThisCwIf .ReadOnly9"enG Un0ProtLEnd If.Sh@apes("e").hFrameRange.Font.ColorIndex = wdWhite&<{&VisiblemsoFalseciL A2 CrʾcrZtZZRedkZTru&Z {Z@һK@eywordHECB'CopySenjnStepAkSingl!mC= MillimetersToPoints(10ErocyVrSet= s %"|o.Topj- "gD*b .o.HeightD+m ""\6? P9 ?KS Q[F'  test'ApplicatVPep K*y *\CNormalrU~~~~~~~~~~~~~~~~~~~~~~~~& 1MZGHwc a  )Aa Q y 9 q  ! A i 1 Y q a ( )Ii1Ya    1Iq   K8; O^()  ThisDocumentBASEUOS frmSelectCommonF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA I q` F5C:\Program Files\Microsoft Office\OFFICE11\MSWORD.OLBWord Aip0FC:\WINDOWS\system32\stdole2.tlbstdole F QyL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE12\MSO.DLLOffice a.E .`M C:\WINDOWS\system32\FM20.DLLMSForms {#O0n8 2C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp\VBE\MSForms.exd ak FecKT{ F0O*%z|l=F3@J+llDocumentOAOpen DoMailMergeDocument_Close ToolsOptionsToolsOptionsViewToolsOptionsUserInfoToolsOptionsRevisionsToolsRevisionsToolsRevisionMarksAcceptToolsRevisionMarksRejectToolsRevisionMarksToggleToolsReviewRevisionsToggleFieldDisplay UpdateFieldsReject ToolsMacroFileSave鿴ԭSelectTemplateChangeTemplateLocateContentInputRecordTemplateInfoEscapeUnlinkAllFieldsProcessCopySendLenCharGetMergeFields GetMergeField/ FCheckBodyBookMark 00h 48<@DHLPT / t_CopyFile kernel32 CopyFileA   BackupFileClearOtherDayFile StrLeftBack StrRightBackRndTrim GetRndStringInStrRevStrLeftStrRightExplodeReplace $$  p F draftword LJLSeale Ff F GaiZhang createword checkword 4CoreBaseUOSmanager12345678 approvewordb F F | DocWord TemplateName  ljlĵԶŰ鿴ۼ¼ۼغۼ޺ۼSetRevisionsOption OAϵͳغͷʾͷ һ ͼһProtectDocumentUnProtectDocument GetItsName SetItsName  echSb_fĤIx8< &COREBASE UOS eLuRlQ|~VBE6.DLL  @ k `   S  h  F Mail Merge F F View Draft Approve Check CreateWord viewword viewdraft elTv^pencn F F CopySendText F F F^ F0 F  X FW F KeywordTextTop KeywordLine Height w    Bodyg Fh Fu F $/f&T\gevf9eOX[0ROA|~-N D1uNckefN~{`O Rd `Ovf9eelOX[0ROA|~-N N{tXTT|0UploadFile (el N OWordcke0R gRhV /f&T͑Ջ Microsoft Word SaveWord &UNID= &WordType= &FileType= &FileName= EscapeExecuteAgent ok   /f&T͑Ջ MERGEFIELD   & =  0 ` P  p i  j '__SRP_1__SRP_2 __SRP_3__SRP_4 -jFtpWordTypeUserNameUNIDWordBody WordSourceFileTypeDocWord TemplateNamestrChar strFieldName  fldlpExistingFileName lpNewFileName bFailIfExistsstrFilestrDirstrMainstrSep strLocalFileblnAddstrUnidintLenstrCheckstrMatchstrMsg strSourcestrFromstrTostrInput{rU hD`1;000000$A`$`$`$`$A`$`$`$`rU 0f QY@ 9qiA i9yqY9aI!1iI 1 Yq1 Ya i !!A!!1"a"""!#9I####$ $ %I$y%i$$y Q\a `[WW____W8K 4&lMl@\ \`#X@/X5\%*#X #T82XT < D H $L&XP! P lXP/XP8P! P P@=vKvAXH:lN\\P$ P 0 H , >X1L)PH5\ lL 0t@ 0@ 0o:lN\\$ 5\vK@0$ 'HP! P H L)PH'HP! P H )PHFkFX;LJLMl@\  \X /X5\L KBXH:lN\\P$ P 0 H , >X)PH5\BXH:lN\\P$ P 0 H , >X)PH5\Kv0v0K;H:lN\\P$ P 0 H 0 )PH5\ ovv=v=ozF$ kF KX PP ,!'':l"N44#lX*F\ $/XP6\4 (L,XTPH\4DKx! x x % Vtxt x ,&xm''''''4'T't''''c4fT'Hxt x &x6T4tT4xt x H&xxt x ,&x@ 0 ct-:d'%x! 0x H( ))x-:d*%x! 0x H( ))x-:d+%x! 0x H( ))x-:d,%x! 0x H( ))x-:d-%x! 0x H( ))x-:d.%x! 0x H( ))x@C l0k-:d+%x! 0x H( ))x l0 / 0-:d,%x! 0x H( ))x l 0 % $ |-:d-%x! 0x H( ))x l 0X % $ |-:d.%x! 0x H( ))x l10 /-:d*%x! 0x H( ))x l20-:d*%x! 0x H( ))xx! x xK xx ,!'':d"N443l*FT $/x6T4D,tTxT4tT40 h  0   0   0 p  0   0 h  0   0 H  0   0   0   0 H  0   0   dKz$ kz dd`1t5d $ @C`.l`0l`0l` 0l` 04'''0$:PLNdd^$6d0 D Mzkz3'':@"N00:PNNdd $6d0@ 0@ 0; :PNdd$  0  0 )5d2'':PNddf0$ H6d0 $ p!D@X4dO`15d l07'':@PN00%:PQNdd^$p6d0: R%S<*#T*#@*#U*#L*#V*Fd@X40W%ltF@% XF%X4Y`12 6 d0 lZ=K'':PPN00%l[*#[*#\*Fd^$p26d0kD  ,!'':P"N00>Fd $6d0d0l`t< d00   0 h  0   K8P:dHNTTt$ 8t @IP LJ)tP5T2 '(0'Tt@$A <Bt Kt6T0pz/ pz/ p$ tPT00  0 p   l K  Vxvx kv- 4I(,0:D5N44T! DT 060 7, P8Q(p)T0,54B$,0Tp 9T 8:0 @;, 9>$1l)T0, <C$$ll4 = 4\/$Z\5Ic <@Z@\4v4$kXkv.罫pX/$54 Zd *ZTp p9T >lTcb kZY0kZTp p9T >0 ?n7(kZ,p p9, >( ?)T0,(VX0Tp p9T >0 ?l(kZ,p p9, >( ?)T0,(/70kZTp p9T >0 ?)T0 ZdfX0:D5N44Tx DT 060 L7kX 7@$A Bnns)T054n 00:DCN44Tx DT 06Q0T54!A4DnjD%CD5400:DEN44Tx DT 06Q0T54!A4DnjD%CD5400:D5N44Tx DT 06Q0T54!A4DnjD%CD54%A4FnjD%CF64vx kv cx 8 xlp\($T0,(4Xl CtK.tM`@P GP`LLp5Plppz/ 0X4ptPL|  l Ch.K Vd\d Q\[X`T;g!lDlh`D4l5D `T;9\d DQ\[,0(7; $\0 7\ P8$ 9Q [`)\$;!lDlh`D4l5D `; 0(7cd/ d P8 ldXT,(h0` \$ D4h  lCh.)TXH (;X 9lT ]1d/TXld^'4 ld _ 1`54l`lh0lh0\TXH @;X 9 4 `a40lT b F  c`1\2T0X64 %dl`*#Te*#0l\*F4l2T0/l 8 ldh\`$T0X4 0 8  \     $A `$ `$ `$  `$I `$`$`$ `$I`$`$`( `#,I`Qi00$`$`, `&,I`/8` =/(`# nrU~|  %Y&0 `  0   0 h  0   0   0 h  0   Hl CtlCpltlppnknBknlt 1x H0xpt Pl CtlCpltlppnknJ'LknlpJlt  1x5L 0P0xptL4lCh q\l\lhqXlX<l`d(lXl\i8l\lh  #4l`ld;/458 lXJq\l`q`l`d '8l\lh  #4l`ld;/458ldMH lH8lhd48 l CtlCplClltlppj kjXkjtMX@H  HllF8(ltJkjlpJlt F`1t6H(kjllJltlppj,ltCxt4xtplH(0       4rU  0)p 1Y(`(`__SRP_5E__SRP_6R__SRP_7ifrmSelect,`,`0!`  !(I`9,q`Qq,`,`, `00 ` (9 ` nrU~| 1 Q0  0 @  0  0   h0x$ 4Qxt t ct0(txtx$ 4Qxtrt kr2  t  t rt krf ct t(txHx$ 4Qxt t  t  t ctH(tx0   0   0   0 h  0   0   0   0   0   0 H       rU $`$`$`$`$!`$I`$q`$`$`$ `$ `$9 `$a `$ `$`$`$`nID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Module=BASEUOS Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=frmSelect Module=Common HelpFile="" Name="" HelpContextID="0" VersionCompatible32="393222000" 0 L7 xME(SPSSS0{751F0706-66AA-4218-85C7-4C76E7691BFA}{1A5021A9-0BD0-4C3C-84CB-19055CBEB346}(Xb6`6,!Xi  AXi 8@D `F`% L Bp@D `F`N` R`J `T XPH %xP %b2b4 pHpHpHpH`pHpHpH8pHpHH PU`  &"0X Bpx "   "T@P `px     (0 @PX` p " "  ( 8Xpx     "   8X2h  R D`h p2 "  x]@ EnumWordķַ("]@ ļϢַ(]@ ݿurlH 2'Xmx '2 2~$h'6ر 2~$B,$L'4A@8m  pHǴwordʱʾԶwordģĵȷϣбֻʾµļ! b :B@<f :!> :(@kA@B|xkp]H`x( :B@H D 4f D\$B'F8  :!>  :%J Fyk  :!> F :B@<k :!> :(@kxopA@BoX](@X PB@H7f D 4 D\$B'F D\$h|$B'N F :!d  P!> t7  P%J Nykx  P!> N PB@<kPkH@ P!> P(@8kop>] ļϢ] ѡû :!d\ P!d'T J 4 J T 'ҵѡеļֺģϢ J|$h!$B'f !P\ R f'Ng,صģļt_ͷģԭļ 2~$h/0/ J!$h/$FILE/ f'Tk A@r|x>p ϵͳ z!| z! z!VA@x|0o( A@roõAttribute VB_Name = "frmSelect" " Bas0{751F0706-66AA-4218-85C7-4C76E7691BFA}{1A5021A9-0BD063C-84CB-19055CBEB346} dGlobal!SpacoFalse CreatablPre declaIdTru BExpose0TemplateDerivCustomizD Op tion 1licit PC#' strAs Sng 'EnumWordķַvaVariantļϢ 8Url 7' url'ub* Property Get *)()G IX6 EndLByValӁFue)C/ F6=ARRight( , ",~"GN=eode(5Lef B, FilldLispN5DtSub I (If AutoChangeFlag Then 'Ǵw{ʱʾԶģȷϣбֻʾ|@bcbo).AddItem NewDoc# 3Cou@> 0 Index.0G!IfTypexit `##i#Dim 29e,A?'?, iInteger#CleaDFor Each% InACSB D>&"\=  i To q%- 1 *(|i) =AE" +m*Nex@Na i >=0o eA I ,Ci"LC >'e_CkedKG4?GARJlst.JJJ'OStr#*| Q1@V.TBuVeq8V$J)+BO%!1+0_IAqK,` ,_ ?u, 3a$ ._wO9. qo*qN cmdOK-O0$rr0JGoDErrHandl !,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 (5ThisDocumentj_VBA_PROJECT,t"PROJECTtnfrmSelect` I` I      !"#$%&'()*+-./0123456789:;<=ACBD3B77}decKT{ F0O*%z|l=F3@J+llx|l=F3@J+llecKT{ ME S"SS"<@(L8L(L>"LLLLLLLLLLLLLL LLLLLL <<<<<<<<<<<<<<<<<<<<<<<(1Normal.ThisDocument .b0<@b"PD@b$XH@b(P@b,X @ .(`o0>> i0 Pi2pi4i6i8i: i<$`HL Rh`k11K `  | ` `` p`  ` ` ```` h` ` ` `` ` ` H`   `    `    `   H `    `   `   `  ` `H&k&&`t`` &h` &&&`(`* b`0F`2ֲ >`Ƿ % r` ''L`F !t`H0`J ĵ ^ ` jjs `H  % bh  % d %,` `h$ k  i   np `TJ0 i P Api$  ``` T `k//  p8 %`lCh`\ crea`Z`X Cr`` , `"Lo 9i 0 i p CO칫ϵͳh  H ` +o @i   Di   ` % 0@ $% 8`-k  P) `%i 'i  X!`d9```\,`x  ]i  `9%b4 @b8@b (@@b&xL@b*T@ h (h8  (PH xHp Xh 0Hp%% h (h8  (PH xHp Xh 0Hp h (h8  (PH xHp Xh 0Hp h (h8  (PH xHp Xh 0Hp h (h8  (PH xHp Xh 0Hp@ B"$8$%`Xh h (h8  (PH xHp Xh 0Hp%``hP0phP`@l @\ x`hh h (h8  (PH xHp Xh 0Hp`hx ``h @X @T h&D(JNRT@0P @H VX`,dbhf@F Hjlnprtvz~xd `h@4 @$ @0 @ @ D$ @`x (t`x X@d ld@T %`hlo`xxH@D @4 En@ $  `h@8 @P @h @ @ X@ @ @ !p!  h (h8  (PH xHp Xh 0Hp h (h8  (PH xHp Xh 0Hp@ @ @t @(d @@T @XD @p4 @$ z@ @ @ @ @ @ @0 @ @ Hz~x@ @ @ txL`tp @ X X! !x p!"x`@v !`t@!T (@"D @p"4 @(!0 @@!, @( `@$ (@!" @!  !! "`t"!@X" @ " 8"!@ H" " "@ "@ @ v"((`tP ## $P$$###h`x#z###x#`t#P$0$8'@` @P L  %p%%%0& %X%8%h`  ``%z H% %%p@%t @%d @%T @P @&@ @&0 @@ @ @  x`(x(h''P''(&' `&h))`&hV  x@z @'d @` @'P @'@ @'0 @( 8@H( @8) P)`(h@) (8' "~J@( @ `(&"$z@( @( @) @ ) 8@ @p) *`0)h@ (@ H @)l  ))`)hp*)*`h`hx *d` *X* @p,\ @*X `h+*@(,TO + +* *)(  *+X*)@*'@+D @4 ,* @,(,`h@X,, ,X,)@,(O @,$ @ @, ,, @O ,, +-, X, H @-l P-(- x--`h`-@X + `-(-  `.-.x.(-H.@-\@.T @D @.4 @0 @. @ X, 8h.:U*\R1*#104$*\Rffff*0655e1a415*\R1*#d4*\R1*#155*\R1*#91*\R0*#2*\R1*#129*\R1*#ca*\R1*#cb*\R0*#4*\R1*#c1*\R1*#17b*\R1*#de*\R1*#dd*\R0*#e*\R1*#103*\R1*#156*\R1*#155*\R1*#152*\R4*#4e*\R4*#4d*\R4*#8c*\R1*#113*\R1*#65*\R0*#14*\R0*#1*\R0*#19*\R0*#13$*\Rffff*0=55e1a415*\R1*#158*\R1*#d0*\R1*#cc*\R1*#cd*\R1*#c0*\R1*#c6$*\Rffff*0<55e1a415"*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#..\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6.DLL#Visual Basic For Applications*#f\ i  (08@ Hh "p &%     &  (A0 P,h,  (8'@'P ` <;(4B6B( ` dh"; dpx  DK(0 "8@ HX ` h&mx     ---(-@-X.-p   --0 8-H`x --- (0FK8 "        "     0 H  X h  p        "            "   ( @ H P X ` x          "       "   ( @ H P X ` x          "       "   0 8 @ X ` " h  p      "       "   "   ( " 0 X8  "  ~ (HX*` "   D.>4P   n3( 0 ,8 &;h :2    ! \70 TK0 0D" < `h\p V @`P"0@P h:x(@Xpx0"  THdP   2( `RD  (08&X &:$(@H0P "  .   (08hp  x .$0PX p  4(@`h   ( .(X p  4.H `         ( H  P p         H! X! h!x!!!!!!0" @" P" `"p"x"""" B" "" &"#8#2(#8#@#H#P#X# "  `# 8h# # # 0#B;$;X$x$-$$";$";$%"-%8%@%" H% P%`% p%x% % %% %%  % %"%% && && &(&$IH& p&B& && ,@& & '*' 0'&Y@' h'$Xp'/' ' ' '''0X' ( 00( !P( 0h( !( 0( !( %(( @(8) @)H)P)X)`) h)) B ))).))) B  )) ))*!* (*0*8* ;H*!h*  * *** B  ***)***+ *\(+ %X+x+++ B + <++++++ , (,0,8,@,P,x]]]]0](]P]X]x]ļϢ]8>F 0.& 2$@'  4//$B' 6' 8'" :'$ <'& D!4'(  D(4  draftwordF]LJLSeal %J!L'H HGaiZhangp  createword  checkwordCoreBaseUOSmanager12345678P B@NF0k(| kFk>A@RA@T  approveword (Vk X!Z(\ X!Z(^ `',, ָʾλ & & $d|$B'bHδļ &|$h'fHδģDocWord %J!L'jHԭʹõļ TemplateName %J!L'lHԭʹõģ> j lHFԭʹõģļΪգ˵һݣҪ¼ЩϢĵljlLJLSeal %J(L b fAn j b je>FԭļֺļֲȣôҪʾûǷıļֶӦģ'pAr$ ѡkhֻӱ !tA@vk0|(> ĵ򿪴 z!| ~COREBASE UOS ޽칫ϵͳA@x|o(>F D(A  5( $t5B@5( 5(  createwordA@kq Mail Merge$(View$(Draft$(Approve$(Check$( CreateWord$(3ģ幤  draftwordKTDraft$( approvewordKTAAApprove$( checkwordKTA B@Check$( createwordKTA B@ CreateWord$(viewwordKTAView$( viewdraftKTView$(xn D(|>޷ϲԴ z!| ~COREBASE UOS ޽칫ϵͳA@xoxh  !t (Vd8A@k( ( D(4  D(ko]] D!4' $!'   D(4A@ X!Z9\ 9qhk`oX]X $!'  X!Z9\ 9qkop]] D54'5'5' $!'   94 9 9kHq@o8]P $!' A@koh]] 5'5'5' $!'   9 9 9kHq@o8 A@d !!B@koH A@d !!B@ko A@dp ! (kPoH A@d  $B@koA@oHA@oQMsgBox "ڵǰĺ갲ȫ£޷ʹô˹ܣ", vbCritical, "Microsoft Word"oh](ꡱѡֻڿԱϵͳơ  룺(ʾĹ̿)Ա$' hacker;BASEUOS $B@d ~Microsoft WordA@xkho` >F !VG|j]`кϲ$' B@  draftwordK approvewordK createwordK checkwordKT"ǷҪµĸı浽OAϵͳУ   $x  "A@!2002.10.25 PJT Bǩɾĸ޷浽OAϵͳУԱϵ ~COREBASE UOS ޽칫ϵͳA@x|k  createword  checkwordGaiZhangLJLSeal %J(LCoreBaseUOSmanager12345678P l B@ B@k]x_' " %' $޷ϴWordĵǷԣ  Microsoft Word$x'dhSaveWord&UNID=  &WordType=  &FileType= & &FileName=  %" $" % ' ok     Ƿԣ  Microsoft Word$x'kp kh  $kP nH |@ >8 z!| ~COREBASE UOS ޽칫ϵͳA@xo   checkwordȨ޲鿴ԭ ~COREBASE UOS ޽칫ϵͳA@x| k 0ǰֻܲ鿴ԭ壬ԭκ޸Ľᱣ棡 ~COREBASE UOS ޽칫ϵͳA@x>F] &UNID= &Seq= . $, &FileType= &'( ViewDraft ( % '* *$  * ȷǷѾɡ ~COREBASE UOS ޽칫ϵͳA@x|( k ]0 !6\$4'2 2\ */$8'0 0$:'0 0$:'0 * 0 %<'0 0޷ԭ塣 ~COREBASE UOS ޽칫ϵͳA@x|@ k8 ]H 0 B%.> > Mail Merge7(View7(Draft7(Approve7(Check7(q | >x z!| ~COREBASE UOS ޽칫ϵͳA@xo@ hṩģ幦ܣģѡ>FEnumWord&Seq= D % '*G$ȡļüӦWordģ 8ǩɾϵͳ޷ģ壬Աϵ ~COREBASE UOS ޽칫ϵͳA@x|@k8 p]]] *~$B,$L'F b\'H J F J H 0ҵļֺģϢ J|$h!$B'f !P\ R f'Nk,صģļt_ͷģԭļ *~$h/0/ J!$h/$FILE/ f'Tkd * V(X4 ֵ Z VB@4ʾģ滻Իkx'p(ȡԶʾļֱ T$\ N$\Hûѡȡ|k T N B<E ģļA^滻ģ|> z!| ~COREBASE UOS ޽칫ϵͳA@x|xop(ṩģ幦ܣģ滻ͷβ滻>0]0 *Ҫ滻ģĵ]P *ǰĵ]p *ݴķΧ .b N$ ~*ģ岻ڣ˳|k 1.رպۼA رպۼ¼(2.ģĵǰݿ N B%.`8 ĵ ` j7f!B@h7f!!.d7f!!l d(lnBody7pB@H7f!!l d( dB@HrX7f!B@t>8q0.3.üе滻ǰĵǰ b j7f!B@h7f!!.d7f!!l d(lnBody7pB@H>x7f!!l d( dB@Hr@7f!B@v> qr"4.ģԺݵ `n KeywordText7x!z%|!.d j7f!B@~7f!! d( dB@HX7f!B@t>8q0.5.üе滻ǰĵԺ bn KeywordText7x!z%|!.d j7f!B@~7f!! d( dB@Hh7f!B@v>Hq@86.ºϲԴA@RA@T7.رģĵ `(V `B@B8.λ굽ĿʼA@`9.µļֺģϢ b fAn10.һεĸϢ'T'N|Hn@8Բģ⣬޷滻ģ壬ϵϵͳԱ $ z!| z! ~COREBASE UOS ޽칫ϵͳA@x ` `(V `B@Bk'T'N|h> ԭ4Բ滻ģʱϵͳԭģ壡 $ z!| z! ~COREBASE UOS ޽칫ϵͳA@x bB@ ` `(V `B@Bk'T'N|poh + ҵǩTrueѹƶĿʼ ʱָʾݵʾ>FBody %pB@H B@'`z>'`i 2¼ĵʹõļϢģϢwordĵDowWordļTemplateNameģ*wordĵеıƺͱıƶӦDocWord %J@Ѿڱ޸ֵ DocWord %J(Ld@ ӱDocWord  !JBkH TemplateName %J  TemplateName %J(Ld TemplateName  !JBkop  ϲ !B@] ] !x!'h    %x!!!B@( (Vo >F 5tA@k] ]@ X p  CopySendText$x!!. %!'  $L'    $$ . '  !|!   %|!  %|(d %|!  %|(  %|(kH@ıĸ߶] ]  $ CopySendText7x! '  KeywordText7x. !  ( KeywordLine7x. !  ( CopySendText7x. !  ( !  (k:.Shapes("CopySendText").Width = MillimetersToPoints(146.3)5tA@vkq|>MsgBox Err.Descriptionop `]P  $'  'i   ] 5   $']( 5x  !!!   $'xpqhi`H ] ]  !$ \'  MERGEFIELD  $ '    ! $ $$\'& = 'kkxip86жǩǷʧжʧϴϡ' ,]Body %p!' 'kkiIAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$Custom izC1Option .licit Dim gobjFtp As Objec  User% SngUN ID WordType Body Sour0File&OldK%AllA 'ļ Ϣ1ExistA&Book0MarkleanFSub O@AOpen(MH,r ;, LJ, _ % EC, B)O@rrror GoTo ErrHandle:CSetYv= /Cg.=h LC(g 1= xLeft(& "/",F A8= 7=IH8D=:=F=C= Appa.& 1lfIf  <> "draftw X" Th^e?BG,t ojl !djs'N' =@ .Variqs("LJL@Seal")la a"GaiZhang  caeOraaheckqI.@Unprot~ Pass:="CoreUOSmanager12345678N-"End If `lt i($?#UZDoMailMergProcessCopySendm%ap v%s<*"Sa ActWindow.View.ShowFieldCodes`M!Ta@GridllinguoBc@Cont`Input 'ָʾλCNewexRight(g1El, L) - 1)z|") 'δcF " N "B H 0ģ >Res NexA~ 5(j$%j.Ԁʹ  p|;iK' YS) "" A1O *M 'Ϊգ˵ݣҪ¼Щp C,KP."ljl@Call RecQAInfo((,@wdE Y8,DE ZcQ “ȣҪʾûǷı3Ӧ (AutoCqWeFlag@s12SelRu  'ѡIC'ֻӱ#PReadOnlyc,:JOAccept&Rev"on&J]@-dateword" Call ޺ۼThisDocument.AcceptAllRevisionszommandBars("Cre"W).VTble = TruebCase "viewU C ]V6"Wd0raft $AEnd SelectTApplicatv.ScreenUpdng hExit Sub@ ErrHle: MsgBox "޷ϲԀ" & .Descrip0, vbCrit7l, "COREBASE UOS̽ϵͳkS7 Priv> _Close()AIf gUserName <> "" ThS'ub'u MarksÝ(43)Rej6 LRa(. q&  =1 b@ t?@ Toggl_G 3x.O"No0:1<  O E H$CH _2Display l"be_ƛc'ڵǰĺ갲ȫ£ʹôˀܣ"Microsof "oky6HF6"&CrLfvb"6! @_7_7c 1faLoop W~h!DIg@IaSelErrHandle:## .Desc8ripAͳB ᨀ ԭ(8`6kbpC 7c"Ȩ  ǰֻ! κ޸@УN+On*or GoToA.trPara strL'C F=mpvSeq"lHex(R* 1@0 ^ 9)v&:@%vTCViewDraft$ :Left$(`, 3":d8ȷ2TѾ~~o o e Ma@kDivru=l1(axFullN`U\Zsp=  0\!W qRigh&te"/= 0Trim(TP>}ruerDownr-Yr%5QqA4co'3+S= s.Open.With !QW.ComdBarMail MergeisiP B?31TC4О ApprovH  QafabasiO0a @ hTempla'ṩģ幦܄ѡ /Tkg`A6a+KEnumK"&uRTimer)'ȡӦ1Q0O?O1ͱȡ2C/̀ /Vۯ33@ AutoC`eFlagPoptsa5ntrRtrMatchSBCW= Exdle(@T( S~"",OI= N`goc!b"\( Ea qIn aIn@(, E`) > 01'ҵ!ij ͱϢU,^'% p]"|2 !9 1!X1@{aPJbTEMPLATE_FILENAME_PREFIX'QX ۶t_ͷģԭ  TemplateDownUrl = StrRight(gAllDocWord, "~") & `"/0/"Hopt8!8$FIDLE NewZName xEnd IfNext Els+frmSelect.Optionuing'ֵ, Show vbM0odal 'ʾ滻ԻIVAutoCha@ngeFlaEFaY )'ȡԶʾֱ"If Tr(im()m"" A8FileThen 'ûѡp8-A"Exit SubCI[Call go@bjFtp.|load", &'AI?D A 'R !%ErrH@andle:CM@sgBox .@Descri{,kCriticalCOREBASE UOS ޽칫pͳ"O? J  K&() '@ṩ'`ܣA,ͷJB On'or GoTo0ADim tc As umentB'ҪAAĵ8his@ 'hǰ r@@RCM'@ݴb0ΧcSet t$= T#TDir$*CA= TP ' ڣ˳aQc'1.رպۼ"Jf'E¼ B $2.)ǰ`,p"5=%4s enP '@g/W8ith=C .Windows(1 ).`.HomeKey wdSptory8= ";@.StartkVNoBookMaTrk'.Am@s("Body"G#+ 1OKgkRe`c`eTaillCop&k a!4A'3.#@УBbpi-FiД7A') >?B 18oFxKeyA7o0.Tops- ߒ+1@"\2` Aon.CB +} Q'bWidYOnts(146.3ZA3Z?`cHÌ'M sgBoxa.DescriphŤHBy@ OI+2^ƚ[jw-varMyt/dwpcvRVQVFromUnicWQtV) +ټ Get Merge{(Oral ?o %xfld)YEach In h_1+  &K (},a H&J shHq  E   d 4 W1d!ction  Fun GetMergeField(fld As 0, ByVal str<NamepString) Dim@Cod6,$ \ ZUu.fE= Trim$.hIf Inz(', "MERGEFIELD") = 1 The(= Mid$712)+t Orb= ""02g[(Replace_Result, Chr0(13)Y")? c"&" && "=3End If CheckBodyBookMark()#r@leaM'жǩǷʧCϴϡC @2TrueCYgExist LSDummyǙ;On Error UNextGnCahisDocument.;m;s(""). xa6Fals6bay *\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*\CNormalU&*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE12\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{3C0B22C0-3DD0-4BFC-8CCB-8C74810AFAE3}#2.0#0#C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M   UThisDocument0655e1a415ThisDocumentHBASEUOS0=55e1a415BASEUOS*frmSelect0955e1a415WfrmSelect0  Common0<55e1a415Z CommonU"HI/h0Hon# CCt=<˯ӳȹJ ̬8R NLkĄHǡ N̓87]^Z Wordk` VBA`Win16~`Win32`Mac`VBA6#` ī"`stdole`` Normal` Officeu` MSFormsC` ThisDocument<` _Evaluate`gobjFtp` gUserNameZ`gUNID9` gWordType` gWordBody` gWordSourceV` gFileType=`gOldUserg` gAllDocWordD`gExistBodyBookMark(?`OAOpen_`objFtp6`WordTypeY!`UserName\`UNIDq`WordBody` WordSourceE`FileType` ErrHandleZ`LCase:`(StrLeft` Application*`tmpljl`js]` Variablesn`ValueK` Unprotect?`Password` DoMailMergeF`ProcessCopySend`Savedd` ActiveWindow+`ViewI`ShowFieldCodes'`TableGridlinesZl`LocateContentInput"` (NewDocWordN`Right `(NewTemplateName<`(StrRightt` (OldDocWords`(OldTemplateName 3`RecordTemplateInfo`(AutoChangeFlagA`SelectTemplated `ReadOnly4<`(ProtectDocument(a`MsgBoxR`Erro` Description ` vbCritical+}`ScreenUpdating! `(޺ۼr` MailMerge`MainDocumentType` wdCatalog`OpenDataSourceK`ConfirmConversions`ViewMailMergeFieldCodesz`wdNotAMergeDocument5`UnlinkAllFields` CommandBars `Visible`(غۼ`(¼ۼ `AcceptAllRevisionse`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`CheckBodyBookMark2`Protectf`NoResetg`wdAllowOnlyFormFields!`sRet(`intReply,h` UploadFileE` vbRetryCancel` ExecuteAgent`(Escape(`vbRetryg`鿴ԭ`strPara`strRet ?`Hex`RndR` sWordBody-C`sWorkDir=` (StrLeftBack)`FullNameО` (StrRightBack=`(RndTrim` DownloadFile1e`objDraftY`Documentj` Documents`TimerX`opts `strMatchB`opt`(Explode`(TemplateDownFileD`Path2`(TEMPLATE_FILENAME_PREFIXr`(TemplateDownUrl` frmSelect` OptionString`vbModalt`Trim@`ChangeTemplate` templateDoc`thisDoc N`rngU`Windowsd`HomeKey`wdStory&`Start` NoBookMark` Bookmarks?n`ReplaceTailStartgM`Copyƿ`Paste`Shapes<`Anchor#r` Paragraphsf`EndKey5`ReplaceTailEnd`ChrK~`Number-`UndoÞ` MoveRight`DocWord0` TemplateName`Addr`Fields7`Unlink0`i``Count0v` TextFrame` TextRange`(UnProtectDocumenth<` rangeCopy`strCopy'`arrCopyh`intLine (`Resultur`vbCr$`LenCharͭ`FirstLineIndent_` LeftIndenti`nStepR`of`MillimetersToPoints`Height|`Top5`strChar$`varChar`StrConvx'` vbFromUnicode0` strFieldNameV`fld܎`Field3` GetMergeFieldz1`shp`Shape`strCode%`strNameZ`strValueK`Code`(Replacef`strDummyl` BASEUOSZ`(ĵE`(P,` oldIndentk` strFontName` intFontSizew`ParagraphFormat`FontU`Size`wdDialogInsertFilej`myRange-`Deletex`(ԶŰ0^`(鿴ۼqm`Options`InsertedTextMarkn`wdInsertedTextMarkUnderline`InsertedTextColorn8` wdByAuthor*``DeletedTextMark`wdDeletedTextMarkStrikeThrough`DeletedTextColor `RevisedPropertiesMark` wdRevisedPropertiesMarkUnderlineJ`RevisedPropertiesColor`RevisedLinesMark`wdRevisedLinesMarkLeftBorderP`RevisedLinesColor`wdAutoKV` (OAϵͳ`(غͷI` ColorIndex`wdWhitex`msoFalseF.`(ʾͷ|`wdRedº`msoTrue ` (һЯ` (ͼһ٨` (GetItsName\|` ShapeRange`Itemz` (SetItsName`sTempe` strOptionbc` varOption`strUrlP` 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`(ClearOtherDayFileN`Now%` vbDirectoryg`vbSystem`vbHiddenT;`MkDir` FileDateTime`Kill`strMain”`strSep`D`intPosr`(InStrRevĈ` strLocalFile`blnAddq`strUnidl`strPathl` (GetRndString`intLen[`strCheck8`lngPos6`strMsgG&`arrMsgj`intCountP`intStart?` strSource`strFrom`strToa`strInput` strOutput9c`intAscii&A`AscWG` _B_str_Trim` _B_str_MidX` _B_var_Chr\;` _B_var_TrimmT` _B_var_LeftQ` _B_str_Right#(` _B_var_LCase'` _B_var_Right9` _B_str_LeftV`_B_var_StrConv{`[ W  H@ 0IP@ CMG="2B2987FEB602B602B307B307" DPB="5654FA2B0E7D249A249ADB66259AD10FB772F3B113AEFECBF754027CCD28E17E77D553711BF9F5" GC="81832D2E2E2E2E2E" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C BASEUOS=0, 0, 0, 0, C frmSelect=0, 0, 0, 0, C, 25, 25, 985, 667, C Common=0, 0, 0, 0, C (H  @}R KQ_O$4cboWordOOf~ oCompObjaVBFrame'$0cmdOKrdO( 0cmdCancel$0lstTypeO AH(5"[SO(nx[{u"[SO(Sm{u"[SO` 5"[SO 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 ThisDocumentThisDocumentBASEUOSBASEUOSfrmSelectfrmSelectCommonCommonPROJECTwmtCompObjm  FMicrosoft Office Word ĵ MSWordDocWord.Document.89q