ࡱ> ?A>Gcq` RbjbjqPqP*::R8(<$8.llaH 2u"8"8"8"8"8"8$9hC<F8!aaF8g822` `,C WX2}808<<<$F8F81X8$   N0N)RCgċNbJTf(uNN)RCgċNbJTvBlN:N)R[sQ|NTcOCgNv`b_0 N0N)RCgċNbJTvBlN/f)R[sQ|Nv (WcQN)RCgċNbJTBlv Te^S_cNN)RCgċNbJTf0OY BlN/fN)R[er`SST TvSNv ^S_cNNN)RCgNzvN)R[er`SST TbvQ YpSNBlN/fN)RCgNcNwɋCgvN)R[enfST TvSNv ^S_cNNN)RCgNzvN)R[enfST TbvQ YpSN NSN)RCgNcNwɋCgvfeN0Yg@bN)R[eST T](WV[wƋNCg@\YHh BlNeQ!kcNN)R[eST T FO^S_(WN)RCgċNbJTBlfN-NlfYHhS0 N0N)RCgċNbJTvBlN/fcOCgNv (WcQN)RCgċNbJTBlv Te^S_cNN)RCgċNbJTf0OY NllbQwQvzHh{|wfNbvQ YpSN N)RL?egblQwQvzHh{|wfNbvQ YpSN N:ggQwQvzHh{|eNbvQ YpSNI{0Y@bvfeN](WV[wƋNCg@\YHh BlNeQcNfeN FO^S_(WN)RCgċNbJTBlfN-NlfYHhS0  jn   68LNPRTVdhr޽޲ަyoio^oiW h[7>0Jo(h70JmHnHu h[7>0Jjh[7>0JUh[7>@ZCJPJo(h[7>@ZCJOJPJaJo(Uh[7>jh[7>U h[7>o(h[7>CJKH^JaJh[7>CJQJaJo(!h[7>CJKH^JaJmH o(sH h[7>CJKHOJQJ^JaJh[7>CJKH^JaJo(h[7>CJKHaJo(h[7>B*o(ph"   "$&(*,.02468iWD2`i 8:<>@BDFHJLNPRTVXZ\^`bdfhj $ dh1$a$iWD2`i   46Vdtvx|&`#$$a$`iWD2`i $ dh1$a$ dhVD^    laNy N)RCgċNbJTf  NUMPAGES 2 100049 2022.10 1 100049 2022.10 rx| h[7>o( h[7>0Jo(h[7>iWD2`i(/ =!"#$%S 666666F@F cke a$$1$CJKHmH nHsH tH_H$A@$ ؞k=W[SONiN nfhEMNOR0000@0I0Y@0I0Y@0I0Y@0I0Y@0@0@0@0@0@0@0@0@0@0@0@0@0@0I0 Y >QQQTr 8  (*TH(@0(  6 3 ?pic_insert_markfile_insert_markRR5^_PQ  OR  OR  ):<MOR  OR T +3FF8Yfcgnp&*Hk ,RDeGi40TQgWca lu A!bY)lT08?<'=JNO WX~ef(*SNTBa*udrEFXc8\] - V. 4 C EP ;S nZ G  W! + J+ - |: ? B v Z [ ^  dS Y h [i + t b % ' 0+ DB Y  " 'F \ ` b x */;`c`\r < 9 1fDpp_t2>N VZ.046\gy&%5A cf<?>Rcvvx*a'elRncq= (w.JL*ZIms = U(c7H>g^m__%e-m:qs=Jkwy 72*J-QYZZi_lo{  (a:]W\B\ck8nq [#+~CLvvz[*`,)7Gv5YnYxaAc s Sanv|g|" 2% 6+ o. K CQ Ad n ro r dt Z !q%!~A!]G!J!_!Tl!""56"F"P"~",#Q# #(#)#?9#D#M#U#`#n#$t$!$($*$/$UY$c$e$k$ %%A%NL%Dc%c%l%5&&h&-*&2&d;&E&QJ&^&c&Ef&Iu&"w&'''+',' :'E'+I'I'g ( ((/(I(z()t<)k)u)*+*)*FS*uZ*^*b*k*tu*0+)+N-+xM+e+>>+>6>+7>[7>C>Y ?R??|?=?c?s?@!@e@>p@x@_AA#AAAUDAUAeARBB% BBB1BaBiB2yBMC]WCtCDI DD D/D?RDXDqbDA EpEvE9E:EEEoErEF "F/F0FKFcFUeFeFjF|tF 2GXGHmHEHHHE]HurH I5I+J JJG@JSJClJwJ>{JpKNK$KL L1L7L=L^OLUL^mLmxL8M!M-M3M9MiAMdMZN04Ne7NCNLTNrNOOnOOOwO|OOP?P5P6P=P@PVP[P]PxP]|P Q\$Q6Q;QCQWQdQknQpQ]uQ[RRRR,R.R1RtRtRSvSS&SC/S0S2SPSUS T T TET}TnT2,T3T9T>TAcTU.UVU{YUraUjUV{GV9^VaVGiV%kV2nVWTWzW.XYY%YY(Y+Y).Y5YhY$Z$ZOZ{ZM#[,[X/[2[,=[ \\C!\G\'O\Y\o\Yp\]]]' ] 2]2]6=]A]}]G^2^ ^ ^m^1^9^"_B)_)_9_:_F_HL_X_=n_n_`` !`j-`:`@`H\`f`k`}` `a a a%a*ae.a>aPaba9kapa1sa\sadwabbKb"b|.b/>bCbKb|NbUabcNcVQc XcYcdcfcrcscvc}c' dd6dNdfdLodvdIegeze{ejfPfjf8+fC?f{afuf{fggm'guYg]g`g"gg h4h"h5hBhThlhiiwi$id\ip]ijiiyj !j=j=jejmj=k kkk+k-k6kOPk*Tk lla lJ1l `lpll+ mm(m4m7m}:m UmZmFnm3n n3n3nFn,dnmn o@o@oRo7Wo&p2'pWpfWp q7q9qOq/Wqr,r7r JrRrir tr #s[CsLsxismst/t1t6t=t_Ptltuuuu+uAurutuv\vVv3v6vMTvXv\v?kvsv$wZw>,w4wSwzwx)x.6x>x'hxy8yQ6y@y Jy*Kybpy vy"wyxyK zzkzz1z:@zEz MzNzlzwzj {{{I,{2{7{2<{ B{{O{T^{p{|:D|IR|^V|e\|O }(}~}z'}*}20}1}<}C}GK}P}aV}Z} ]}q}~6"~>-~o5~7~M~t~|~~z VJ 5c:C]lce|}'>,aCGP=by|%5CGcg@hi {[,Dy}-2ESJKdzY,|:`Dijq{l|{| )$%;Uispr~1%0XSZ[hpw  S wQ{SDn~'W+)ad-(//FKBSae?t{ O+V7@A]_dcqnq^we{| o,S?@ENxhC} .*C^|m45>8_l 5=VYl@},$&1(GjOna"'_FC z3> ENONd*zJA-MHO]rw",Hlu rCCbnnpsrw+!&& E|'p,Y/K0LSw"z"+e6:ZbjrvQ=yb};DE)OUZgy !4< @@AR\vl(G6aWa>71w'v:o>@MS4bisjmn_2=d!#}+c3<IVgVbcYesvKz$ &/:[vbx0{~6>[cOg~ |[""02OX\pD(()HI_JL!'y8EFPS3bW2M38=*A DDD_WX3BKNUXFefja/:Qe T*=2FIbiAr^|19=TXY`elt4~;>OTYw~;,:FQ\ aehi".6_a $p4|;;hk{{]#9g<F"lu{ ?)/hx=-:^d iJ@ DD~L[xos"-4cM?TUOkOo-LTE]d)y ?0'P[7%5:?\g5} *8?@HIP`[^jpr[C U6\ M167>FT0fnhpC$QkXXbfh@1o67C-L&hH 7=ItFUW`em LZyeh4j_mwy4F1.74K> H:OS,-0@Qv}~'b--Q2]v ;;GgEi+ 5o:@BCuJKY!\v (^"(b29K< 3I7@ EAGsR!p_{@/W<AHX>[dz% <mQ[gho !V&ANQXnR iq*7y:Grru;!$A_akppS{y Tj!&C8IDX4_Va'eu n1 aUlprt|M: &d35>^`abbKc!jwxy)7YZ H(t)2_Lah7 a%<_B# 'i'd-.5T6Yb]ldxT$90E GMdNT\Pv{A!f{3{')a?ADN7nqGZZada ,J_pddougI&Ys]kjjy '*?;b e!AX] !Y#%,-/p?E^V~7`L[+wa #%@0:)EGd)m @ #lewS}^iB}.%<Rtr >l%&=.59XKe+~ 01H T]d_dmsy~/ ) L):R7fxin"BY=M :NS^adh R"@w\"t|U!jdo-.1dP&Wl 4hLPW]tu~+Jv"xW W.XHg.2Y>Xsbt u>)/L](20EFwzDQ(/Amp#j4HQ{\xtez)5@Y>aaeqmmp Ht'6]ePmHtPj `0>]s> V *V*V*V*V*V*V*V*V*V * Project.NewMacros.Macro1Project.NewXml.CreateXmlProject.ShowForm.ShowApplicantsProject.ShowForm.ShowPicProject.ShowForm.UnlockDocProject.modDya.delPictureProject.modPub.FormHideOrShowProject.modPub.RefreshOcxTreeProject.modPub.SaveXmlFileProject.modPub.testxml PROJECT.MODPUB.TESTXMLPROJECT.NEWMACROS.MACRO1PROJECT.NEWXML.CREATEXMLPROJECT.SHOWFORM.SHOWPICPROJECT.MODDYA.DELPICTUREPROJECT.MODPUB.SAVEXMLFILEPROJECT.SHOWFORM.UNLOCKDOCPROJECT.MODPUB.FORMHIDEORSHOWPROJECT.MODPUB.REFRESHOCXTREE PROJECT.SHOWFORM.SHOWAPPLICANTS@DŕQ@@UnknownG:Cx Times New Roman5Symbol3& :Cx Arial;([SOSimSun;5 |8ўSOSimHei!QhgX'DgLLZ&!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[d+P2P?>p@*&E:\YN\chen\3uh?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\^_`bcdefghijklmopqrsuvwxyz{|}~0* pHdProjectQ(@= l Y J< rstd ole>stdole h%^*\G{0002`0430-C 0046}#2.0#0#C:\WINDOWS\system32\STDOLE2.TLB# Automat8ion`ENoPrmalENCrmaF ŀ *\C @-Y!OfficgOfQicg!G{2DF8D04C-5BFA-101B-BDE5gAAe42ggram Files\CommonMicrosoft Shared\OFFICE14\MSO.DLL#M 11.0 Ob Libra,ry%xMSBFAs>MSFBs3 @dD452EE1-E08F0A-8-02608C4D0BB4dFM20L'B p&/;"~1D|~ C00}#0B# ў50 A9B@OE0E-435C-4795-920B-7128253794A16DOCUME~1\ZHAOTILOCALSTemp\Word8.0c8.exdd=".E .`M A⃙MSXML2hXMLj2l b2F5078F18-C551-11D@3-89B9MF@81FE2224fmsxml4.dllH, v' @aaScripting>S`^rip zingtj`4*$28yE711$CF3DA0C9054228 }#Tyscrr un f Runtime @`bThisDocumentGT isD\(cu`e t*2` H1b ",""+bmodPDyaG md`y 2 ! fDialogG 6aDo6+26@AaQPubP/b / /, G @#frmAddPictuhreG AQdPcWutr@WI2\/O/#@R( /@ShowGRowưi62r/8m1N"o1NewXmlNwX0l߱;@  TreeInterFa.cv/TejIr8eF0t[R2rztp r-ax  q#Chrxcesss#C rp#rCe@Dso.s#/ s@ ns@] 9 D\elၓ<3Dplpi0e <$e+/QpLoadTifyL`a5T5fwy%E{p%]s$]]#]# ; 30 G[N][N?C=!)!yhStr yG"y SpMy!y{f2oep7g ;"(BMaCM"<212 fo?(11`^SQR3]SQR0(3:Z/f[b Insert9@\$sHth9tB'yB+- C ՂV5` xMEAddSQR HvmodDya}modPic 6modPubz4Z`fxRRME$ SPSSS@<`i4i `h`j l8% nX %,:ihi t ,`ilii `n`,r0 ilPipi `n`,*iH iJ@iNhi ``` v xh`z |0izi~ ``t@ p  F `z`t `i@f `( P 0 p "" j%%( %BXLBLB(LBxLX  hx p0 0P0p( x 0  p( `PX` ((P0pxJY(*\Rffff*3c59d8bda1\02  (@X p*  "  ( 8H "PX` "h" (& B  ( 0H ` B     "(08 "@HPX`hp  x 80"8 P` h p     $ 2(`h "px  20886p 0    0 @Ph x   B      (@Xx<   B     @ X h     "     "     ( "0 8 @ H P h  x  B               @ `  x     x 8@H BP Xh p   B     @8x  " (  B 08Ppx "        0 8  HX` B hp,&&&&(PX " `hpx  (   (8Xhx$""(P"`     " (08H Xx "  " "   (08X` B hp x B    "0 X p B  "  B     (@Pp x    B     (H PX B b`      (8Pp,   (0 "8 @ "HP `X  "     ( 0 HX p x0  "  "   08@ "HPX ` hx    "  0  HXx "   " ( "0 8H`" "     $  ( H P  &h  (     &!(! (0! X!x!! &!!!! !]D0]D Bk_Items_X]D Bk_Items_1]D_Dynamic]D_Default(]Dbk_App_NewAddedP]DbkApplicants_start]DȨת֤Ϣ_x ^^^^ ^8pPA@ ( (o]]< !!X >'L' cmbEvdFiles  $ A@ cmbReason  $ A@o]]]< >'' !  $R'V, ( V  $R'"i`]] B@^ ;$'ment  P X _$j'  B@iA@o ]`]x]]]] B@^Ӵ !$*' ! $*' ! !d_$*'L  _$*' ,$'   X bKT ( (LcKT (L (S@ ; X _$*'  !B@n !!,Me.cmbGroupType.Value = cmbGroupType.List(0)ko]0]H]`]x]]]]] ! ! $*'k ! $*' !$*' ! $*' _ !!;;$' ;$'  !d_$*'ȷ   _$*' B@^ B@^ ,$'h    X _$*'%  !B@  !B@ 0k(o ]]V X l $'Zd\ l ^ l $'` l  $'b   d   f l    $'JLeft(strBody, Pos - 1)hkpkrktki]V l  X l $'nZ n \ l n $'^k`ki` ( !d ( % B@ o ( !d ( B@o0]pA@ '  $'  A@` A@rop]] ] ]0 ]H ]` ' ! t5 ' t X '¼Ŀ֤Ϣ_ _  ' 1  t7$  !_70 t7$  _ t7:$j70 t7$  _ t7:$j70' t5  'kP t  !1$ ¼Ŀ֤Ϣ_ __ȫǩֻ߸ȫǩֻ߸71$" !1$ ¼Ŀ֤Ϣ_ O_߲ǩֻ߲ǩֻ71$"' 'qix !KT'KT'KT'nHi@ ]X p ] :'( $ ( $ ($j' $ ($'& %  &' d $' kXiP  & !Modify7(% !EvdFiles7( !Reason7(qo ,$4  , , $'*d ,'*kxip` ] ] ] A@> (8 0$:'4 4A@< 4$>'6 .$@'2 2 6 2 6 0A@Bk . 0A@D (8A@fo( H H$*$ F( H$* F( H$* F( H$* F( H$* F(k i  ]8 ]P ]p   ] J$'N & L7! L7!7B@H V N VX $'P X P't XX $F'T T!$'R Z R t 't T!F T! B@kX ! T! !%.j T!G T! B@k ZX j(,fldRec.sResult T!GG j!(j T! j( T![ID] t$ j( t R B@0vbCrLfk@ 8 Selection.MoveRight B@ B@\ q o   & L7B@H ^ B@` L_Dynamic !B@q ox X] &  4X  5%  4X  7!.b b!! bB@H !B@k k  4X 7!B@q o ]X d$ d$'f f '@k8 i0 p]]] ]@  4X 'h h 'j & h7.n n! j7!7.l h5% l!!'>kxqpih` h_$rX':i@ A@ro  ]]V 'X l  Z l 'n\ n ^ l n  $'`db l'dkfdh l'pkiH]]V 'X l  Z l $'n\ n ^ l n  $'r`kbki;wNһflagȡӦֵSourceStringʽformfield("_һ")]]]V H'*X J'Z  \ H J'^  ` N b   H N'd   f H      $'*hkpdr H   $'*tkvdx'*zk|d~ H J$'*kio]P  !; !: !; !: !'z zA@|o0h]]] z z;$'b !C@ !! ' ~5 ;0k t  t$  t ~$" ; tq(k o0op ! "5A@5C@ A@kqo]]'z ! t& . z5 t7;'z t"$ z z $'z q zA@( o ]] ;$'f$f (':'($f ($ ($f ($ (B$f ($j (6$f ($j ($2o  InitItems InitItemsA@oA@o0 !de ˱C@ B/רȨ˱C@2ר/˱C@qPoHp] (d (dJP (d$2 & jbk_AppID7!! !d j!  (d !d !d !d $ (dkh j bk_Alienator7!! !d j!  (d !d !d !d $ (dk j bk_Assignee7!! !d j!  (d !d !d !d $ (dk8q0o( dAttribute VB_Name = "Add@SQR" Bast0{9168CC0A-50E5-48AA-BC91-77036C6C00B4}{9712F3DF-3B5C-4397-8682-C120BD9A6F} G lobalSpacoFalse CreatablPredec$laIdTru BExpose0TemplateDerivCustomiz1D P Const APPDELIMITE2Rz BK"_MS_Bk_Items_+%11DY NAMIC_D@ynamicD@EFAULT efault P)@3_NEWADDEDA bk_App_New@ed@ LICANTS _STARbk licants_starAM PATHAȨתϢ_ +Type FldReco rd sT"xbs Sng As In tegerRes@@  HlpAStatu EHnd  &Sub cmbAlter_Cha nge()RefreshCmbsCheckBox1.En42A@HDim sBeginFlagMqch@<" & CStr(Me.I.ListIndex) ">5Ase a/D@2`% Geta("EvdFiles",` ),/ReasonӺC @ `,<FunctionFsObjectJI/g)GWd7a31622Tmp# s E9 & 62q<67D =a Value1(db."12D`d9 s` @U`E:#0E.0EE(s!1 , oH 2Co8mbo m_ar~rca'.pCleadSplit, ";" For Each vdX Bd = Letft!!(kX"_E aBsNext#Va!HInit5GroupL./ aFCode=PoinYRew327PM  s+,,"<9>B"&G,2P,,',p2In,*SelP CA?, 198gp %Yq79?w= Ww=? #EB +M';}qvZsw.@2<BIf ={Coup:= 1 Then}'b(" 0(0TIfHsH HrA}R*A  b6sBq9 _T8OYs7S"P S<> "" m>s@u(7yGH1\H: I ,c V?W?W# 6\  cb% = RevzEx(\ @_<3}=;!d6 @ce(G2sv2`mbEvdFiles.Text & "_")  HsItemCode = GetFlagValue(sRelations, sH& sGroupcmbW1.Clearm2 arr/sSplit(!, ", For Each v0 In ;eg i?s__kCStr($)"Me.1.Ad^d8,52NEnd If Sub Privat@e Func @RevLefEx(By strbody As Zing,  K1 OpalA2)I1Dim PosBpLong1AGIf= "" Then 23e(5*,13FElse 4Len) > 0D5 4=WL@R6Q 2)InT 2,J@*7@'2B%AzB (8  1 PN9 OEx*MidG6A' -2) 'I!B Hgb@-10q ET1<&;6%Z=]\XXX0UF4a IW *A U$C9?8WA7 e3{i3Y%*U%q,Sub _Change( VaBox2.SelStatrt0#~I #gthBn(tFocusҚ23B3" dOK_C0lick!AsLxistKc!`l0Data= 1matRe0placA, APPDELIMpITER@%لs& K_ MS_1 Unload M`; (g(κQ i IntegeDxReturnTf#rSTAm sIDo`hCS0bWi&s)1* iq) To .CoxuntKA1sDZ ,tusP <p @"~ri + 1Pu1"<>@¼Ŀ1֤Ϣ_2BOLt= u& _+q("x(i,0 y</1 70 ?f?st1|2)81AIMg2R)+:"q"> 3Ïm3"k0Xi| <\#4m 7)W"L8! i@"OrIIf(Check/.(`True,(F!".1))A "_ȫǩ߸tTXT>Q'1'"M  ~2 S 77 ߲S ? /a *a QKn?whC&I?Zwec@t CasezAlterType?Index BDz  "˨+rxU"2Q"S n·c]B sLstg?mН]7g f2kKi sa:d c`C"(1`1= R #qeRigh2(q0<*YE iTh aNewBelowU- HcC !YaxH#Es 9z*TrsL0A Subd %Fld|RC`- H"decordC"Zc`) > 0lb .^sa :(aZg(a ,FPLD>"/")0"h Hlp!b6FlHLP"f"S tatusSTA" [TXb"DFu&I(~s-y . JI㖂~fldcAarrRows, ColRFs`B`MICDSpli`ROW>"YRange(.BookmaLrkz`).`6rt, elech` Each v In!_#Sa&C ,(!)!COL&%wt{iP0o0;SP3V #.s092EC XecU A i +| 1CA7-D9S0.DTeU4e2ySet m#.\('%, ,6M( @71,R]  ? W כ$)ec) 'B !/ ' a .CheckBoxcg'He[!=F ?\A!UCReplace( x<"[ID]ci i <= UBoundz(0)E " 'vbCrLNp '7Move?_Dow8 +Ā0U(iOKodc YBW Insxert!WdnW;m& "_DynamicUдǥ(qd%nRpBASOOFP( Exs(BK_MS_:vDYNpAMIC5+ QL=ImID)C݁r s* .R}.C 3tKuGD@Vt8a2 .1Vᐟ;ˑ)QCAS`Tri\m(q) RJSplit(sItemList, "") GetxCnts = UBound(arrP) + 1TEnd If  Function Pr@ivate & Defaul(iID As Integer)C ZDim NameStridngBKRt mpRngRange6BK Bookmark 8= BK_ITEMS_ &\ C>Xs==R&DEFAULT*With ThisDocu0mentSeDt H= .Hs|jj(.StarP)#>If8.Ex~True@.euNs "&.Rows.C9EC㌁IDCmÁ% #C(RevRightFlag@_")CA"ѬSub cmdQuit_Click(OUnload M 9ub GByVal strbodyG., %Y3StZ APos LoELen 1@E= (A=@22?) > 0 AztTha?3f=#w(1,,  4 g 5&&7Mid(t, + @6JEls 17j D 87f9 10 1+He PB_#A\Cv Bag&BenB7B b5Bg8BLBwB62'C%:5@vue(Source/a)#w0eginOpA}` k";"(9 'һfӦֵʽformfield("_pһC&C1wA j2ua `#gthD1|1P y gExGB = ]q.Remove (u _ $B4A`SBDim i As Integer (sItems = ""@With Me.ListBox1#T`For= 1 To 3.6S& ( Index, i)` & ";g5N`ext iIELeft( , Len ) - 1)/End  K 4 Sub Pr@ivate  1(sT=StPring)Darr$+sFlag SpliX*,q'cmbGroupType.Value(0%2:T2RightE( 1), $u32 @(A;1 A^D %N aUserm_Initialize(1'$sFOcxVxAlter` F E@hen^(* 畁A7If '$2$`;m8ak%%j &=-' '&JU&`&l[J?&9&I &J%%I  IMaCQ; <E `xME(:= w!Defa*So rting`#wdaByLocaahShowHiddenFaq`g CRightFChgcterl@tf l: MsgBoxA.Descrip, vbCritica@l, glb@ & A !'-ɾ`&Sub delD?.fa2#!aNex& ??_!'Q]_pW `0? `2PC5Y'ʱãύʱע '1astr0D:\workspace\Gwssi\0߿ͻ\cpees-dtd\schemaExample\$Ehrnjh*zDit$i_ xxit +++"` + "~   (`)ItGdiplusStartup8GdiplusShutdown\$GdipGetImageHorizontalResolutionHGdipGetImageVerticalResolutionGdipLoadImageFromFileGdipDisposeImagexRRMEP@ @ i  +BX??ifxi2 % j% n% p8%`r`tl `v j`xG|`zG`%(h8Xxh xY(*\Rffff*3`59d8bda1\0  ( 0@ H H( XH `H hH pH x B     ( 0@ B HPX`hp `   (08@H B PX `    l $(P"`"    6 08@HX2h  $,0 8"H"p   H "("P x   H "0"@ h  p H " "0 X  H`H  0 "@ h "x   H  "0 X "p      B    "   \ ` p        B           ( 0 f@ H .  ( 8 P h      $ "08 P `"p((( V(J   0"  H Xx  D (08P `^DT^D0h^H^D`p8x0(h]](]@|X $(  $A@ v$ A@e  A@  "A@ A@ A@'z|'YL&iiX]]]8]P & .%. &$0', &  "$ ,!RQ@ 0.00$ ( ,!VRQ@ "0.00$ *'kd'kk..ih]DD-D B  $8'6$2$2$2P$2N$2G$2B$2M debug.Print "\PNG OR BMP\" 2$2$2$: 0( 2$2$2$: 0(Vk8 JPG$2$2$2debug.Print "\JPEG\"'4__ 4 2 4 '4$2$2 4 6  4 2$2$2 4 2xd 4$2$2$:  '4k 4 6 $2$2$: 0($2$2$: 0(Vk` GIF file$2G$2I$2F$28debug.Print "\GIF\" 2$2$2$: 0(b$2$2$: 0(V` k PSD$28$2B$2P$2Sdebug.Print "\PSD\" 2$2$2$: 0( 2$2$2$: 0(Vk TIF$2M$2M$2$2*debug.Print "\TIF1\" 2$2$2$: 0(+ 2$2$2$: 0(Vk$2I$2I$2*$2 2$2$2$2$2TIFdebug.Print "\TIF2-1\" 2$2$2$: 0(+ 2$2$2$: 0(VdXTIFdebug.Print "\TIF2-2\"$2$2$:$2$2$: '4 4 2$2$2$: 0( 4 2$2$2$: 0(Vk`kXVi@8 < > ':i Aҵ޶ͼߴ粻ܳ165mm x 245mmߴʵͼƬ :ʾA@8 !( !( B@ (dX !( !(k0o(]]]]]]0]H]`|]x 2$~'v_ FileName = CheckFileName(Format(Now, "yymmddhhmmss") & GetExtendName(FileName)) '(fileName)A'' DesPath = ThisDocument.Path & "\" & FileName '10.12.13ע''' FileCopy filePath, LCase(DesPath)A@> 2$~'v 2.$'z 2 z $'xmarks01_ͼƬƬ'r't r t &!%b t 't8 tpic_insert_mark &%B@Hd r t  &%B@Hk  B@ B@ B@ ͼƬ d B@ ! l !%.j ͼƬƬ t_˵ j( ͼƬƬ t_˵ j( j(newP'' fldvn.HelpText = "file=" & getNoPathFileName(filePath) & ";" '10.12.13עfile= t v v.$; j(M 10.12.13 f j( B@  2v !%d.B   B@ &! ! r tC@ 99qp  B@= Me.L B@stCounA@f &!\ t v v.$'P 10.12.13( 2 $HA@%z| \! : A@8!iAttribute VB_Name = "modPic" PrivalType GdiplusStartupInput 0Version"As LongHDebugEventCallbackHSup@pressBgroundThr0ead J%ExternalCo decs $En$d  Declare Funct Lib "gq" ( Token(, ivbuf , Op*al ByVoutg0)'JSubhutdo\wnH,K)oGetImageHorizontalResolu x ), b @`SingleX1VticLoadB2FromFileRA1D, h?e:DisposeUS Oeti( )Sng, sHrf, [QBooleanim GSIzZg N %On Error GoTo vl@ . `= 1d " ,G/9` Ptr"), BG^b (o(lV$!,'j@bgzD G,s0= &H89 A#3B11*&H5082934E847 Or 42h4D,7q'dQ.`nt "\P$NGPOR@BM0.FF)*r>4 ?o `?oY  u9>!3C5 8\&HC32iB) + 4 bQY(32I-) -#RWhQr<׏<32 6Q_:tO0@(0_:dC S'GIFf@ 9QU64VU6(;U38!,;;+7"RR byte2long(bTemp (0), H1)) GetImageSize.HeightT =23 End Ifg 'PSD If0)v&H38 NAP422)'5033 0Then 0C'debug.Pri nt "\B\" #1, 17WidthP 10325s3ɘ3d 0'TIFKb4D=X1Xbb2Akb 1b3$Ib4N3|bC \^9P^D^YGD04/[5V?PqI=?UbqNE"t2-CDv< E E ElseCA aOv&+b'2kalPos +{ * 6553611E4 vN4&"+ 12mClose$aFunctioԡPublic (/ByVal lsb As RL, CmG)weA `+ (* 2562{ Sub" PicCheckResul t(cBooleanb  0= Fa+GMsgBox "ҵͼ粻ܳ165mm x 24p ͼƬ", vbCritical, "ʾ|frmAdd ture.butConfirm.Enabled" wcmdModifyc Cr_CkoQuideTru=K>k ~ 31 'addMax(vi@ewNameSt@g, filxePap(3b'InlineShapt Dim fldvnForm`Fieldfi tMXark; 7i1I@ntegerWF Typ wmOn Error GoTo lDesk= getNo15( 4'"7at(Now/yymmddhhmmss") &:ExtendQ(E)) 'Q '' R =:isDocument. &P" E '10.12.130ע6Copy , LCaxse( 3Unlock//%2= In&Rev`."42= Mid(_t#= "s01_!EhƬCi6dlDpo WhkPOk.Exists(f& iiAqCLoopB`)ThF("pic_in sert_a").SelectC? , (i - KtAa @iOdKey Unit:=wdL=3'QParagraphpBo.Text A@:=" À Set4D= WDs.P^(Range:=, ! rG1InputTI.10" /i0"_˵ Stat?@ABCDEFHUJKLMNOPQRSTVWX[\]^_`abefghijklmnopqrstuvwxyz{|}~ l!!)`GDFindWindowA4SetWindowPos xRRRRME ( $@6@Tas wh@langhBase hD elehF hHch a ecla%.PxHR  w.w3Th &lhVhttp+X@iv`t`Z \ `^ d(i8Hifpih j% pi8if jX%`t`r+l i8`z nH)~hp%)% ""ivi` ` ` `j ```t`   11i 8 iX i`t   %   %   %   %@ ``````+@ 8 i  i%+ i  i i%   %`t+ ` ih`z`|` P  )j( 0 %i+  i i`t`  X% x% x) %`` 0 % P % p% p) %`` ( % H % h%   ) %) %  %+`RRi i++bx  77iv` p%` `j ```t % ( %`"`(` ,hTT)%). %i(i0 2` % 4i^ $% %``` jh% %`6`t`8 %`: `@ B@%`T`V`X % Z`\ h@  dijil `n +<8 ij+vx ix`z |i~  P  i  X0i b)%I ``8ʐ.`Lʐ0L4 ʐLLʐN(L<Ppx8@ hxXP  P(` Px8@"" XxI(Y(*\Rffff*3V59d8bda1\0(*\Rffff*3V59d8bda1\1G l p *  l@ H HH P 6X      (08@ H P X"x     B  (@ RH    "   (0  4(` h B h" 0@0H x     B8 h" 0 @Ph2   0 68 B p x         @ "    (  8  H  X  h :x  6 < :H   < "  & " 0 P X ` h p x  & $    ( 8 @ ` fx   08 X x < B , (08@HPX`hpx       0 8.Hx($ 8P `h8  B  @B H`x      D B 08@H P `x4  &  (0 8 H`h *p"         B 8@H P`x  "$@X" ^` 0Ph $  (08" N@ &0H P` x B  B   (8@ <H N < , .H "x $   0 8 >X H   , .@ p0p $h 0 6 . (! @! BX! $! "! $! &" &@" $h" *" " Z" 0# 8P# 6# &# "# d$ fx$ ^$ N@% % X% N% NH& J& j& X' Jh' P' @( JH( L( H( H0) Jx) >) * F * 0h* ** <* + (+ 8+ P+ Lp+ B+++ B ,,,, ,(,0,8,@,H,P,X, h, x,,,, ,,,.,-0- @H- - - - - - "- .  . (. @.*`.. . . .. / /  /(/ "0/X/`/ //// //</ " 00 0 @0P0h0 ^p0 0 ^0 tP1 T1 , 2 $P2 &x2 $2 ,2 .2 &(3 P3 $p3 $3 "3 "3 "4 (84 ,`4 64 ,4 4 5 05 2P5 5 5 5 ,5 6 >(6 Hh6 6 ,6 .7 &07 :X7 &7 "7 (7 28 @H8 48 28 H8 j@9 29 29 2 : FX: D: D: 0; ,P; 0; 6; ; P< 4< " = $H= p= = = .= 0=  > .8> <h> > > > > ?  ? " H8?.?????????@@@@0@H@P@X@h@p@x@@@ D@ @@@A&A 0A HA XAhAxA A A AA A A *B ,@B pBBB @BBBBCCCCC C CC   :C (D DDDDDD :D:(E>hEEEEE F * F &PF xF FG(GG G H H @H HH `HpH HHH H  *H I I Z(I (I &I @I 6J PJ ,J 4K HK (L @L .XL 2L L $L M *M .@M pM *M M M ^M (0N &XN @N 6N N ,O 4O O P P .Q 20Q hQ $Q Q *Q .Q R *(R  XR     xRR RRR 0RRS (S 8S .HS 0xSSS S SS 0ST 0THTPT XThTpT B xT T " TTT T T TTT T TTUU B UU0U B 8U@UHU`U xU UUUU " UUUU U UU VVVV  VWWW "W W0W "8W@W HW XWhW " pW xWW " WWWWW WW W WW XXX X0X " 8X@XHXPX`XxXX  X XXXXX X XY &Y 8YHYPYXYhYf======================================================================================================ģ湫ú$created by wangchaoyuan@gwssi.com.cnHdate 2008-06-261f====================================================================================================== ] / бλκڵǰļ]$8 ִڴСοM]$` ִλ%]$] ^0^H^`^x^^^^^p] ²Ϊģͨú]$MSXML2.DOMDocument.4.0ated p]$˳] (] ]$ XMLLoadedPan] x^D ibute>^D s:attrp]`]x < v$~_ v v.$ $- t v v.$$'Zefault t 't < Z$~ Z'Xx(k d v'Xki] MsgBox "ڰͻҪƷӹܣӦschemaûƶ湦ҪԺ󷽿ʵ֡", vbInformation, "ʾ" Exit Sub!If testInput = True Then Exit Sub &!` &!` $xml'^ ^A@b.MsgBox "ϣ", vbInformation, "ʾ"o;ڵǰλ򣬲strNameָӵƣbѡoriFldNameDzοõؼ֣ӵ֤ʽԵȡֵοؼͬ] ! l !%.j h h j(d` 8 j(kH fG|j f$lG|j j f &%A@n  B@oı;ڵǰλ򣬲strNameָӵƣbѡoriFldNameDzοõؼ֣ӵ֤ʽԵȡֵοؼͬ]@]`]x ! tl !%.j 8 j( fG|j f$lG|j j f &%A@n f &%!v!x!'r t r t f &%!v%x! j!v!xB@ t  B@o/жϿؼǷڣڷֵΪtrueΪfalse|] 8 &%$|'z'lzP|H \B@^'li(:ؼıoriFld֤ԸƵĿؼdesFld ~ !9 !9 !9 !9 !9 !!ll !! !!5B@ !!5(/ .TextInput.Type = oriFld.TextInput.Type5 .TextInput.Default = oriFld.TextInput.Default3 .TextInput.Format = oriFld.TextInput.Formatqpoh5formƺxmlļ˺Ϊͨú] MSXML2.IXMLDOMNodeList]0 MSXML2.IXMLDOMNode]H IXMLDOMNode]`]x]]]|[  L$., New DOMDocument  \$ $'   $''t  t$$b t 't  t $'  t$''<  id=' '> B@  %. j &!  j! j$|A@//  %A@ v B@ xmlļ[ |p|h \B@^Po3createFormXML "c:\a.xml","110101ר.doc"X As MSXML2.IXMLDOMNode ' Object]x ] ] ] ] ] ]( ]@ ]X ]p ] ] |x _' _ 't  ! !  !'k tKT   $ B@S tb  t $_/$' / '  /$ $'  /$ $'  %. $$NOTHING  %.  %.  B@k t _ 'tp  %.   _$ $ $ B@n| \B@^i  \ Object  %.i @ j Object] Object ']   %.  (d .i8 ȡǰؼݼ=fldNameֵǵǰؼƣֵǵǰؼ ] ] ] !'| Debug.Print Now  &!!  &%! |  &%! |   &%!'h h$l  &%! &%$|'z k k  Debug.Print Now'hi #ָƣnameformfieldֵ |P j!lGKT  j!(S  j(n | | \B@^o ֽڵP ] ] ' t   t$$Gyj t  t $$'  t$'i ]@]`c:\a.xml B@//ר %A@c:\b.xml B@o /Rڵе˳ת䵽ڵ,ڵƲٱ˳,Index2Name෴Ĺ]]]]8]X ! $'   %. N %.  (% wi  !B@ nd.nodeValue = nod.nodeValue  A@   ! B@   ! B@k !  ! A@kox*BϢе˳ת䵽ڵ,formatNodeIndex෴Ĺ]]]]0]P  N$$'   !  %.  A@   ! B@   ! B@k !  ! A@pkho`p]  !  B@ i |  !%!'z| \B@^'i5formƺxmlļ˺ΪͨúH''''Public Function createFormXMLTemplate(FileName As String) As Boolean5'''' Dim nodLst As Object ' MSXML2.IXMLDOMNodeList%'''' Dim nod As MSXML2.IXMLDOMNode('''' Dim cNod As Object ' IXMLDOMNode'''' Dim fld As FormField'''' Dim rootName As String'''' Dim id As String'''' Dim i As Integer*'''' Dim xmlObj As MSXML2.DOMDocument40'''' On Error GoTo l7'''' ThisDocument.Application.ScreenUpdating = FalseA'''' Set xmlObj = CreateObject(XML_OBJ_NAME) ' New DOMDocument'''''''' '¿ؼ޸ʱ&'''' xmlObj.validateOnParse = False''''' xmlObj.resolveExternals = False''''&''''' "" & _"" &''''''uQ'''' xmlstr = "" &''''' "" &''''' "" &''''' "" &''''' "" &''''' ""'''' xmlObj.loadXML xmlstr)'''' For Each nod In xmlObj.ChildNodes/'''' If nod.NodeType = NODE_ELEMENT Then''''' rootName = nod.baseName'''' End If '''' Next;'''' Index2Name xmlObj.SelectSingleNode("//" & rootName)'''' Dim NodeID As Integer'''' Dim PicNum As String'''' Dim PicWidth As Single'''' Dim PicHeight As Single'''' Dim imgformat As String'''' Dim imgName As String#'''' Dim rootNode As IXMLDOMNode''''T'''' Set rootNode = xmlObj.SelectSingleNode("//cn-application-body/cn-drawings/")'''' Dim j As Integer2'''' For j = 2 To ThisDocument.FormFields.count0'''' Set fld = ThisDocument.FormFields(j)'''' NodeID = NodeID + 1'''' PicNum = NodeID^'''' PicWidth = PointsToMillimeters(fld.Range.Bookmarks(1).Range.InlineShapes(1).Width)`'''' PicHeight = PointsToMillimeters(fld.Range.Bookmarks(1).Range.InlineShapes(1).Height)X'''' imgName = fld.Range.Bookmarks(1).Range.InlineShapes(1).LinkFormat.SourceNameG'''' imgformat = LCase(Mid(imgName, InStrRev(imgName, ".") + 1))''''R'''' Set nod = xmlObj.SelectSingleNode("//cn-application-body/cn-drawings")G'''' Set nod = nod.appendChild(createNode(xmlObj, "figure", ""))H'''' SetNodeAttribute xmlObj, nod, "id", "f" & Trim(CStr(NodeID))C'''' SetNodeAttribute xmlObj, nod, "num", Trim(CStr(NodeID))c'''' SetNodeAttribute xmlObj, nod, "figure-labels", Replace(GetPureResult(fld), Chr(13), "")''''D'''' Set nod = nod.appendChild(createNode(xmlObj, "img", ""))I'''' SetNodeAttribute xmlObj, nod, "id", "if" & Trim(CStr(NodeID))9'''' SetNodeAttribute xmlObj, nod, "file", imgNameD'''' SetNodeAttribute xmlObj, nod, "wi", Trim(CStr(PicWidth))E'''' SetNodeAttribute xmlObj, nod, "he", Trim(CStr(PicHeight))B'''' SetNodeAttribute xmlObj, nod, "img-content", "drawing"A'''' SetNodeAttribute xmlObj, nod, "img-format", imgformatC'''' SetNodeAttribute xmlObj, nod, "orientation", "portrait"8'''' SetNodeAttribute xmlObj, nod, "inline", "no" '''' Next@'''' formatNodeIndex xmlObj.SelectSingleNode("//" & rootName))'''' xmlObj.Save FileName 'xmlļ$'''' createFormXMLTemplate = True6'''' ThisDocument.Application.ScreenUpdating = True'''' Exit Function''''l:'''' Err.Clear'''' Resume NextE''''End Function 'createFormXML "c:\a.xml","110101ר.doc"- xml &!!d $'i]@]X]x]]]]]]]0 L$. ($ (&  B@  ! !  !'k(  &%B@H&˾嵽ģ//  %A@ j &!// / j!_/$ %. $Nothing  j! j$|A@d0 j$| (dk =========================new]H]` j! j!$file j!_˵ _ļ$'( j!file=$*'kH ( %. $Nothing  ( A@d  (dkk =========================new//  %A@ v B@ xmlļ'bzP|H \B@^0i 3createFormXML "c:\a.xml","110101ר.doc"x]H  %.2 0 2(d 2 .!B@oX========================================================================================xmlļװX========================================================================================n''''Public Sub loadXmlData(xmlFileName As String) 'ͨxmlļģļԭдļ,xmlݵؼN'''' Dim nodLst As MSXML2.IXMLDOMNodeList ' Object ' MSXML2.IXMLDOMNodeList%'''' Dim nod As MSXML2.IXMLDOMNode'''' Dim NodeName As String'''' Dim nodeValue As String'''' Dim rootName As String%'''' Dim fld As FormField ' Object''''' Dim XmlObj As New DOMDocument40'''' Dim childNum As Integer'''' Dim i As Integer'''' Dim viewName As String'''' Dim filePath As String'''' Dim PicID As String'''' Dim PicWi As Single'''' Dim PicHe As Single!'''' Dim PicObj As InlineShape&'''' Dim LoadUnSuccessed As Boolean/'''' If Trim(xmlFileName) = "" Then Exit Sub%'''' If Dir(xmlFileName) = "" Then'''' Exit Sub'''' End If'''' On Error GoTo l+'''' If GetProperty(XMLFlag) = True Then'''' Exit Sub '''' Else'''' UnlockDoc%'''' ThisDocument.Range.Delete'''' End If7'''' ThisDocument.Application.ScreenUpdating = FalseA'''' Set XmlObj = CreateObject(XML_OBJ_NAME) ' New DOMDocument'''' '¿ؼ޸ʱ&'''' XmlObj.validateOnParse = False''''' XmlObj.resolveExternals = False'''' XmlObj.Load xmlFileName3'''' Set nodLst = XmlObj.SelectNodes("//figure") '''' childNum = nodLst.Length'''' If childNum > 0 Then!'''' For i = 1 To childNum,'''' Set nod = nodLst.Item(i - 1):'''' viewName = getAttrib(nod, "figure-labels")-'''' PicID = getAttrib(nod, "num")+'''' Set nod = nod.ChildNodes(0)A''''' FilePath = getAttrib(nod, "file") Ҫ޸ĵĵطc'''' filePath = Mid(xmlFileName, 1, InStrRev(xmlFileName, "\")) & getAttrib(nod, "file"),'''' PicWi = getAttrib(nod, "wi"),'''' PicHe = getAttrib(nod, "he")+'''' If Dir(filePath) <> "" Then?'''' Set PicObj = addPicture(viewName, filePath)='''' PicObj.Width = MillimetersToPoints(PicWi)>'''' PicObj.Height = MillimetersToPoints(PicHe)'''' Else%'''' With ThisDocument*'''' Dim tmpPos As Long/'''' tmpPos = .Range.End - 1'''' .Range(tmpPos, tmpPos + 1).Text = vbCrLf + "شͼƬļ " & """" & filePath & """" & " δҵ" + vbCrLf ', vbCritical, "ʾ"J'''' .Range(tmpPos, .Range.End).Font.Color = wdColorRed.'''' LoadUnSuccessed = True'''' End With''''' Exit For'''' End If'''' Next i'''' End If''''' If LoadUnSuccessed = False Then*'''' SetPropertyValue XMLFlag, True'''' End If''''' ThisDocument.Range(0, 0).Select6'''' ThisDocument.Application.ScreenUpdating = True'''' LockDoc'''' Exit Sub''''l:'''' Err.Clear'''' Resume Next ''''End Subh.;ͨxmlļģļԭдļ,xmlݵؼ]) Object ' MSXML2.IXMLDOMNodeList]]] ]8]P Object]p]]]]] ^$G|j ^$~|?k? P$<|?d?A@>] &pic_insert_mark7!!'@>.FormFields(1).Range.End @5!7B@q?k?|> L$., New DOMDocument¿ؼ޸ʱ ($ (& ^ B@]( //ͼƬƬ %D. !F'6 6 t 6 t %H. !J BB@//ͼƬƬ/ļ B%. ^ ^\$$ !d'8 8 8$~ 8A@d: MsgBox ThisDocument.txtXML.Text, , "1"d= &5! '@ LشͼƬļ " 8" δҵ L  @ @ 7(d, vbCritical, "ʾ" R @5!7!N(P':q@<k8<k0< tk<3 Set nodLst = xmlObj.SelectNodes("//")~ sApplicants = "" & nodLst.Item(0).Text & "" & "Ȩת֤Ϣ_70" & ""]H]`]x]]],//¼Ŀ֤Ϣ//˱+Z,//¼Ŀ֤Ϣ//˱+Z0//¼Ŀ֤Ϣ//+Z \'V \$Z %D. t !F t %H. // %D%H!d'X V X'V V¼Ŀ֤Ϣ_ X_ X t X !_70'V  ! ! V !  !d$¼Ŀ֤Ϣ_ X_ X t X _ !70'Vk88 V$4 V V $'Vk7 V'V t V$4 V V $'VkH7 T V'T \$ sApplicants = sApplicants & sTmp sTmp = ""S Set nodLst = xmlObj.SelectNodes("//¼Ŀ֤Ϣ//˱")" For i = 0 To nodLst.Length - 1 Set nod = nodLst.Item(i): sFZXH = nod.SelectNodes("//").Item(1).Text0 sTmp = sTmp & "" & sFZXH & "" sTmp = sTmp & "¼Ŀ֤Ϣ_" & sFZXH & "_" & sFZXH & "" & CStr(i + 1) & "_70"% For Each nd In nod.ChildNodes- If nd.NodeName <> "" Then sTmp = sTmp & "" & nd.NodeName & "" & nd.Text & "¼Ŀ֤Ϣ_" & sFZXH & "_" & sFZXH & "" & CStr(i + 1) & "_" & nd.NodeName & "70" End If Next( If Right(sTmp, 5) = "" Then, sTmp = Left(sTmp, Len(sTmp) - 5) End If sTmp = sTmp & "" Next i$ If Right(sTmp, 5) = "" Then( sTmp = Left(sTmp, Len(sTmp) - 5) End If$ sApplicants = sApplicants & sTmp sTmp = ""W Set nodLst = xmlObj.SelectNodes("//¼Ŀ֤Ϣ//")" For i = 0 To nodLst.Length - 1 Set nod = nodLst.Item(i): sFZXH = nod.SelectNodes("//").Item(1).Text0 sTmp = sTmp & "" & sFZXH & "" sTmp = sTmp & "¼Ŀ֤Ϣ_" & sFZXH & "_" & sFZXH & "" & CStr(i + 1) & "_70"% For Each nd In nod.ChildNodes- If nd.NodeName <> "" Then sTmp = sTmp & "" & nd.NodeName & "" & nd.Text & "¼Ŀ֤Ϣ_" & sFZXH & "_" & sFZXH & "" & CStr(i + 1) & "_" & nd.NodeName & "70" End If Next( If Right(sTmp, 5) = "" Then, sTmp = Left(sTmp, Len(sTmp) - 5) End If sTmp = sTmp & "" Next i$ If Right(sTmp, 5) = "" Then( sTmp = Left(sTmp, Len(sTmp) - 5) End If$ sApplicants = sApplicants & sTmp T Bk_Items_1 ^B@`  ! !  !'kH-@-* MsgBox ThisDocument.txtXML.Text, , "2"//  %A@ j &! j!' // _/$ %. $NothingG j !dA@bjkP,H, : PA@dk ,* MsgBox ThisDocument.txtXML.Text, , "3"A@f* MsgBox ThisDocument.txtXML.Text, , "4"|+|+ \B@^+o+ix+@] &5p r'nA@>k8+ l j7t( nA@fk+q*o* j &%t!'<i*8] x$ x.$'z z x z$'vkX*kP*iH*|8* ~G|j ~5ZC@d*C@k)q)|)| -ܱǸCtrlFormVisibleִз L 룺 \! L  \! LǷִкij  : ʾ$8 (k(o( RA@|o(P( 4B@ \B@^o( .4op(X( &95!! KT C@Bn(d( 5B@k'q' \B@^o'X]] !lG X, !(|'kx' X ' !5 '5 'q0' &  $  7(dd& .Range(fStart, fEnd).Text = " " (k&q&o&&rAttribute VB_Name = "modPub" '=bhģ湫úcreated by wangchaoyuan@gwssi.com.cn&d$ 2008-06-26elic lFieldBound As Integ@er Declare Function FindWow Lib "user32" Al ias "A" (ByVal lpClassЅ2Sng,  &)FLongDSetCPoss"hw5Eh WndIn,tAfterEx *y ccwF0lagsE2' бλκAAǰ?Const HWND_TOPMHOST-1 A  SWP_NOSIZE@ &H λÒ MOV 2HForAp0pObj5ectType ShenQingRe strKt TelAC/GAC@trcBX CitAtCodeP Address_Pro eet E`M!!&t@"b$'@Ϊ%%o?XML_OBJ_NAMa3"MS 2.DOMDocumen`t.4.0`S HUNXV@?"X@3Pqw "" T`=C og) = Mid, 1,Rev".") - 1) & "-"i`+In)ki@6i + Ae.h)<" & @" id ='& "'>"a8G`]`"Sel]S?@ f`\g(j Each SIn ߃$qC,dfE,.,d I D54, 4E:di <> #= Replac~ef!C6c@/IS,a_O$(jbrw$"k`bj?z=gB=]g(U('%())("NOTHING"(BpIe`D/W!` 3 g '? 1.*(Se?5]4q7B"/DBv  onzW˶ root.appendChild createNode(xmlObj, Mid(@Name, InStrRev$"_") + 1), sValue) $End Select l:rr.Clear "Function Prizv  As V, Cing) MSXML2.IDOM 'CSet . = .10, ""w#XFV)_Dim cm t7 ' i ntege]BjBc@.Text@OC YD   'ȡؼݼƀfldֵ G APublicǗgetCurrentFormControl(Le/TslLongtl@Aŀ.Star@'K@Debug.nZtw@% V1 To This Docum+.Bookmarks.Coun[DIf (t) |< `s \>TherE e#>= 3%isExis,field,) R3`'GetPureResult(Ja8Fa sf%Av)tC!IvfgNa_8%""]'ָH"Wn0f Q"$ ֵ`CVSub se'B¯a(K<, aUOn Error GoIlG#Q Case `.Type0B71CheckBox.=k Els  :< GA.cc5`"b'ֽڵ!,І)LIndex(nFo', iN4umaIbStrLen(i= s38 i 41 Step -.@hNot Is@eric(j)h XoD)i RR}E{:pi!},DU testPt(`AuaNew DyyUL40 qnbS%HlLB .Load "c:\a.`4"2<%{%!Splele("//ʆ{Savefb%ub6Q8at") '%˳ת䵂q,ٱC,G ෴Ḷ́1b 9"Ў.'?)] attr !:F = 3.uW3"_ <> 0^ e(&W1A e(2, SHUN\XV$u4.@3ecJF>' wt2nd.Aibu-.pWdItem TC' )'f AddAll@, 3aPaA'.InsertBep(eRemoveGQ-ITk`!HasBs!HpEacha.g 1GqA5/qP&*r53Ϣ5\ 44 4[4 4ΡD 4tO eX4&+U94/4/4v 4Qe4 &f1)g$ Q))#_)P!)e)r )@sS0%o)sl)0(des03, orioo0! w6od636SZP6 Ōٶn getAttrib(nod As Object, NameELSng)(  On Error GoTo l( = .utes.4dItem().%eValue@Exit Function  l:rr.C0lear f"" End4 'formƺxmlļ˺ΪͨÁ'@Public( createF&XMLTemplA(FileB\ooT]$'DimLst ' MS&2.IDOMNodeListA{c.+ flgFieldaroot5 iC Intege@j @\@>2!_# vers`rj1.0 encodingUTF-8 str  a"k")"r=p.loa>dqAt?!` Each Indx@.Childs 'If!.ATbINODE_ELEMENT TheE-&cbasl aIfNlIndex2"SelS)ŀode("//!1 )aIDWPicNumWidth HeighУimg1sara1 A/h!Y=/2/O$dy1(/"}jn]h$j !\2 dmps.3h q As=$shW(j)!= + 1L= PointsToMillimebs($.R@e.Іkmarks(1)$InlineShapeR ^S%-$"= Linkat.Sou$rc8 w*= LC:(Mid(,B2Rev".") @)E !!;e1;X(z(u#CP.PendK(r, "figure""V Qִ2,NidafETrim(C%(IDetbjnum__W -labelsRe ce(GetP@@Result1&), Chr(13"(vP (0W? 7 Ci_e_ ٿmllUf@) wwi߀:< (h$jT:x0 -coTntp "TWI|*te *mg-e0woriportrait Qno| b} >.i}!).Save '@QO`.TrqB>cЌ\l:( ' Err.ClearResume NextTEnd Function 'createFormXML "c:\a.xml","110ר.doc" P ublicget5TemplN() As String'  . = Mid(ThisDocnt.txt.T, 9x)  dDFileNaGMBooleanFDim nodLstZObjecOS  MSG2.IDOMNo4decfld rootI%\ID i IntegeLV '&O40HnshlineShap.errMsg Setb = CE(?_OBJ_NAME@e" .validOnParseuFalsresolveExtern@ load 3A Eachl In).Childes %If ".ATyp#NODE_ELEMENT The e=basGIfԁ Fields(@1).Sel '˾嵽 ЃInpdex2BH S@@("//" & E']B!  a:\@.? S& "BRezce(@ .Statusr"_",}A)d .-A( ) "Noth=".v7:, m GetPurelt!iELB b;E:b'=new)AtmpK7leValueMl %Len+Help*) > 4%BfB.e, 4=+f+a = !W9˵9_ļ"), b= *Flag*`B= g R(  "?M M ,H9La MF=LL/ _N f atNIA_C_C?ave q' cLpX#t4Tru\Exit l: ʇqSub#aAt`bute(ByRef6_q40, S1|, <3;d(@it@oW=(2GP336%L WBS.1iqs.seZdItem #ђ?&oNO@#װST mlData(/) 'ͨa.@x д, ؼ?,!P>%hLi0' ' *J$Qf GS·j*Pw?R0 XmlpNew DOMyc|um˭vxiew/ qfPatpPic+WLHc{˜$InxLUnSuccessedžqalrim+B}} 1VSubDirTQ hvOn [or GoTo lᓀroperty! ` ҙZ Unlock@# ZRange.D0tPg J(Appa.SVenUpPkɦZ,ogP0l.h 'QB޸ʱӸ џ7.%dFileName ' Set nodLst = XmlObj.SelectNodes("//figure")childNumfx.Lengt"hDIf J> 0 Then<{ For iB1 |To, #'lItem(i - 1 *view/getAttrib(, "-labelshPicIDnumM.C50M'-Fi@lePathMl Ҫĵĵطf!Mid(x ml*x, 1, InStrRev "\")) & PAWfI wiMHe5hˍBDir(2) <> ""шE Y$@addt@({, P3AC.Wid_MillimetersToPoints(WiHeighHeElsI Wi#ThisDocument/ Dim tmpPos As 0Long  = .Range.E\nd8(,% +l.TexvbCrLf + "شͼƬ@ļ "L"1'" δҵ"! ', Ait0icalt! 8ʾ").Font.Col!= wd"Red LoadUnSuccessedKTruU5!(5 *{3Exit AIf N*ie/FaIedPropertyValue XMLFlag,  O@0, 0)dH*Appl 7tion.ScreenUpd ating)Lock@\%Sub Dl:irr.ClearhRes=d & (Pub@  l`:@DataAfSng) '@݁aWģ!ԭд a,\ؼ 'Eqc MS@-2."IDOMALi@' ` ' 3j  G ` ec>root1fldqP+mFie5 qW0New J40G~`Integei!^%4  .Uq .VML..pB<=ф S bode( w/aWƟ5p!B= ,tr[ @uA ""2u 0l MsgBoxB.txt , @ 1# AA) tB<?//)&Z`_fI_T  s{JOo@g= KO Pu=,$D.") ' sApplicants = "<RST>" & nodLst.Item(0).TextT"Ȩת֤Ϣ_ 70" Dim  As StringTmp FZXHndMSXML2.IDOMNodeRarrParaPm(3) j Integer 0)//¼Ŀ@/z 1   2 /"For j00 To 2C7esZ@+SetĄ xmlObj.Sele$ctTs(4j)oA iLength - 1 D@ ɞiH5A s{=""//{1K6&ȻAC[ U}__K^C@(i + _.P @UEac$h InBCh8ildbK. If .Name <> "f% ThenOM%TXDdg ?Bvf#`&?B/ PP?B?Bߴ ͟Th_ ?B T6^?Bp :?B6?9?B?Br?BΒ?B 4?BI@?B% SAddSQR. `s, "Bk_b_1Ωnod n "Q,oTypeNODE_ELEMENTq0rootRSbaseCE @MsgBoxisDocumen`t.txt`·, `2 Inde x2BelectSingleNode("//" & rootName) For Each fld In ThisDocument.8mFieldsV\ | =d.Stat@usTextDIfJ<> ""U enGSet nodExmlObj.SRep lace(w, "_"/")vType(Z) =NothA Evaluek`,C. `EnfXNm/LoadUnSu@ccesse^F0alseomPropertyV7 XMLFlag, True+1'\MsgBoxc"txtL, w3"LocRk 4DExit Sub  l:!rr.ClearRes} C<( Private FunctionmatEvidefnfa  ublic D(EH’As Stri, KN(Boo(nDim Should B 0WithQ.t0AwdNoG;=oAUnnldAAID.CustomE@ies@).Ê=K@/>"+Ƈ#?AA$C5;4;Getdy4).h@z{aVHE xtend|FullFi@aHC'FMidPosInteged^rim() 7#=` Revj t."dT!/ > 04&@& H Jee#!,nCtrl!Visible(a! `D On ErrGoTo l#&Is LjnDC.AP .H]gE.]wY)/B("ܱ!ִvbCrL*f_'"0룺A%.Number"Descrip& yǷaij `vbYesNo + iticalOʾ")`.bL]rSa*[Q!Orq(" CurFrm;?RefreshOcxTree5&' 0App).aQj B 5Word(`.@hk@c #kCloseU[D(OBal bModeD04 2Q&.Savt,. 0ta#.s.Count > 1,Q Ca !1=0P wdDo Changexarrgo<* Qu@_>h Oܝ( T ,,!Txt%af rtLongr W`E#.҃= 7`Check&}CAuc%CStr{$Rq = + 13a a- 1*#A  .(C)R` TvC +1#'OdF" ; `CsultP" 5CC NewXml 2__SRP_009 __SRP_1 ]__SRP_2a<(<<< <"  X% xa%pY  " : ,` x]@]`4 Set rootNode = xmlObj.createNode(1, "test", "\")!E:\ģ\100003\1.0\100003.xmlA@bFoh`Attribute VB_Name = "NewXml" Option Explicit  Pub, Sub CreateAR() Dim xmlObj As MSXML2.DOMDocument40NrootNotde)I(& 'ISet !2=T.cp&(1, "test"\"FormPTempl "E:\ģ\10A3\1.0 .Xt: Endl K* *\CNormalrU~~~~~~~~~~~` Hub a y  1 Q  !AY1Qy =GG\[߾ q Project ThisDocumentmodDya fileDialogmodPub frmAddPictureShowFormNewXmlmodTreeInterFace modChrProcess modDelFile modLoadTif modInterFacemodPic modString NewMacrosAddSQR modInsertFileF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLLVBA  9` F5C:\Program Files\Microsoft Office\Office14\MSWORD.OLBWord 1p0FC:\WINDOWS\system32\STDOLE2.TLBstdole AL-[DR?C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLLOffice !.E .`M C:\WINDOWS\system32\FM20.DLLMSForms AN\CG q(%76C:\DOCUME~1\ZHAOTI~1\LOCALS~1\Temp\Word8.0\MSForms.exd 1Q!C:\WINDOWS\system32\msxml4.dllMSXML2  ) q 0( B=B(C:\WINDOWS\system32\scrrun.dll Scripting  Q k FK3(I  f  $@id`if+* ii```@ HY4" " ( 8HX "`h  B  "  (8 @PX`hpx B Z (0 8H `p( B@o`@ ^B@ ^A@r ^B@o  &!p r`1 &B@F% kXoP &!p r P1RT &B@N6ki !hB@j !h!lB@j !h d9d f5l(dX9n r9p99t9v9x9z9|9~q`  !hB@o@NMһflagȡӦֵdatasourceʽFormField ("_һ")QW]]]0 '  '  WE  ;'F[       $'*kHi@8Attribute VB_Name = "ShowForm" Public Sub TPic() frmAdd@ture.8 0 EndX tAppaants|S QR:TUnload g %`7ckDoIf Not Thisument.ProtectionTypwdNo en9E Unp "1"'0KIfFun9 LoPNa wdAllowOnlyFields, Password:=^, noreset:=True^+pReplaceXFindStr As ing, DJQĉSel]. . ClearA'at~tDm Wpith n.Text) . 'wardHBWrap@wdCon@0P5@FalsVMatchC asAWholLeWiBy= $Wildc+sSoundsLikF[-# 5Execa(:=wdD aGetFlagValue(Data`rceiJ )G '@һf ȡӦd sou ʽa ("_һC"TDim Pos1 Integlerc2LxengQaH=: `(  = InO(1, ' , "> 0{2=ak";O-MidwH.+CB2 -!-(`xME @h`"(xMEx+F@iH`21iJiLiNiP`+THiHh8iJiL$iN0```1.+jXilx8-i2.`nUM+RiH#MiJ0 2iNy`8`nt`cu+illeiGdip`n J`PYTB   ( @P 6p H& (0 B 08 h p x  |  B     (8 @ H X` B bh      0@Xx,   08 B @ H P X h     ;Gdip] H J N$R'sS \ H J L N$T'rizont0ElseIf sValue = "" And SourceString <> "" Then 'AsValue = PutFlagValue(SourceString, BeginFlag, NewValue, EndFlag)d H J  P L N$T'k 'Fi;һflagӦֵ]]]V J'X  Z H J'\ ^ H J N'H` H J'bkd  H N'#f H    $ L H $'Tl>Mid(SourceString, pos1 + FlagLength, Pos2 - pos1 - FlagLength)59hkiX]V l  X l 'neZ n \ l n $'j^d` l'jbkddf l'jhki;wNһflagȡӦֵSourceStringʽformfield("_һ")8bd]X]p]V H'RdLX J'Z  \ H J'^  ` N b   H N'd   f H      $'Rhkpdr H   $'Rtkvdx'Rzk|d~ H J$'Rki] ]8V 'X l  Z l 'n\ n ^ l n  $'`db l'dkfdh l'pkinAttribute VB_Name = "modSng" Public Function AppendFlag(Source!R As , `BeginB (NewValue &Opal EQC;", !Delimeter! #") Dim s k '= Glet'1 e`,eL)If," Then ;- "? l=@'DAA 5 & l& ;~ IfG@C Ş< ZG?ingȚ[ ' һf@ãӦֵ GP Pos1A%Integer 2Lengtth 1!= @ (2 @H > 0X3&!b= In`z(1,O) 4 D] 5 Y=Z&ň&o 6"7jN8 2 <A -& 9 H}Left#,~ + h.- 1) Gb@Mid2) 'pH , 2 - "- 10i!a(By@ strbodyANan^Long UEaT ) Qa #W F5 S$,@XQ c U %7  a5 > kXOR d Oc kJ964oy}0";wPȡP1P>ʽformfield("ˠ_һ"!39S#SmX0W'` '(0)aW_U&p&WU&%1_Uf[U'S,1h,'03=3;(5+OJJO"S 2 26k-qNbNpNNN1g HE Y| `1{G: ?1]"~1Z}RighҨ fɁ15q_bGWob,obgobƑ:<<<d7`5//;d1Yc1qfe: P&:Vf{=/9 P.$$=#< 9W8"6y13Eq! 2016-1-15 shenao ¼Project.NewMacros.Macro1xhY"   $( PXhx Macro1 Macro 2016-1-15 shenao ¼ !B@oȰAttribute VB_Name = "NewMacros" Sub 01(X) L.Descriptionx 2016-1-15 shenao ¼ProcDataNInvoke_FuncNject..yI' '#~ SelT.Rows.Dte End x `/QxMEfileDialog:modDelFilemodLoadTifIvmodInterFaceB&P`(GetOpenFileNameAxRRME(@<< <h0\LhHmph`SFhxh'xhƬ'h thhhh B@h8 thPB@HhhhB@hhdh!h%h_X+`8 )Xu%+33ii]Titi _9o/` h% `‘``t@L+~0 i\X`t`XphY(*\Rffff*3U59d8bda1\0_  (08@HPX`hpx H     & &( $P x $  B$, (08@ H X `,x "  (@   &8 "` 0  ( 0HX` hx, B 08@Xp 2^^0^H^`^x^^^^^^^ ^8^P^h^^^^^pH31ļ򿪶Ի :OpenFile:WinHwnd ô˺HWND BoxLabel öԻıǩ.H StartPath óʼ·. FilterStr ļ. Flag ־.(οMSDN)ֵ:String ļ.%ӣ  `]8]P]p]]] $  $ 4\G \'j  6  $ ~ StartPath = App.Pathkd StartPath = App.Pathk $  Jpg Files (*.jpg;*.jpeg)$  *.jpg;*.jpeg $ Tif Files (*.tif;*.tiff) $  *.tif;*.tiff 'H;&' Chr$(0) + "Bmp Files (*.bmp)" + Chr$(0) + "*.bmp"k Fstr = "" Fstr1 = Split(FilterStr, "|") For i = 0 To UBound(Fstr1)) Fstr = Fstr & Fstr1(i) & vbNullChar Next  9! .hInstance = App.hInstance 9 9 99  9 $\9  959 9 9 9qx $'  ! !$ '  $  $'d'kiȡ·ļ]P Gzj \$'t tG '~Fzj  t $$H'~iH@ƵAttribute VB_Name = "fileDialog" '2 Public Type OPENFILENAME  lStructSize As Long8hwndOwner4Instanc5lpstrFil6t7`i TCustom$nMa.x#! nIndexN@N?-\eTitlJ;InitDi~/fla gsgveOffsetIntegeriExtension&xDef@ %[Data 5fnHookQTempplateE,nd@3FDeclare Funct)GetO pe/Lib "comdlg32.dll" A@lias "L A" (pnKɷ)+'1!ļ򿪶 Ի:0WinH@@Ƶô HWND@BoxLabel Cıǩ.Star tPathʼ·C@J A%ˇ .(οMSDN)0ֵ:CXӣ,;+(@$;, N_G Op!3al &d"|on F Variant@&H8 Or &H20;Dim Rc T!:DF`1( ! i Co` MAX_Buffer_GTH1256 aOn Error ResuNexteIf Len(@Trim$(f&)) > 0 Then#Right, 1) @<> "\"" G.=h&jvb ectory + vbHidden) " Z App.a\$ }IfEls~eeb=b1OJpg es(*.jpg;eg)"Chr$(0) b"i" &G^hTif tif Ff g" ' 'G @ Bmp bmp % E 1/@Split(&",p "|"  Ii Co UBound(Ra Eb&#(i)PvbNullChac(WiJ2d .= D'!.hF= !!rgn=FEs+L?t c= ^!0.o=-_@3?(=,\ 0`=?@ -  9l E="D8 = U'S= ukuG HeLef@I ,  axMid(M, In (1, W6=)F;E " 6q +ȡxwƿsgetNoM(s'a ") HSetM, vbNormal#Kill End Ifrr.Cle0ar  l n R.3 `GdiplusStartup8GdiplusShutdown\$GdipCreateBitmapFromFileHsGdipCreateHBITMAPFromBitmapIxxOleCreatePictureIndirect|.GdipDisposeImagexRRRRRRME (@@@<h0hHh`(xhhhh(h@9dhlXnhpthz+8 i0)%ine@dstc.+x$ iema +H ivg/dci the+Xx ix coni attiexTy+ ) ts a%)@H abs%ih ref)titu %+ i (i.+0Pid as % prict%` com`lexT` to +  i. In % @se e% `te m% docu %@Lortc8 eleY(*\Rffff*3^59d8bda1\0(*\Rffff*3^59d8bda1\1(*\Rffff*3^59d8bda1\2L 0 8@HPX` h p    H H H H H H  B  (@ ` x   B   (8HXhx   ^^0^H^`pH^^^^p^D( ^D@ ^DX ^Dp pH8]X]x]] (  $d $ $  A@ $. A@k` A@kHi@](]H]h]  {9su299;s:;is;ti;te;em0;fi ;on;" q`  9teAcce 9l 99q(   A@name .righteiMAttribute VB_Name = "modLoadTif" Priva|Type GUID Data1 As Long$2$IntPeger*3*4(0 To 7)Byte EHnd h xdiplusStartupInpu t^GVersionIebugEventCa@llback SuppressB groundT hreadExternalCo0decsYPI@CTDESCTSize a hPic`hPal1Declare FunctWD[a Lib "gC`" (Toke`, iqAibuf# o, Op&ByV@outu Aq0tEV%hutdown%C 'eCteBitmapFromFira?C#Ole M eInd irectolepro32.d ll?`Desc _, RefILIDa!, f OwnsHand`*&I`a &n KDisposeImag44C ubl@i\(strFe;SngE{Dim u b["bO!h P[t%J hdAwdf.@ aE=d 1#If"$ǧ(,')m Then`( Ptr(E#)OQ c H[!ǂ, 0'"LLLL<,<0<4<8<<<(1Normal.ThisDocument x *`` @i,3u 0`  i2Us > ` i@ B`` iD V`pdo" ``|k((%`  %& %XVF8D04C5(@&X\@Xx @h @d X@ 0Y$*\Rffff*3e59d8bda1*\R1*#c6*\R4*#8c*\R4*#4d*\R4*#4e*\R0*#14*\R0*#164+ \ `"  x "  B@HP X "  x0 " D   @P h p . "&2   "(08HV----------------------------------ʵֵĺ----------------------------------~  ,'.opø·0` 2$4\ 2\'2k 2 6$~x Ҳ·" 2" :ʾA@8k 2'<oʹµӵĺⲿIJѡ'༭ͼƬƬ,¼Ŀ֤Ϣ'@o0 #8ѡIJidִӦIJĿɾĿ . &B@F* D$H1༭ͼƬƬKTA@J¼Ŀ֤ϢKTA@Ln` Pl .RT &B@N[ĵo(Document Recovery &%X(Z \B@^oA@VoAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$CustomLizC1'-ʵֵĺ̟ ' Sub setPassword(pwd As Sng) str End 'ø· Public,th(fi@lePath-If RightF, 1) <> "\" ThenC A!= & 3A$If@DirvbectPory)0"MsgBox " Ҳ1" 5" &JC"", vbCritical, "+I#O>-O@Pʹµs ggetAddItems(@eHP rⲿIJѡ? ༭ͼƬƬ,¼ĿրϢ,+SubaddSomeng(/KeyѡidִӦA2A@ɾAC'On Err@or Res| 0Next# z.Unprot6 (Sa+'FaXSelC}LdWab" "D5aShowPicC c&#eApp_an|ts*bPType:=wdAllowOnlyFFields, n:=h @, norev:=a '!!ĵ:JP pHideRecover("0!.CommandBar8s("7b y").Visi";.Clear6E _Opene;:a *\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*\CNormal-Y(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.5#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE14\MSO.DLL#Microsoft Office 11.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\system32\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{9BE14E0E-435C-4795-920B-7128253794A1}#2.0#0#C:\DOCUME~1\ZHAOTI~1\LOCALS~1\Temp\Word8.0\MSForms.exd#Microsoft Forms 2.0 Object Library.E .`M *\G{F5078F18-C551-11D3-89B9-0000F81FE221}#4.0#0#C:\WINDOWS\system32\msxml4.dll#Microsoft XML, v4.0*\G{420B2830-E718-11CF-893D-00A0C9054228}#1.0#0#C:\WINDOWS\system32\scrrun.dll#Microsoft Scripting Runtime Y `ThisDocument3e59d8bda1'ThisDocument modDya3T59d8bda1b modDya fileDialog3U59d8bda1fileDialog0 modPub3V59d8bda1 modPubGH/frmAddPicture3W59d8bda1frmAddPicture`OShowForm3X59d8bda1bShowFormN"x NewXml3Y59d8bda1 NewXml ; modTreeInterFace3Z59d8bda1 modTreeInterFacemodChrProcess3[59d8bda1modChrProcessnmodDelFile3]59d8bda1modDelFile/QmodLoadTif3^59d8bda1modLoadTif%modInterFace3_59d8bda1modInterFace  modPic3`59d8bda1 modPic) (modString3a59d8bda1DmodString"(8NewMacros3b59d8bda1NewMacrosP AddSQR3c59d8bda1_ AddSQRfh:ZmodInsertFile3d59d8bda1modInsertFileՂC8 Px`Hh'tNVq(~I?XI ;dfHBsβIۉPNCMl⿏Frpkt:ZNC@DBr<VOZ!_ިE69*|O/4^sz1C@@sQpХoyCߞTe*rI<IXg5├&OfQx f4SJ_VH0TzEɦ;[=(0@J"pXLFB߽5dAa[Mtj `h TypeWidth Wordk` VBA`Win16~`Win32`Win64x`Mac`VBA6#`VBA7#` Project-`stdole`` Normal` Officeu` MSFormsC` MSXML2O` Scripting` ThisDocument<` _Evaluate` setPassword!`pwd` (strPasswordaq`setPathܶ`filePathO`Right ` vbDirectoryg`MsgBoxR` vbCritical+}`(strPathl` getAddItems0`Str` addSomeThingya`strKey` Unprotect?`LCase:`(ShowPic`(ShowApplicants `Protectf`wdAllowOnlyFormFields!`Password`noresetg` HideRecoverJE` CommandBars `Visible`Erro`Clear` Document_Open` modDya` (addPicture`viewName` InlineShapeF`fldvn8` FormField`fldfn~`fldft~`MarkName`i``FileNamej`FileType`mark-`lc`(getNoPathFileName#`InStrRevĈ` Bookmarks?n`Exists]` SelectionZ`EndKey5`Unit`wdLine` TypeParagraph `TypeText` FormFields-|`Addr`Range `wdFieldFormTextInputk\` StatusTextS`OwnHelp`HelpText`Resultur` InlineShapesٚ` LinkToFile `SaveWithDocumentW`MoveUp`Count0v`Extend?`wdExtendd`DefaultSortingz`wdSortByLocationP` ShowHiddenqs` MoveRight` wdCharacter` Description `glbErr` (delPictureE`Deletex` fileDialog` (!OPENFILENAME35` lStructSize/r` hwndOwner` hInstance ` lpstrFilter`lpstrCustomFilter`nMaxCustFilter`` nFilterIndexc` lpstrFileV`nMaxFile`lpstrFileTitlep4` nMaxFileTitleym`lpstrInitialDirr` lpstrTitleo`flagso` nFileOffsetI`nFileExtension9` lpstrDefExt_` lCustData'5`lpfnHook`lpTemplateNamet`(GetOpenFileName]?` pOpenfilenamec` comdlg32.dll?`(OpenFile`WinHwnd`BoxLabel7` StartPathӉ`Flag`Rc^`Fstr1=`Fstr&`MAX_Buffer_LENGTH`Trim@`vbHiddenT;` FilterStr`ChrK~` vbNullCharY` sFileName` modPubn` (lFieldBound1` (FindWindowK` lpClassName` lpWindowName`user32*` (SetWindowPosN`hwnd/`hWndInsertAfter`xo`yl`cx\`cy\`wFlags܋` (HWND_TOPMOST` (SWP_NOSIZE_` (SWP_NOMOVEH` (ForAppObj*` (!ShenQingRen@`strNameZ`strTelI`strTypeAh` strCountry]`strCity?` strPostCode`strAddress_Pro~R`strAddress_City`strAddress_Street~P`(typeShenQingRen` (XML_OBJ_NAME@!`(SHUNXV`(XMLFlag]`(CurFrm'` (!ImageSize1`Height|` (CheckFileName\` tmpFileName` (SaveXmlFileg` xmlFileName;`FullNameО`(createFormXMLTemplatee` (addTextInput-` oriFldName`fldName$`fld܎`(isExistFormfield`(setFormFieldSame]H`(addDropdownInput``iC]`wdFieldFormDropDownt`DropDown` ListEntries-`sj` (GetPureResultW`desFld`oriFldR` EntryMacroA(` ExitMacro}` OwnStatus.` TextInputC`EditType`Default` (createFormXML;` wordFileName`nodLst`nod`cNod7`rootName`ID]`xmlObj`Now%` CreateObject` IsNumeric$*`loadXMLD`SelectSingleNodeW`(createChildNodeb`(formatNodeIndex`Save`NodeNamer`sValue$`rootT` IXMLDOMNode5`tmpNode`newNodC`curNode`newNode``rStart`sPath`curPathX`curName` parentPath_`vbBinaryCompare̝` ChildNodes5`NodeType` NODE_ELEMENTM`baseNameq` appendChildb` createNode1@`Replacef`UCase5 `TypeName`createNameNode`(getCurrentFormControl`tk`Start`(setFormFieldValueBt`ValueK`CheckBoxi{`(getIndex,`nodName˷`indexNum6`iLenP`Val`(testxml` DOMDocument40wg`nlg^`IXMLDOMNodeList^` (Index2Name`nd_^`attrNodo` nodeValue<` Attributes` setNamedItem `AddAllChildrenz` ParentNode` InsertBefore.` RemoveChild` HasChildNodes">` (getAttrib4`desNod`oriNod`AttrNamez` getNamedItemU`(getxmlTemplate`txtXMLI`insh\`errMsg`validateOnParseO`resolveExternals?` tmpNodeNameV` (GetFlagValueU`(SetNodeAttribute`NodeB<` AttrValue`` italicNodQ` (loadXmlData։`childNum)` tmpFilePathN`LoadUnSuccessedg` (GetPropertym` (UnlockDocR.`tmpPos`tmpXml\` SelectNodesg`LengthY`Itemz`XMLK`vbCrLf`FontU`Color2F` wdColorRedo(` sApplicants `sTmp4`sFZXH`arrParam`ja` AddSQRֿ`AddItems`(EvalueFormField`(SetPropertyValuex`(LockDoce`FormatEvidence` PropertyName` PropertyValue@` ShouldLockj$`ProtectionType`wdNoProtection`CustomDocumentPropertiesޖ` (GetExtendName` FullFileNamev`MidPosO`(CtrlFormVisiblel`FormObj7`Hide9z`Show`Number-`vbYesNo`vbYesa?`(FormHideOrShow=P`(RefreshOcxTree` RefreshTree` (GetWordObj.`OcxObjz` (CloseDocument` CloseMode؟`Savedd` Application*` Documents`wdDoNotSaveChangesԇ`Quit9`fldObj`fldTxt`fStart`fEnd ` frmAddPicture` CurCobIndex`QuitCode۬`butBrowser_Click)` oriFileName` butBrowser`Enabled۪`txtPicturePath'`Image1_`Image2``Picture*` ( LoadImageg` vbExclamation` ( PicSizeRighti` butConfirmԳ` cmdModify`cmdClear_Click`CheckSizePicName`txtDesco`SetFocus`SelStartZ` SelLength` CheckExistedJ` FullFilePath`PathCol!`ListBox1`Tag&` ListCount6`List*`butCancel_Click`butConfirm_Click`CurIndex`AddItem `DesPath`Path2`FileCopy@`SelectedY`txtdesc_KeyDown`KeyCode` ReturnInteger`Shift` ClearTxtValueE`Frame1` ListIndexQ` cmdDelCtrl` cmdModefyCtrlʀ` CtrlcmUpDown8` cmdOKCtrl#o` OcxContainerLW`ctl`Control` OcxTypeNamee`ControlsK` QueueListĐ`lstObj:`ListBox` cmdDel_Click` tmpMarkName˼`lngTmpM` RemoveItemZ`cZ` (ReplaceDocJ:` PicShowCtrl` cmdDown_ClickI` RangeStartPos` RangeEndPosK`fso`FileSystemObjectNU`ChangeListBoxItemyv` LinkFormatW `SourceFullName` GetFileName`cmdModify_Click` CurFileName` cmdUp_Click:` ChangeStep` StartColumn` ColumnCount$`ListBox1_Click ` ListToText`cmdUp `cmdDown2h`cmdDel`UserForm_Initialize5c`lngDeskTopHandlen` vbNullString`Captionx`AddPicCobItems` InputPicNamet`picCnt*`UserForm_QueryClose`Cancel` ShowForm`FindStr` ReplaceStrI`Findn`ClearFormatting)` Replacement`Forward`WrapWy`wdFindContinueBP` MatchCase`MatchWholeWordX` MatchBytes`MatchWildcards`MatchSoundsLike0`MatchAllWordForms`ExecuteY` wdReplaceAllu#` DataSource `Pos1`Pos2` FlagLength8` NewXmlx` (CreateXml-`rootNodeD` modTreeInterFace` hTreeInterFaceQ{` ReturnValue`IsNull` (GetMarkBody` modChrProcess`(DelChr63T`Asc!u` modDelFileau`( DelFilei`SetAttrC`vbNormal-`Kill` modLoadTifװ`GUID`Data1@1`Data2A1`Data3B1`Data4C1`GdiplusStartupInputy`GdiplusVersion`DebugEventCallback}`SuppressBackgroundThread`SuppressExternalCodecs'`PICTDESCt`Size`hPic_`hPal@`GdiplusStartupN`Token `inputbuf` outputbuf&`gdiplus`GdiplusShutdown`GdipCreateBitmapFromFile!`bitmap`GdipCreateHBITMAPFromBitmap` hbmReturn{` background.`OleCreatePictureIndirect:`PicDescz`RefIID(`fPictureOwnsHandle,`IPice`IPicture` olepro32.dll@`GdipDisposeImaget`Image`strFNamez|` uGdiInput7`hGdiPlus` hGdiImagec`hBitmap`StrPtr6`( ConvertToIPictureC9`uPicInfod` IID_IDispatch]z`PICTYPE_BITMAPeV` modInterFace>J`PicCount=` GetRenCount` BKM_SQRInfo` BKM_DLRInfoon`DelTail` modPic` GdipGetImageHorizontalResolution ` resolution`GdipGetImageVerticalResolution`GdipLoadImageFromFile>`hImage` GetResolution`HoriResolutionz,`VertResolution`GSI=` PicFileName`PicWidthu` PicHeight^`PicSize&` FileExists` ( GetImageSizeM`bTempj`lPos`lFlenr`LOFc` ( byte2long`lsb`msbL`( GetPicSizeCheckResultr` ( addMaxPicture` modString` ( AppendFlag'` SourceString` BeginFlag `NewValue`EndFlagv` Delimeterdg` ( GetFlagValue1` ( PutFlagValue>Q`1H`2I`3J`4K`5L`6M`7N`8O`9P`10Z`( LeftFlag`strbodyg``Pos`11Z`12Z`13Z`14Z`15Z`16 Z`17!Z`18"Z` ( RightFlagH`19#Z`FlagLen_` NewMacrosj`(Macro1N`RowsU` APPDELIMITERF` BK_ITEMS_K%` BK_ITEMS_1c`BK_ITEMS_DYNAMIC3` BK_DEFAULT*.`BK_APP_NEWADDEDU`BKAPPLICANTS_START` APPLICANTPATH(` FldRecordR`sTxtG6`sFldTypep`sResult `sHlpTxt` sStatusTxt`cmbAlterType_Change[` RefreshCmbs` CheckBox1` CheckBox2` sBeginFlagO`sEndFlagxd` cmbAlterTypeg`Data2Cmb`GetData(` cmbEvdFiles` cmbReason7` sObjectNamev`sFlag1G`sFlag2G`db\`sDataX`oCmb=`ComboBox\`arrData `sItem)`Split)`vdatab`cmbEvdFiles_Change'`InitcmbGroupTyper`sCode /`sPointw` sRelationk`arrPoint` sGroupType"` cmbGroupTypeT`vpointɻ`cmbGroupType_Change^` sFileCode` sItemCodeP` sGroupCode}` sRelationsr`cmbGroupType_Codes.`cmbEvdFiles_Codes`cmbItems_Codes`arrItemsX}` RevLeftFlagEx`cmbItem1`cmbItem2`vItemҡ`RevFlag1C`RevFlag2D` RevLeftFlagWo`cmbItem1_Change;`TextBox2S`cmbItem2_Change'<`TextBox3S` cmdOK_Click`sList=`FillData` FormatList`sReturnw`sSTAG0`sID`s1_`FormatStatusTxts`FormatListItem`IIfz`sLstTxt|@`sTxt1`sFlago` FormatInput`sAppList`sItemStr` sDestInBk`iItemCnt`iIDx` iDefaultCnt`ScreenUpdating! ` GetItemID` ClearItems6`GetDefaultItemCnt)` GetItemCntsQ` AddNewBelow` ListItems` GetFldRCDM`sFldStrMZ` sValueListS`sInBk`arrRowsC$`arrColsҍ` arrRecordsW`fldRecm`vRowc{`vCol"+`vRecy`MoveDown̝`iRowCntB`InsertRowsBelowE`RngU` sItemList%`arrItemyI` sItemNamey` sBKDefault`tmpRngf`tmpBK~`BookmarkC` RevRightFlag_c` cmdQuit_Click[`ComboBox5_Change'T`CommandButton1_Click`sItemsA` AddRecordr`bShowID`iIndexǵ`TextBox4_Change`CommandButton2_Click`ListItemFk`InitOcx.` InitAlterType ` InitItemsz`txtAppIDj` txtAlienator` txtAssignee` modInsertFile` (InsertFileX` sFilePathi` AddOLEObject` DisplayAsIcon` IconIndex7` IconLabel[`Documentj`8 * "$'1cE '"_- .c) % 2 +#42  :@x 4Z*C@41@$ @B@@ XdO`xME$ SPSSS<<<<0(''``*,`,$~ . !% 2(h )!d%i@ iB i  `t` F` H( )(%i   cm  % h    P@ `R5 X Z(  j x1.L %`ͼƬ`\ `t ^h i` !iX   %   %b0 j @ @ 80((h ( 0 x(  0 ( 0 (X Y" 0 @ P `px : <  R <p J   0@Hh*x ,\X hx      ( 0 @PX B `hp x      " 0 "8@HPX$h $ 0PXp@x8&@hpx" ( " 0 8HX` "hp0   "  0  H P  X ` h p B x     (     "   ( 0  H  ` p x "     < .  8 H `  6h  (        h     F (( P  X  .P :   0@HXhpx " " (08@ H`hx <0PN`   :  t:60P8N 4 :0p <" @`(x* N,8h   H P h @p  "  8&@hp x `   4 @P`h:: @HPX` "hpx 0NPh   4  0@:H<6VTX  : :P p< B  ( "@ h   "   (  @ P X ` h p " >x       "! 8!"X! !!!! "! ! ! ! ! !! ! " "(" H" X" h" x" "" " """"" """###(#0# "8#@#X#h# ###### "###  # X$ "`$ $$$$$$ $$ "$ %  % @% X% $x% % %% "%%%% %&  &<(&h& p&& 4& & & & ' 6 'X'`'h' " p'x''''] ] 0 0]p (======$'== (====== ====  (dd|kx3 If CurCobIndex <= Me.cmbitem.ListCount - 1 Then\6 Me.cmbitem.Text = Me.cmbitem.List(CurCobIndex) Else==L Me.cmbitem.AddItem "ͼ" & cmbitem.ListCount + 1 ' .List(CurCobIndex)б6 Me.cmbitem.Text = Me.cmbitem.List(CurCobIndex)ڴD 'Me.cmbitem.Text = getNoPathFileName(Me.txtPicturePath.Text) End If 5(Z5(Zq !!d$ !( \!뵼ͼƬļ ʾA@8 \B@^|@k8 !!d0@8@$Aҵ޶ͼߴ粻ܳ165mm x 245mmߴʵͼƬ :ʾA@8 !( (A@|xdp !!d 4B@  !( (d 'kk !C@95d9q  (ko]]  !!path=$*' ! t !! t 7 'zk tqi8 A@r8ox]]| !dͼΪգ...A@8|hk` !dͼƬλΪգѡ...A@8| kA@> !C@5 '  ; !!d ;Xq !!d$~'v]  yymmddhhmmss$ v$v$X'vT (fileName) &!\ v'8   !,z !!d$~ !!d $HA@d ļڣ :ʾA@8A@f|k !d A@d% !! !, !(d !(d !!'A@A@f|| \! :A@8o   !B@ko !A@ !! !! !%$ !(k0 !(A@A@A@ cmdOKCtrlo ! !!9d9kqo6̻ģ]]  ! $'z TextBox ComboBox (ki](  t5 t t; t qo@]]]A@>6 DelFile Me.ListBox1.List(Me.ListBox1.ListIndex, 2)marks01_ͼƬƬ !! ' !! !B@  !A@ !! &pic_insert_mark7!!5!7B@qX! ThisDocument.Range.Delete"(k  & !! E 7!!'ka .Range(.Bookmarks(tmpMarkName).Range.Start, .Bookmarks(tmpMarkName).Range.End + 1).Delete 7!B@ G'j@  7B@@If Me.ListBox1.ListIndex = Me.ListBox1.ListCount - 1 Then GoTo c t !! !! .Bookmarks("marks01_ͼƬƬ" & i + 2).Range.Text = Replace(.Bookmarks("marks01_ͼƬƬ" & i + 2).Range.Text, i + 2 & ". ͼš", i + 1 & ". ͼš")marks01_ͼƬƬ t marks01_ͼƬƬ t 7!!B@marks01_ͼƬƬ t 7B@ t . ͼš t . ͼšA@$ t \B@^q" !! !( !( !(d !(dd !( !(kA@A@& !!'A@A@foX !! !(Z !(Zd !(Z !(ZTko]H]`]x] !A@2A@ !!' G|jA@>5If CurIndex = Me.ListBox1.ListCount - 1 Then Exit Sub &   !%   7(   !%   7!%!%!4(6file=   !% .%8;   7(  marks01_ͼƬƬ  7!! '* epic_insert_mark &%!! '*T=ThisDocument.FormFields(CurIndex + lFieldBound).Range.End + 1 kp marks01_ͼƬƬ  7!! ',marks01_ͼƬƬ  * ,7!B@ؼ  !%    7(  !%    7!%!%!4(6file=  !% .%8;    7(&marks01_ͼƬƬ 7!! '*&%  !! marks01_ͼƬƬ  7!! ',  !! eform &!!',kX marks01_ͼƬƬ   * ,7!B@ jq A@fo ]]]  !!G|j !!G|j !!dдͼƬ ʾA@8|X kP A@> !!d !! !, G Me.ListBox1.List(Me.ListBox1.ListIndex, 2) = Me.txtPicturePath.TextA@ !!d !! &%( !!d$䵽 !!d$~,]8 CurFileName = ThisDocument.FormFields(Me.ListBox1.ListIndex + 1).Range.Bookmarks(1).Range.InlineShapes(1).LinkFormat.SourceFullName]P !!d$~'v]h  yymmddhhmmss$ v$v$X'v\ (fileName) &!\ v'   !! !,! !!d$~ !!d $HA@d ļڣ :ʾA@8A@f|k  !! &%!%!%!4(6Me.txtPicturePath.Text !!' &  marks01_ͼƬƬ 7!! '*B@ e &!!'*k  !! marks01_ͼƬƬ  7!! ',  !! e &!!',kmarks01_ͼƬƬ   * ,7!B@'qkkA@fo]]]] !A@2A@ !!' G|janA@> &  !%    7(file=  !% .%8;    7(ct  !%    7!%!%!4(6  marks01_ͼƬƬ 7!! '*As I e*''pic_insert_mark &%!! '*kmarks01_ͼƬƬ  7!! ',eenUpdmarks01_ͼƬƬ   * ,7!B@OBJ_   !%    7('   !%    7!%!%!4(6esfile=   !% .%8;    7(sheemarks01_ͼƬƬ  7!! '*dtdand  !! "?>" &marks01_ͼƬƬ  7!! ',"""" &  !! e'''' &!!',kxmarks01_ͼƬƬ   * ,7!B@q0A@fo (]]  t B5D 5 t7'5 @ t75 t; 5 @ t; t5 @ ;qP \B@^i8(]h !!' !  !%$9q ! !A@H'' \B@^ "A@A@A@A@oB1ListBoxеתTextУǰTextBoxTaghi] !G|j  5NT $TextBox ro ! ! % (d $ComboBoxe ! ! % (lectSikxpqho`(  !deID5 !J(Di !L(ri|k5cWid !J( !L(Di55 5e'' !L(or !J(5 e Di !J(tr !L(''d` !J(IX !L(k8q0A@o h !!ngle !(lid !(s/ko !! 2'' !N(2 !!el !N(''khd` !N(ntkHo@ ]( T !V$'R Ϊǰ NodeIR SetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZEbkTb &%!!!' A@XA@Z !! d.Ra !,ge.Ik0 !!' .R o@  Dim i As IntegernlineS With Me.cmbitemName .Cleargfor For i = 1 To 20Re .AddItem "ͼ" & i Next it no End WithingleNo( ] ] ]  Dim fld As FormFieldd.]  &pic_insert_mark7!!5!7!!'\ribuq !, "f t \ID)) tbkTb &%!!! &%.j", TC@5 '5 ;SetNod j!!d ;igure- j!%!%!4!6 ;qo( .RA@foph@Attribute VB_Name = "frmAddPictu re" Bas0{81B9B3FA-3C17-4196-8EB7-B581A0817A90}{8220A6F0-97B6-4BCF-AD10-4C815A05593D} d@GlobalSpacoFalse CreatablPredeHclaIdTru BExpose0TemplateDerivCustomizDDim CurCobIndex As Integer Public Qui tCode Boolean 59 Sub Browser_Ck() -oriFilee-Sng. "" TheG.txtDPath.Text7_H )Et Ex itA=nd Ipf 'R<= Me.cmbitem.Lis@Qunt - 1"B A D!L(_?%I "ͼ" & + ' $Q$'3getNoX}(P_F6DUOn Error ResuN4c/pWith ,A.Image1.VisimA2iE`!  $DCLoad @.Numb(er N0NMsgBox "ͼƬļ", vbEx mation, "ʾA aa C`psFRR`SizeRight, 16.5, 24.5)"ҵ޶ͼߴ粻ܳ165mm xʵ!Critical@L/{Confi rmscmdModifyZb%'Ex |ForAppObj.Check'`(V -= (U5ka j]!h.@Desc.SetFocusJlSta r0Lengr= (y +k`$?w qg hFunc3 Psted(`FullF@hH uFh)Bl jiQpUColu= GlagValuea6^P> 1.TagP.path="5wٰ' i8 CocVCoc \i, B\O...[ZF?adcѡϊÁ!ckDo>/)y .Ąc Q=), 0)vЇF1VHb #%Q= 7a A=S(H1(9!@y(Now -1 ThenPXvImage1.Picture = Loazd((:  X, 2))REnd If <=cmdDelCtrlMode fy cmUp(Dow'5OK6Sub Private*  (JWithbutConfirm8*.EnableBdTrue$Els Fa 3P gublic Function (Ocx2tainer As Object) '̻ ģC%Di`m ctlA roZTypeNString For EaDchIn I.s A9I= >(_ Y "Tex" OrA#= "Combo"̪.C "G!NNCSOTX Queue(lstO/A@Ĺ,HiInteger GKi@0 To BCount <- -(i, 0) i + , iC2OK g_C@Dk\3tmpMarkQ=lngTmpB oE@UnlockDoc 'A Fil"$# I5ms01_ͼƬƬ" &#ɈRemoveItem S7< Cs~5= 8j=This!ument#"a.Range(.Book"("pic_i@nsert_!"F)c`d, g).*etC>- DGo@N`4 `> 9C= :Star#efI%$)A @C/(-'7 F> vOn ErrRes @ ##a},'.=ITˇŸ <PGv~O!I '"w,>:J2[LReplac 0>, "?". ͼš"S1\$= @ D$.Add HZW(OF %q `Cw` (.#!0Bc:%`hM!БPify܉Po11`txtAdPath.!"xyCDescp?@&;P @e ShowCurC|obem2R@efreshreT[Lr!@]%z 02`.Visie.1x t%! PscP|os pfsoNew xSys@s3SCh1ztrh, 1 trlƦ Z" s0 Exit3ؔ`FZ_}"a.`mFields(+ l"B d[`llt$Xcbl1HW}QEY1bInl@S@hapes(PLinkq at.SourceFull_W 2 2? CHelpIf =h`#.Get!#QN>)h;M#>  .JOeBei517ְaE"lseIf CurIndex = 1 Then  RangeStartPosThisDocument.Bookmarks("pic_insert_"").r.End +' pFormFi elds(+ lBound >OIfe 01_ͼƬ"< &2o -l 1+^(.~, 6)5.Add ("7)-~y 1NesultMe.Lis`tBox1,| 1+鈔InlineShapes(@Link*at.SourceFullN(ame$2$He lpTexA;"file=jfso`.GetFA(A)w";"YGJq.>]mK < &Ct32EN7%Ju'x ipe'.eas a WithLock Sub Pri vate  cmdModify_Click(PDim#wy As Longc ` r Intexger#@,E-c Exita txtDe(sc.d"LKMsg "дa", vbExclamation, "<ʾ(eA+;Unl%.A.r#q '_D2)FPicturePathc)32+ gK!,pTrima)` <> ".`Dir_ANJQStri!R$ai=>Hh5F_^ _ ;= getNoq5cQ.EqHChe ckj(Now.yymmddhhmmss"bdExtenddE)) '(QgQesr2& "\qju{mj|.?%X0)Co pyi,t, LCase(d<dFļڣECriticalE [IGYH5/?#03dr0.0T 't0;Km=P 6> 0=ߩ+QwOe v3xoSIb¯`v$B ])O wK .{uOosOr߰>+יQ󟛾Up/1b"250!eNew [SystemObjefc<ChT 0 ThenBStartP,os1Q"T01_ͼƬ՘Ƭ().`E+Else <="r07 ImageyfPi cture@ Load5, g!ToB=,y FrcmdDelCtrl3Modefy'cmUpDow$@OK1sst5@4c@xContarDZ07) '1 еת Уǰ@Ta3actlqOS =   j_ md_!( 0)PN Z,u,_9ify=7 . * 8o ^ B6? 0t52$We]l.Enabled = False End( If 0?enJ Selected(0)TruGu CurAndexIF@T" Frm K4'iAInteger B With6c8mbi@@D .C8lea P i1 To 20 P "ͼ " & iNext-A0_fld/FrE5EIP7%pwntO>JKI = CNF(iQ`_inutn_SR!,d)TA g&b(EGJ4AHff*s(i +?j1j$ a.A&5$[ - 1"l(gn1$TO2 G1InlineSh apes(Linka&at.SourceFullDža^7!ָQueryClose(CancelV, Mod\.jNothàLockm     !"#$%&')*+,-./0123456789:;<=>?@BCDEFGHIJKLMNOPRSTUVWXYZ[\]^_`abcefghjlnopqstuvwxyz{|}~(c(RightZ, 1d))63(SL,en 0WDoc(yLefP-/ ,!VLoop [ 2ZI[oU;` EnddO|GetPureResulRObjzFormFieldN~With~ CMX.TypA7nGx )Range.Texdt) ExNElseI1B[...  .%8'  v file_insert_mark &%!!B@..A@foAttribute VB_Name = "modInsertFile" Sub @(sXPat@h As S~n`g) 'J Macro& 2016-3-3 shenao ¼D> D@im fsoQcripting.gSystemObject*UnlockDocSet\= New U+=.Ge4{vYThis4ument.Bookmarks("f_i_ ").Range.InlineShapes.AddOLEnL4:= _.3I, LinkTo_:=False, DisplayAsIcon`:=Tru Index:=0, Label:==CLoth @cLUEnd  `xME+`@i+iH`(`Y  B .&8`px B xN"ַ,ReturnValue = ͼ;ͼ# &!! ' $ 'kix`marks01_ͼƬƬ'marks01_ͼƬƬ'i( AAttribute VB_Name = "modTreeInterFace" Option Explicit @ Pub, Func6 d(`al ByRef ReturnValue As "Sng) ',88 fͼ;#" & ThisDocument.FormFields.Count - 1EIf Not IsNull(2) en7 6 >End pIf GetMarkBody-4D"m&s01_ͼƬƬՁZ6 Z,H, '@>} K<,R KQ_|$4cmdOK9'$4cmdQuitA',2<Label2t+, 4cmbAlterType , 2@Label5tP , 4cmbEvdFilese ,2<Label6t, 4cmbReasonese $4 cmbItem1, 4cmbGroupType E $0 TextBox2$0 TextBox30$4 cmbItem2 ,0 CommandButton1/@,0CommandButton25E( hCheckBox1tto(,2<Label7m2 ( dCheckBox2ttow($"!Frame1m2/$dListBox1k (nx [qu"[SO(S m[qu"[SO , SfyvioN>5"[SOAH(7{5"[SO$,feNy{|>5"[SOAH(7{5"[SO , Sft1uioN>5"[SOAH(7z5"[SOo%Qi34# n```,C `,C fd/o"$XAH( {5"[SOAH({5"[SOH({5"[SOH({5"[SOAH( {5"[SO(mR{u"[SO( Rd{u"[SOLG< F0 Xf NS_NN]hQ~{W[bvz5"[SO , R~{|+RioN>5"[SOHG<F0 XfQwQ]~{W[bvz5"[SO`G5"[SO@H, ' } 3uNOo`+RR KQ_(#1db {,$2<Label8x41$%0TextBox4g >('2<Label9x4  n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} AddSQR Caption = "༭¼Ŀ֤Ϣ" ClientHeight = 6420 ClientLeft = 45 ClientTop @Hzj<cmbEvdFiles><0>SfSfNVM|vXf_10010401;SfSfNvXf_10010402;SfNXf_10010404;SfSfNXf_10010409;NfeN YpSN_10010422;vQNfeNSfN _10010427;</0><1>{v{tbl?eQwQvsQNNNUSMOb>yOVSOf TvfeN_10010403;]FU{tQwQvsQNONf TvfeN_10010405;]FUL?e{tQwQvON~~b__9eSvfeN_10010406;lQ:gsQf~bNTl0WMOvlQfN_10010407;sQNSf3uNVM|vXf_10010408;sQNf9eY TvXf_10010410;FUR蕀b/gQwQvb/gQSf_10010412;7bM|{tQwQvf_10010413;RvSfTONlQzvSfTTON%Ngbgq YpSN_10010414;4xNn{v~"NRM`Qf_10010416;ONlvfeN_10010417; N~;N{~{SvfeN_10010418; N~;N{\OQv9eSON~~b__vyb:y_10010419;N)R3uCgbN)RCglT T_10010420;NfeNvlQeN_10010421;NfeN YpSN_10010422;SeS_NN~{W[bvzv`NT T_10010423; gsQlQSTv^bRzvfeN_10010425;N)R3uCgbN)RCglyOSblT T_10010426;sQN9eckы TvXf_10010428;vQNfeN_10010429;</1><2>d/SYXbf_10010415;</2></cmbEvdFiles> <cmbReason><0>Y TfNQ_11;f9e-Neы T_12;bSfN_13;vQN_14;,{NSfNVM|_15;,{NSfNNfeNSx_16;Y TfNQ_17;f9e-Neы T_18;ob0bSfN_19;vQN_20;SfNz^_21;</0><1>Y TfNQ_22;f9eY T_23;f9eY T_23;ONf T_24;NNUSMOb>yOVSOf T_25;:gsQlNf T_26;YVN0YVONbYVvQN~~f9e-Neы T_27;_28;;N{f_29;lT T_30;`N_31;~b_32;ONTv^bRz_33;ONl_34;ON4xNbVS_35;ON~~b__9eSvf_36;9eSON~~b__vyb:yI{_37;vQN_38;VM|/lQV[0W:S kXQ_39;VM|/lQV[0W:S Sf_40;</1><2>d/SYXb_41;SfNt:gg_42;</2></cmbReason> <cmbGroupType>;20_SfN;21_SfN-Neы T;22_SfMRSfN;23_SfTSfN;24_NXTOo`;25_3uNbN)RCgNSf ;1_~bN;2_le;3_SfT3uN;4_SfMR3uN;5_"N~be;6_b/gۏSe;7_b/gQSe;8_b/gcOe;9_~bN;10_4xNe;11_3uNbN)RCgN;12_3uNbN)RCgNTv^/Rz;13_SN;14_S`N;15_Y T;16_`NN;17_lN;18_YXbOo`;19_3uNbN)RCgNNt ;</cmbGroupType> <cmbItems>;1_^S;2_f TMR Ty;3_f TT Ty;4_SfMRVM|;5_SfTVM|;6_Y Tb Ty;7_b/gQSe;8_NfeNNS;9_N)RNt:ggNx;10_N)RNt:gg Ty;13_^S;14_Y T;15_SfMRY T;16_SfTY T;17_SfMRVM|;18_SfTVM|;19_NfeNSx;99_XfQwQ]~{W[bvz;98_Xf NS_NN]hQ~{W[bvz</cmbItems> <Relation> <cmbEvdFiles>10010405_11,99;10010413_11,99;10010403_11,99;10010418_11,99;10010417_2,98;10010425_12,99;10010416_10,5,99;10010407_1,9,99;10010421_11,99;10010423_16,14,98;10010412_6,8,7,99;10010428_11,98;10010426_17,13,98;10010406_11,99;10010419_11,99;10010408_11,98;10010410_11,98;10010414_11,99;10010420_17,13,98;10010422_15,98;10010429_4,3,99;10010401_20,98;10010402_20,98;10010404_21,98;10010409_22,23,25,98;10010422_24,98;10010427_22,23,98;10010415_18,19,98;</cmbEvdFiles> </Relation> <Relation1> 1001040511_1,2,3;1001041311_1,2,3;1001040311_1,2,3;1001041811_1,2,3;100104172_1,2;1001042512_1,2,3;1001041610_1,2;100104165_1,3;100104071_1,2;100104079_1,3;1001042111_1,6,8;1001042316_1,2;1001042314_1,3;100104126_1,3;100104128_1,2;100104127_7;1001042811_1,2,3;1001042617_1,2;1001042613_1,3;1001040611_1,2,3;1001041911_1,2,3;1001040811_1,6,4,5;1001041011_1,2,3;1001041411_1,3;1001042017_1,2;1001042013_1,3;1001042215_1,6,8;100104294_1,2;100104293_1,3;1001040120_13,14,17,18;1001040220_13,15,16;1001040421_13,15,16;1001040922_13,15;1001040923_13,16;1001040925_1,6;1001042224_13,14,19;1001042722_13,15;1001042723_13,16;1001041518_9,10;1001041519_1,6; </Relation1>v*5"[SO , 3uNRh>5"[SOH,{5"[SO , 3uNRh>5"[SOCompObjipCompObj!&kaVBFramem4PROJECTr = 435 ClientWidth = 10890 StartUpPosition = 1 ' TypeInfoVer = 62 End ID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Module=modDya Module=fileDialog Module=modPub BaseClass=frmAddPicture Module=ShowForm Module=NewXml Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} Module=modTreeInterFace Module=modChrProcess Module=modDelFile Module=modLoadTif Module=modInterFace Module=modPic Module=NewMacros Module=modString BaseClass=AddSQR Module=modInsertFile HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="9D9F31D44F7753775372587258" DPB="3C3E9075B009CD09CDF6330ACDEA55A25F025189875B65EA5FE4D69502ED563A0AA2C9CDAD67" GC="DBD9771A171B171B17" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={000209F2-0000-0000-C000-000000000046};Word8.0;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C modDya=0, 0, 0, 0, C fileDialog=0, 0, 0, 0, C modPub=0, 0, 0, 0, C frmAddPicture=0, 0, 0, 0, C, 25, 25, 1061, 693, C ShowForm=0, 0, 0, 0, C NewXml=0, 0, 0, 0, C modTreeInterFace=0, 0, 0, 0, C modChrProcess=0, 0, 0, 0, C modDelFile=0, 0, 0, 0, C modLoadTif=0, 0, 0, 0, C modInterFace=0, 0, 0, 0, C modPic=0, 0, 0, 0, C NewMacros=0, 0, 0, 0, C modString=0, 0, 0, 0, C AddSQR=0, 0, 0, 0, C, 50, 50, 1086, 718, C modInsertFile=0, 0, 0, 0, C ҋB `PROJECTlk')PROJECTwm*$frmAddPicture,`,C `,C fThisDocumentThisDocumentmodDyamodDyafileDialogfileDialogmodPubmodPubfrmAddPicturefrmAddPictureShowFormShowFormNewXmlNewXmlmodTreeInterFacemodTreeInterFacemodChrProcessmodChrProcessmodDelFilemodDelFilemodLoadTifmodLoadTifmodInterFacemodInterFacemodPicmodPicNewMacrosNewMacrosmodStringmodStringAddSQRAddSQRmodInsertFilemodInsertFile(H  (@K}HR KQ_T$ #Frame1x4>>$#Frame2x4$> (H  ( }"t @ ( 4butCancele( 28Label1zz( 28Label2zzF4 4txtPicturePath2xtP( o+1i09/ n```,C `,C fo.00butBrowserPaA( <butConfirmPa+$<cmdUp2zzy $ <cmdDelzz$!< cmdDownz( "< cmdModifymPa$#4 cmdClear$(0 txtDescr+0XListBox1path=2;1+;  ( Q{u"[SO,VGrc>5"[SO,VGrMOn>5"[SOH({7 @"[SO(Omȉ{u"[SO,m Rn{w @"[SO, N yn{w @"[SO,y dn{w @"[SO, N yn{w @"[SO,O 9e{w @"[SO(n zz{u"[SOH({5"[SO`5"[SO n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q(H  '}"tX$lQ Image1x4('1lQ Image2x4 CompObjpi18-53 n```,C `,C fo24آ      !"#$%&'()*+,-./0123456789< -!IR KQlt:"DFI0 S$I)I$JTI%)$IJI$RI$I%)T<D%u5ݮ25|&OU!`OIHD-D\)>#"?Ip[ǁRD:3J4 TI%)$IJI$RI$I%1裵~%;p4斝$AI쥷;熹$s+pB&]QLa1jI(9 p+ *$h> [>%E +TI%)$IJI$RI$I%9S#k 4h98A ?K*omHjd#: ?@c;OVmxe,"xYF܊g#:z񐏚?bgE(;82<舘> S)3wOu`G2cSW2`Tʩ$ꤗʩ$ꤗʩ$ꤗʩ$ꤗʩ$W3!.- ;{m_I%?L]7ԛ um?$·@|q{ϓҝx-myUHw_*t)c o7/KEh3oK,un"jVI Photoshop 3.08BIM%8BIMHH8BIM&?8BIM x8BIM8BIM 8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM8BIM 8BIM08BIM-  8BIM@@8BIM8BIM?,g*h-1,nullboundsObjcRct1Top longLeftlongBtomlong,RghtlongslicesVlLsObjcslicesliceIDlonggroupIDlongoriginenum ESliceOrigin autoGeneratedTypeenum ESliceTypeImg boundsObjcRct1Top longLeftlongBtomlong,RghtlongurlTEXTnullTEXTMsgeTEXTaltTagTEXTcellTextIsHTMLboolcellTextTEXT horzAlignenumESliceHorzAligndefault vertAlignenumESliceVertAligndefault bgColorTypeenumESliceBGColorTypeNone topOutsetlong leftOutsetlong bottomOutsetlong rightOutsetlong8BIM( ?8BIM 8BIM xJFIFHH Adobe_CMAdobed            x" ?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?TI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$oƂJ&$ܺ>:"DFI0 S$I)I$JTI%)$IJI$RI$I%)T<D%u5ݮ25|&OU!`OIHD-D\)>#"?Ip[ǁRD:3J4 TI%)$IJI$RI$I%1裵~%;p4斝$AI쥷;熹$s+pB&]QLa1jI(9 p+ *$h> [>%E +TI%)$IJI$RI$I%9S#k 4h98A ?K*omHjd#: ?@c;OVmxe,"xYF܊g#:z񐏚?bgE(;82<舘> S)3wOu`G2cSW2`Tʩ$ꤗʩ$ꤗʩ$ꤗʩ$ꤗʩ$W3!.- ;{m_I%?L]7ԛ um?$·@|q{ϓҝx-myUHw_*t)c o7/KEh3oK,un"jVI8BIM!UAdobe PhotoshopAdobe Photoshop CS38BIMhttp://ns.adobe.com/xap/1.0/ XICC_PROFILE HLinomntrRGB XYZ  1acspMSFTIEC sRGB-HP cprtP3desclwtptbkptrXYZgXYZ,bXYZ@dmndTpdmddvuedLview$lumimeas $tech0 rTRC< gTRC< bTRC< textCopyright (c) 1998 Hewlett-Packard CompanydescsRGB IEC61966-2.1sRGB IEC61966-2.1XYZ QXYZ XYZ o8XYZ bXYZ $descIEC http://www.iec.chIEC http://www.iec.chdesc.IEC 61966-2.1 Default RGB colour space - sRGB.IEC 61966-2.1 Default RGB colour space - sRGBdesc,Reference Viewing Condition in IEC61966-2.1,Reference Viewing Condition in IEC61966-2.1view_. \XYZ L VPWmeassig CRT curv #(-27;@EJOTY^chmrw| %+28>ELRY`gnu| &/8AKT]gqz !-8COZfr~ -;HUcq~ +:IXgw'7HYj{+=Oat 2FZn  % : O d y  ' = T j " 9 Q i  * C \ u & @ Z t .Id %A^z &Ca~1Om&Ed#Cc'Ij4Vx&IlAe@e Ek*Qw;c*R{Gp@j>i  A l !!H!u!!!"'"U"""# #8#f###$$M$|$$% %8%h%%%&'&W&&&''I'z''( (?(q(())8)k))**5*h**++6+i++,,9,n,,- -A-v--..L.../$/Z///050l0011J1112*2c223 3F3334+4e4455M555676r667$7`7788P8899B999:6:t::;-;k;;<' >`>>?!?a??@#@d@@A)AjAAB0BrBBC:C}CDDGDDEEUEEF"FgFFG5G{GHHKHHIIcIIJ7J}JK KSKKL*LrLMMJMMN%NnNOOIOOP'PqPQQPQQR1R|RSS_SSTBTTU(UuUVV\VVWDWWX/X}XYYiYZZVZZ[E[[\5\\]']x]^^l^__a_``W``aOaabIbbcCccd@dde=eef=ffg=ggh?hhiCiijHjjkOkklWlmm`mnnknooxop+ppq:qqrKrss]sttptu(uuv>vvwVwxxnxy*yyzFz{{c{|!||}A}~~b~#G k͂0WGrׇ;iΉ3dʋ0cʍ1fΏ6n֑?zM _ɖ4 uL$h՛BdҞ@iءG&vVǥ8nRĩ7u\ЭD-u`ֲK³8%yhYѹJº;.! zpg_XQKFAǿ=ȼ:ɹ8ʷ6˶5̵5͵6ζ7ϸ9к<Ѿ?DINU\dlvۀ܊ݖޢ)߯6DScs 2F[p(@Xr4Pm8Ww)KmAdobed@      ,2  s!1AQa"q2B#R3b$r%C4Scs5D'6Tdt& EFVU(eufv7GWgw8HXhx)9IYiy*:JZjzm!1AQa"q2#BRbr3$4CS%cs5DT &6E'dtU7()󄔤euFVfvGWgw8HXhx9IYiy*:JZjz ?v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*U/UI$mB%$+#1:n1UuI'8!onLUeվG_v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*U'>^E'xjwQJ1RFtff'! F4Z3(@q%.,:Ӹ<&[%OvyhBõi:-9FREsrێ)D- Պ*YˆWb]v*Uثv*UثWb]v*UثWb]v*UثWb]v*;FSOXntAwT24}hJWyb [Th^"E\x»lL[hƔY+cJMrBHXFJ&03yFGqP;HZlrN^>z>?1Eͣj~lZ%'Lbtiց$R?KGyW=7.A;(̆lsd 0_LSm_ O}w4?bBaͿw1Tt2zʻuibv*UثWb]v*UثWb]v*UثWb]v*jDXe;2]n@Kſdq>CN=Aߣ퇉ץmp18DaHrVbؘ4~+`BG%Lǒ*f?l6e(jv#l6[Ԁ)5BXa.aǫE"w4( ǖ?kP0̖OA<2|E~r6lg&jvm u?ĩD#9a)w*hoRE9:/?y8v*UثWb]v*UثWb]v*UثWb]v*߽dDUU!(TCxKJ"# O Dxch0Zao퍰0Zbl /l-R$$()4^ ZPH%mf*e=VaA!A%hPe TY)YdΛ ]eNFsMB:pᏞJ>\P"1Wv*UثWb]v*UثWb]v*UثWb]v*+~ <Ԛ'Q͋kc*-*hA[LX0+ 1Sh`c,j Z%;GS%md)2a$({d!< x4Ɇ!Dnd`4M gdeQzBf69yYN*v*UثWb]v*UثWb]v*UثWb]Z~UE% Uok}%F(MiC^y.  d qドEMbbS !i >m qKJclH[ 1XWzak0C4G& L/lD(XAj0Ph\LLbbh@2VҠjVXJ23C4|3A^,ǹ5OL?⨜Uv*UثWb]v*UثWb]v*UثWb]B7wڊ>UjhCJT)0 Z2 z!9MƩf̀PI$tڝrl!`!B|""N^cR&Es6E1R˜m0!aX08W2dk0Qh`(4y+k0RhY`hV $y XZ$4{F65?cjϲ.-:PQ3 vW";ug'v*UثWb]v*UثWb]v*UثWb]Ku>lV*+ x0~a%j,JGeM: 3'@MQ]eh1'[IvfIA@vLpn~m` ӥZYU?>ּD 1q]^ul+DE<lg*r8v*UثWb]v*UثWb]v*UثWb]InϩpTvqTy): { h7q E:rZN@wey1tXgYѵ6ݢZ+5nJ|OU]699K^XCN,z58K JT@_m9l6 ֜X#[VLV+E& Y߄T P% LE/ura;Ui1(9#'u֕'r 'rm2K??Dv*UثWb]v*UثWb]v*UثWb]H>3݋sTƵ_CZ.>XR-0E\[v?QB|<7*J¬ư<@I9-)zjU%@ o X†TWv X PBBN"$t9&(:W|12LуӐ$e@.@#™L&3O՘s}%bbWR(KO'5iV?NJ'v*UثWb]v*UثWb]v*UثWb]?dnv^yB]?Juf& c=ZsȈĬ-'F`M3E z#Dmîɵ%c :#ݘ,Og4;* ^5?!2=Wd}l1v^摿$puU05̈́2FbAA*FXĆ\V4QN+M<+WŐഈB,b)ᅉBgZ>ĵJ"rF04M$huڀ팥,pV~oAfF>o጗Tg"ډ_v*UثWb]v*UثWb]v*UثWb]/ڑ;~x?v˨vWi@iN߀rjɻ nbj=كOGŒ%OadW&yҢ\Ɩ2a0I j3!\3wQ1SH.n? @)`n&u vڹq/W-POMm?Ͷ֐(1XNa\.9mxp%25hXlæVq0F~确KG !u6Xҧ p-#bn@)=U,ũ*J23!3XI'O2""C`Sh|pkW)_f >fv۔RA9xLl_07Qݐ2a(RJƆMS2X%Ǽ19.=VP8\s*3!^4CL_17̈eh+Ds5fiS~$f6L&yJJV w O._/kw-hEr@.q"۰YgoDv*UثWb]v*UثWb]v*UثWb]v*U$"z. lPy>xhU#-Bc9pxLy3 O;ݡp*Q]NJ8\ !a[.-Yh7fc#ɘ33&=Ẅ3j]/" Q˦壂|K -M ۋ } JdN'KԣmȔ?7sQӞv^dMC_*9Aܔ6)S*8chCF+Pb]MI땜("u? p-*TH†VQI8IF\L'{nH;c{|%ƹjzmygU̽$}cn ZJJn̽`29叩N3\02MkP.TTImӊ6<O9"qWv*UثWb]v*UثWb]v*UثWb]v*Uj>0?m*_#G8C.9*;~>j_RI&;~kW+8Jj j AvkխJV$?,er%1>ºT]Y8G4c u?@ˣhKk2Y1g*E:HyGP:3zǗn#2_j 2l⌐~OXf?n?%[k Y$mT}S8^ȞfA z p b2^[H~4#K?N?hSlG,iWm43SG˰ÇvQiOVef$RƦꪸW cqԓa?ʷg֓Cc{mX؉_v*UثWb]v*UثWb]v*UثWb]v*U# IaJS"1T9ՂD ii+ ` m@Ƃo?ՊD xBƃ%8Gr8c:wXHDŽw/o?Io"F<#x#zY`#/{:zvDŽw/F[حib-4$9+zS1cOL)w!t>LU U`F*_ygDtH *)A`o?,;c't%o$4JE=)\h72D72$Aih(tZȁ-] ihdXc Y`TN*_v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]wϦ* U/o^uSUثWb_ -!IR KQlt:"DFI0 S$I)I$JTI%)$IJI$RI$I%)T<D%u5ݮ25|&OU!`OIHD-D\)>#"?Ip[ǁRD:3J4 TI%)$IJI$RI$I%1裵~%;p4斝$AI쥷;熹$s+pB&]QLa1jI(9 p+ *$h> [>%E +TI%)$IJI$RI$I%9S#k 4h98A ?K*omHjd#: ?@c;OVmxe,"xYF܊g#:z񐏚?bgE(;82<舘> S)3wOu`G2cSW2`Tʩ$ꤗʩ$ꤗʩ$ꤗʩ$ꤗʩ$W3!.- ;{m_I%?L]7ԛ um?$·@|q{ϓҝx-myUHw_*t)c o7/KEh3oK,un"jVI Photoshop 3.08BIM%8BIMHH8BIM&?8BIM x8BIM8BIM 8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM8BIM 8BIM08BIM-  8BIM@@8BIM8BIM?,g*h-1,nullboundsObjcRct1Top longLeftlongBtomlong,RghtlongslicesVlLsObjcslicesliceIDlonggroupIDlongoriginenum ESliceOrigin autoGeneratedTypeenum ESliceTypeImg boundsObjcRct1Top longLeftlongBtomlong,RghtlongurlTEXTnullTEXTMsgeTEXTaltTagTEXTcellTextIsHTMLboolcellTextTEXT horzAlignenumESliceHorzAligndefault vertAlignenumESliceVertAligndefault bgColorTypeenumESliceBGColorTypeNone topOutsetlong leftOutsetlong bottomOutsetlong rightOutsetlong8BIM( ?8BIM 8BIM xJFIFHH Adobe_CMAdobed            x" ?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?TI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$IJI$RI$I%)$IOTI%)$IJI$RI$I%)$oƂJ&$ܺ>:"DFI0 S$I)I$JTI%)$IJI$RI$I%)T<D%u5ݮ25|&OU!`OIHD-D\)>#"?Ip[ǁRD:3J4 TI%)$IJI$RI$I%1裵~%;p4斝$AI쥷;熹$s+pB&]QLa1jI(9 p+ *$h> [>%E +TI%)$IJI$RI$I%9S#k 4h98A ?K*omHjd#: ?@c;OVmxe,"xYF܊g#:z񐏚?bgE(;82<舘> S)3wOu`G2cSW2`Tʩ$ꤗʩ$ꤗʩ$ꤗʩ$ꤗʩ$W3!.- ;{m_I%?L]7ԛ um?$·@|q{ϓҝx-myUHw_*t)c o7/KEh3oK,un"jVI8BIM!UAdobe PhotoshopAdobe Photoshop CS38BIMhttp://ns.adobe.com/xap/1.0/ XICC_PROFILE HLinomntrRGB XYZ  1acspMSFTIEC sRGB-HP cprtP3desclwtptbkptrXYZgXYZ,bXYZ@dmndTpdmddvuedLview$lumimeas $tech0 rTRC< gTRC< bTRC< textCopyright (c) 1998 Hewlett-Packard CompanydescsRGB IEC61966-2.1sRGB IEC61966-2.1XYZ QXYZ XYZ o8XYZ bXYZ $descIEC http://www.iec.chIEC http://www.iec.chdesc.IEC 61966-2.1 Default RGB colour space - sRGB.IEC 61966-2.1 Default RGB colour space - sRGBdesc,Reference Viewing Condition in IEC61966-2.1,Reference Viewing Condition in IEC61966-2.1view_. \XYZ L VPWmeassig CRT curv #(-27;@EJOTY^chmrw| %+28>ELRY`gnu| &/8AKT]gqz !-8COZfr~ -;HUcq~ +:IXgw'7HYj{+=Oat 2FZn  % : O d y  ' = T j " 9 Q i  * C \ u & @ Z t .Id %A^z &Ca~1Om&Ed#Cc'Ij4Vx&IlAe@e Ek*Qw;c*R{Gp@j>i  A l !!H!u!!!"'"U"""# #8#f###$$M$|$$% %8%h%%%&'&W&&&''I'z''( (?(q(())8)k))**5*h**++6+i++,,9,n,,- -A-v--..L.../$/Z///050l0011J1112*2c223 3F3334+4e4455M555676r667$7`7788P8899B999:6:t::;-;k;;<' >`>>?!?a??@#@d@@A)AjAAB0BrBBC:C}CDDGDDEEUEEF"FgFFG5G{GHHKHHIIcIIJ7J}JK KSKKL*LrLMMJMMN%NnNOOIOOP'PqPQQPQQR1R|RSS_SSTBTTU(UuUVV\VVWDWWX/X}XYYiYZZVZZ[E[[\5\\]']x]^^l^__a_``W``aOaabIbbcCccd@dde=eef=ffg=ggh?hhiCiijHjjkOkklWlmm`mnnknooxop+ppq:qqrKrss]sttptu(uuv>vvwVwxxnxy*yyzFz{{c{|!||}A}~~b~#G k͂0WGrׇ;iΉ3dʋ0cʍ1fΏ6n֑?zM _ɖ4 uL$h՛BdҞ@iءG&vVǥ8nRĩ7u\ЭD-u`ֲK³8%yhYѹJº;.! zpg_XQKFAǿ=ȼ:ɹ8ʷ6˶5̵5͵6ζ7ϸ9к<Ѿ?DINU\dlvۀ܊ݖޢ)߯6DScs 2F[p(@Xr4Pm8Ww)KmAdobed@      ,2  s!1AQa"q2B#R3b$r%C4Scs5D'6Tdt& EFVU(eufv7GWgw8HXhx)9IYiy*:JZjzm!1AQa"q2#BRbr3$4CS%cs5DT &6E'dtU7()󄔤euFVfvGWgw8HXhx9IYiy*:JZjz ?v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*U/UI$mB%$+#1:n1UuI'8!onLUeվG_v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*U'>^E'xjwQJ1RFtff'! F4Z3(@q%.,:Ӹ<&[%OvyhBõi:-9FREsrێ)D- Պ*YˆWb]v*Uثv*UثWb]v*UثWb]v*UثWb]v*;FSOXntAwT24}hJWyb [Th^"E\x»lL[hƔY+cJMrBHXFJ&03yFGqP;HZlrN^>z>?1Eͣj~lZ%'Lbtiց$R?KGyW=7.A;(̆lsd 0_LSm_ O}w4?bBaͿw1Tt2zʻuibv*UثWb]v*UثWb]v*UثWb]v*jDXe;2]n@Kſdq>CN=Aߣ퇉ץmp18DaHrVbؘ4~+`BG%Lǒ*f?l6e(jv#l6[Ԁ)5BXa.aǫE"w4( ǖ?kP0̖OA<2|E~r6lg&jvm u?ĩD#9a)w*hoRE9:/?y8v*UثWb]v*UثWb]v*UثWb]v*߽dDUU!(TCxKJ"# O Dxch0Zao퍰0Zbl /l-R$$()4^ ZPH%mf*e=VaA!A%hPe TY)YdΛ ]eNFsMB:pᏞJ>\P"1Wv*UثWb]v*UثWb]v*UثWb]v*+~ <Ԛ'Q͋kc*-*hA[LX0+ 1Sh`c,j Z%;GS%md)2a$({d!< x4Ɇ!Dnd`4M gdeQzBf69yYN*v*UثWb]v*UثWb]v*UثWb]Z~UE% Uok}%F(MiC^y.  d qドEMbbS !i >m qKJclH[ 1XWzak0C4G& L/lD(XAj0Ph\LLbbh@2VҠjVXJ23C4|3A^,ǹ5OL?⨜Uv*UثWb]v*UثWb]v*UثWb]B7wڊ>UjhCJT)0 Z2 z!9MƩf̀PI$tڝrl!`!B|""N^cR&Es6E1R˜m0!aX08W2dk0Qh`(4y+k0RhY`hV $y XZ$4{F65?cjϲ.-:PQ3 vW";ug'v*UثWb]v*UثWb]v*UثWb]Ku>lV*+ x0~a%j,JGeM: 3'@MQ]eh1'[IvfIA@vLpn~m` ӥZYU?>ּD 1q]^ul+DE<lg*r8v*UثWb]v*UثWb]v*UثWb]InϩpTvqTy): { h7q E:rZN@wey1tXgYѵ6ݢZ+5nJ|OU]699K^XCN,z58K JT@_m9l6 ֜X#[VLV+E& Y߄T P% LE/ura;Ui1(9#'u֕'r 'rm2K??Dv*UثWb]v*UثWb]v*UثWb]H>3݋sTƵ_CZ.>XR-0E\[v?QB|<7*J¬ư<@I9-)zjU%@ o X†TWv X PBBN"$t9&(:W|12LуӐ$e@.@#™L&3O՘s}%bbWR(KO'5iV?NJ'v*UثWb]v*UثWb]v*UثWb]?dnv^yB]?Juf& c=ZsȈĬ-'F`M3E z#Dmîɵ%c :#ݘ,Og4;* ^5?!2=Wd}l1v^摿$puU05̈́2FbAA*FXĆ\V4QN+M<+WŐഈB,b)ᅉBgZ>ĵJ"rF04M$huڀ팥,pV~oAfF>o጗Tg"ډ_v*UثWb]v*UثWb]v*UثWb]/ڑ;~x?v˨vWi@iN߀rjɻ nbj=كOGŒ%OadW&yҢ\Ɩ2a0I j3!\3wQ1SH.n? @)`n&u vڹq/W-POMm?Ͷ֐(1XNa\.9mxp%25hXlæVq0F~确KG !u6Xҧ p-#bn@)=U,ũ*J23!3XI'O2""C`Sh|pkW)_f >fv۔RA9xLl_07Qݐ2a(RJƆMS2X%Ǽ19.=VP8\s*3!^4CL_17̈eh+Ds5fiS~$f6L&yJJV w O._/kw-hEr@.q"۰YgoDv*UثWb]v*UثWb]v*UثWb]v*U$"z. lPy>xhU#-Bc9pxLy3 O;ݡp*Q]NJ8\ !a[.-Yh7fc#ɘ33&=Ẅ3j]/" Q˦壂|K -M ۋ } JdN'KԣmȔ?7sQӞv^dMC_*9Aܔ6)S*8chCF+Pb]MI땜("u? p-*TH†VQI8IF\L'{nH;c{|%ƹjzmygU̽$}cn ZJJn̽`29叩N3\02MkP.TTImӊ6<O9"qWv*UثWb]v*UثWb]v*UثWb]v*Uj>0?m*_#G8C.9*;~>j_RI&;~kW+8Jj j AvkխJV$?,er%1>ºT]Y8G4c u?@ˣhKk2Y1g*E:HyGP:3zǗn#2_j 2l⌐~OXf?n?%[k Y$mT}S8^ȞfA z p b2^[H~4#K?N?hSlG,iWm43SG˰ÇvQiOVef$RƦꪸW cqԓa?ʷg֓Cc{mX؉_v*UثWb]v*UثWb]v*UثWb]v*U# IaJS"1T9ՂD ii+ ` m@Ƃo?ՊD xBƃ%8Gr8c:wXHDŽw/o?Io"F<#x#zY`#/{:zvDŽw/F[حib-4$9+zS1cOL)w!t>LU U`F*_ygDtH *)A`o?,;c't%o$4JE=)\h72D72$Aih(tZȁ-] ihdXc Y`TN*_v*UثWb]v*UثWb]v*UثWb]v*UثWb]v*UثWb]wϦ* U/o^uSUثWb_CompObjpCompObj6aVBFrameNCompObjm n``Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.19q Microsoft Forms 2.0 FormEmbedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmAddPicture Caption = "༭ͼƬƬ" ClientHeight = 4605 ClientLeft = 45 ClientTop = 360 ClientWidth = 10530 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 75 End   FMicrosoft Office Word ĵ MSWordDocWord.Document.89q