ࡱ>  ~Avavms Rbjbjss@%6 6 DCDl"t g'4''C)-0><\Ajq$!!!!!!$$'!JD--JDJD!'C)"EEEJD|'C)jEJDjEE:J,RJ'qD|>J V"0"HJ 0(BE|0(RJ0(RJJDJDEJDJDJDJDJD!!EJDJDJD"JDJDJDJD0(JDJDJDJDJDJDJDJDJD6  E:  cgq laNy cknxkXQ,ghThdkFhQ[1uV[wƋNCg@\kXQ eq \o\ac(%,5)N)RNt:ggHhwSS FORMTEXT       eq \o\ac(%,1)V[3uS eq \o\ac(%,6)VE3uS FORMTEXT       eq \o\ac(%,7)VE3ue FORMTEXT       eq \o\ac(%,2)Ne eq \o\ac(%,8)OHQCge FORMTEXT       eq \o\ac(%,9)VElQ^S FORMTEXT       eq \o\ac(%,3)9Q[yb eq \o\ac(%,10)VElQ^e FORMTEXT       eq \o\ac(%,11)VElQ^ eq \o\ac(%,4)cSSx eq \o\ac(%,12)Sf Ty FORMTEXT       eq \o\ac(%,13)SfNSfN1 FORMTEXT       FORMCHECKBOX  NlQ^Y TSfN2 FORMTEXT       FORMCHECKBOX  NlQ^Y T eq \o\ac(%,14),{NSfNVM| CONTROL Forms.ComboBox.1 \s E\lNNSx  FORMTEXT        eq \o\ac(%,15) 3u N3uN (1)Y Tb Ty FORMTEXT      3uN{|W CONTROL Forms.ComboBox.1 \s E\lNNSxb~N>yOO(uNx/~~:ggNx  FORMTEXT        FORMCHECKBOX Bl9QN][b9QDyOO(uNx/~~:ggNx FORMTEXT        FORMCHECKBOX Bl9QN][b9QDhe6OJQJjhe6OJQJUhe6CJ EHOJQJaJo(he6OJQJaJo(he6OJQJaJjhe6OJQJUaJ he65CJOJPJQJaJo(he6CJOJQJo(jhe6CJOJPJQJUj0he6CJOJPJQJUjvhe6CJOJPJQJUjhe6CJOJPJQJUjhe6CJOJPJQJUhe6CJOJPJQJaJo(.LNmggg$Ifzkd$$IfT0@*    0W44 laT $$Ifa$$Z$IfWD2`Za$     ( * 0 2 4 F H N P Z \ ^ r t v ùѪѝùѪ܎ùѪѹùѪjy he6OJQJUj he6OJQJUhe6CJOJQJaJo(he6CJ EHOJQJaJo(he6OJQJaJjhe6OJQJUaJhe6OJQJaJo(he6OJQJjhe6OJQJUjs he6OJQJU2 , . riic$If d$Ifkd $$IfTF@*      0W    44 laT. 0 \ riic$If d$Ifkd $$IfTF? @*    0W    44 laT  riic$If d$Ifkd $$IfTF? @*    0W    44 laT      " $ . 0 2 F H J T V X Z \ n p v x ºººŒº}Œjhe6OJQJUhe6OJQJmHnHsHtHjhe6OJQJUjhe6OJQJUhe6OJQJjhe6OJQJUjhe6OJQJUaJhe6CJ EHOJQJaJo(he6OJQJaJo(he6OJQJaJ1  0 X riic$If d$Ifkd$$IfTF? @*   0W    44 laT riic$If d$Ifkd$$IfTF? @*    0W    44 laT      ( * 0 2 : > @ T V ^ ` j l §韛xjhe6CJ EHOJQJaJjAhe6OJQJUhe6OJQJhe6CJ EHOJQJhe6jhe6Uhe6CJ EHOJQJaJo(jhe6OJQJUhe6OJQJaJo(he6CJ EHOJQJaJjhe6OJQJUaJhe6OJQJaJjhe6OJQJU)   < riic$If d$Ifkd$$IfTF? @*   0W    44 laT< > j rll$IfkdH$$IfTF? @*     0W    44 laT  }www$Ifx$Ifzkd$$IfT0? *0W44 laT    " ( * , . B D F P R T V r t v to he6o(he6CJ EHOJQJaJo(he6OJQJaJo(jhe6OJQJUaJj9he6OJQJUjhe6OJQJUhe6OJQJaJjhe6OJQJUjhe6OJQJUjhe6OJQJUhe6OJQJhe6OJQJo(( " , T ]UOOO$Ifx$Ifkd$$IfT4\ j*  0m44 laT  6 ]WWWWW$Ifkd$$IfT4\ j*   0m44 laT   $ & ( 2 4 8 : < > P R Z \ ` v BD˼جˣˣӣˇجأxlأ^jhe6OJQJUaJj he6OJQJUjI he6OJQJUVjhe6OJQJUhe6CJEHOJQJo(he6OJQJo(he6OJQJmHnHsHtHjshe6OJQJUhe6OJQJ he6o(jhe6OJQJUjhe6OJQJUjI he6OJQJUV$6 8 : ^ ` b f h _MDDDDD $$Ifa$$id$IfWD2`ia$kd$$IfT\? @*1  0W44 laTh j n p r v ~  d$If$If$If $$Ifa$  BJA;22 d$If$If $$Ifa$kd"$$IfT4r)]I$Y%40V44 UaTDXZ\fhvx@BDFbd̲ײ~rcWj(he6OJQJUjI he6OJQJUVjc&he6OJQJUjI he6OJQJUVhe6OJQJjhe6OJQJU!j$he6OJQJUaJhe6OJQJo(!j&$he6OJQJUaJhe6OJQJaJo(jhe6OJQJUaJ!j#he6OJQJUaJhe6OJQJaJ!HbTKEE$If $$Ifa$kdZ%$$IfT4\)]$ Y%4 0V44 UaT d$IfbA82$If $$Ifa$kd)$$IfT4r) ]$ Y%@  0V44 UaT d$IfLNPRZfh|~ǸϡxϓgUϓ"he6OJQJaJmHnHsHtH!j2he6OJQJUaJ!j0he6OJQJUaJhe6OJQJaJjhe6OJQJUaJhe6OJQJaJo(j.he6OJQJUjI he6OJQJUVhe6OJQJhe6OJQJo(jhe6OJQJUj9+he6OJQJUjI he6OJQJUV TTKE$If $$Ifa$kd,$$IfT4\) $ Y%0V44 UaT d$IfTVXZ]TNE d$If$If $$Ifa$kd/$$IfT4\)$ Y%0V44 UaTpgaXX d$If$If $$Ifa$kd1$$IfT4F)$ Y%0V    44 UaT*,.8:<DFZ\^hjvxz ťքŴuiʹZja9he6OJQJUj_6he6OJQJUjI he6OJQJUV!j5he6OJQJUaJhe6OJQJmHnHsHtHj5he6OJQJUjhe6OJQJU he6o(he6OJQJhe6OJQJo(he6OJQJaJjhe6OJQJUaJ!j`3he6OJQJUaJ#<]THHHHB$If $d$Ifa$ $$Ifa$kd3$$IfT4\)]$ Y%4 0V44 UaT<lx.kd7$$IfT4ֈ)9]I$ Y% $ 0V44 UaT d$Ifbdfh"^X$Ifkd:$$IfT4F)$ Y%0V    44 UaT d$If $$Ifa$  "$@BD`d~ <>xz|~ʹԮ럓xi]jJ@he6OJQJUjI he6OJQJUVj0=he6OJQJUjI he6OJQJUVjr;he6OJQJUjI he6OJQJUVhe6OJQJaJo(!j :he6OJQJUaJhe6OJQJaJjhe6OJQJUaJhe6OJQJo(he6OJQJjhe6OJQJU "$&(<JAA88 d$If $$Ifa$kd>$$IfT4r) ]$ Y%@  0V44 UaT]TTKK d$If $$Ifa$kdB$$IfT4\) $ Y%0V44 UaT.02<>DFZ\^hjnpĶ϶x϶g϶YĬhe6CJ EHOJQJaJ!jHhe6OJQJUaJ"he6OJQJaJmHnHsHtH!jHhe6OJQJUaJ!jSFhe6OJQJUaJhe6OJQJaJjhe6OJQJUaJhe6OJQJaJo(he6OJQJo(jhe6OJQJUjNChe6OJQJUjI he6OJQJUV" ]TTK d$If $$Ifa$kd E$$IfT4\)$ Y%0V44 UaT  @lpgg^^ d$If $$Ifa$kd G$$IfT4F)$ Y%0V    44 UaTln]TTTTKK d$If $$Ifa$kdtI$$IfT4\)]$ Y%4 0V44 UaTRTVXdfઞtj:Rhe6OJQJUjaOhe6OJQJUjI he6OJQJUVjLhe6OJQJUjI he6OJQJUVjKhe6OJQJUhe6OJQJo(jJhe6OJQJUhe6OJQJjhe6OJQJUhe6OJQJaJo('Zpg^^ d$If $$Ifa$kdK$$IfT4FU$YQ0V    44 UaTZ\^dpg^^ d$If $$Ifa$kdCN$$IfT4F $ Y0V    44 UaTpg^ d$If $$Ifa$kdQ$$IfT4F$ Yg0V    44 UaTDzqq d$If $$Ifa${kdR$$IfT40$ Y"0V44 UaT246@BFH\^bdfh丩˛{wl{w{^he6CJ EHOJQJaJj Vhe6Uhe6jhe6Uhe6CJ EHOJQJaJhe6OJQJaJjhe6OJQJUaJjjThe6OJQJUhe6OJQJhe6OJQJaJo(he6OJQJo(he6OJQJmHnHsHtHjhe6OJQJUjShe6OJQJU$DFppj` H$If^H$IfkdU$$IfT4FU$ YQ0V    44 UaT  |||||||v$If $$Ifa$zkdV$$IfT0#a0n44 laT  ">@B&(*46XZnpr|~۷۷۷۷s۷dj\he6OJQJUj)[he6OJQJUjsZhe6OJQJUj#Yhe6OJQJUjXhe6OJQJUhe6OJQJjhe6OJQJU he6o($jGWhe6OJQJUaJo(he6OJQJaJo(jhe6OJQJUaJo(he6OJQJaJ'yss$If $$Ifa$}kdW$$IfT40bF)!044 laf4T8<oi````VI $ $If^ a$  $If^ $$Ifa$$IfkdY$$IfT47FbF)0    44 laf4T<@DL2kd[$$IfT4vrbF ): 044 laf4T  $If^ $ $If^ a$9kd^$$IfT4rbF ): 044 laf4T  $If^ $If 02FHJTVZ\prz|24}l}}!jSahe6OJQJUaJjhe6OJQJUaJhe6OJQJaJhe6CJ EHOJQJaJo(jhe6OJQJUaJo(j_he6OJQJUj_he6OJQJUjq]he6OJQJUhe6OJQJaJo(jhe6OJQJUhe6OJQJ("$XZ9kd_`$$IfT40rbF ): 044 laf4T  $If^ $IfZne[  $If^ jkdb$$IfT41)d$044 laf4T $IfWD` $IfVDWDd^ `  $If^ x$If468  ,.0pr268TVX༮ռ༝༮ռ༇vռe!jfhe6OJQJUaJ!j;ehe6OJQJUaJ!jdhe6OJQJUaJ he6o(!j~che6OJQJUaJhe6CJ EHOJQJaJhe6OJQJaJhe6CJOJPJQJaJo(he6OJQJaJo(jhe6OJQJUaJ!jahe6OJQJUaJ'np4 d$If d<$Ifgkdc$$IfT$1)d$044 laT46` ^vvk d<$If 1d$Ifd<$IfWD`gkde$$IfTl1)d$044 laTX^`bdxz|  "$&024\`b~ֱ֦☼|j;khe6U!jjhe6OJQJUaJjhe6OJQJUaJjhhe6Ujhhe6Uhe6OJQJaJ he6o(j4ghe6Uhe6jhe6U"he6OJQJaJmHnHsHtHhe6OJQJaJo(0^`(q```U d<$If 1d$Ifd<$IfWD`}kdi$$IfT4'01M )H044 laf4T&(*,@BDNP  ",.NPRThjlݫӌݫvjqhe6Uj,phe6U!johe6OJQJUaJjhe6OJQJUaJ"he6OJQJaJmHnHsHtHjmhe6Ujlhe6Uhe6OJQJaJhe6OJQJaJo(jlhe6Uhe6jhe6U.P q``U d<$If 1d$Ifd<$IfWD`}kdn$$IfT4m01M )H044 laf4Tlvx   $ & ( @ B D F Z \ ^ h j ´ߣzojvhe6Ujuhe6Uj3the6U%he6OJQJaJmHnHo(sHtH!jwshe6OJQJUaJjhe6OJQJUaJ"he6OJQJaJmHnHsHtHjqhe6Uhe6OJQJaJhe6OJQJaJo(jhe6Uhe6+  B ,!k`O` 1d$If d<$If d<$IfVDWD^ `}kdr$$IfT4:01M )H044 laf4T !*!.!0!2!D!F!N!P!n!p!!!!!!!!!!!!!!!!!!!$"("."0"j"l"ƽνƽƽƽƢ옢좘yn_jI he6OJQJUVhe6CJOJQJo(!jwhe6OJQJUaJhe6CJ EHOJQJaJhe6OJQJaJjhe6OJQJUaJhe6CJEHOJQJo(he6OJQJo(he6OJQJjhe6OJQJU"he6OJQJaJmHnHsHtHhe6OJQJaJo(jhe6U#,!.!R!T!X!\!`!d!h!l!p!v!!sjjjjjjjjjj $$Ifa$$($If`a$}kd w$$IfT4r01M )H044 laf4T !!!!&" dx$If$dx$Ifa$ $$Ifa$&"("*"."r"6--'$If $$Ifa$kd@x$$IfT4ֈ[ %a0n44 Uaf4Tl"n"p"r"t"""""""""""""""""# # ####&#(#*#4#6#8#:#N#P#R#\#ƵƤޜ眍p_!jThe6OJQJUaJ!jhe6OJQJUaJj~he6OJQJUjI he6OJQJUVhe6OJQJ!j|he6OJQJUaJ!j5{he6OJQJUaJhe6OJQJaJjhe6OJQJUaJhe6OJQJo(jhe6OJQJUjxyhe6OJQJU%r"""""(kd}$$IfT4ֈ[ % a0n44 Uaf4Tx$If$If"""#8#`#b#x$If$If $$Ifa$\#^#`#j#l####################$ $D$F$H$J$L$N$b$d$f$p$r$t$v$Ź~ra!jLhe6OJQJUaJjhe6OJQJUjI he6OJQJUV!jhe6OJQJUaJ!jhe6OJQJUaJhe6OJQJaJj0he6OJQJUjI he6OJQJUVjhe6OJQJUhe6OJQJo(he6OJQJjhe6OJQJUaJ&b#d#f#j##6--'$If $$Ifa$kd$$IfT4ֈ[ % a0n44 Uaf4T###$$(kde$$IfT4ֈ[ % a0n44 Uaf4Tx$If$If$$$L$t$$$x$If$If $$Ifa$v$$$$$$$$$$$$$$$%%%%%%%(%*%,%6%8%:%>%@%D%F%%%%%%%%ƺϫ}ƺnbjMhe6OJQJUjI he6OJQJUV!jqhe6OJQJUaJ!jhe6OJQJUaJjhe6OJQJUjI he6OJQJUVjhe6OJQJUhe6OJQJo(he6OJQJjhe6OJQJUaJ!jhe6OJQJUaJhe6OJQJaJ&$$$$$6--$ $$Ifa$ $$Ifa$kdĊ$$IfT4ֈ[ % a0n44 Uaf4T$%:%<%>%(kd#$$IfT4ֈ[ % a0n44 Uaf4Tx$If$If>%@%D%%%%%x$If$If $$Ifa$ $$Ifa$%%%%%%%%%%%%%%%%& &"&$&&&(&<&>&@&J&L&N&P&d&f&h&r&t&ּઢ͖{jY!jwhe6OJQJUaJ!jhe6OJQJUaJjhe6OJQJUjI he6OJQJUVjhe6OJQJUhe6OJQJ"he6OJQJeho(r!jВhe6OJQJUaJhe6OJQJo(he6OJQJaJjhe6OJQJUaJ!j he6OJQJUaJ!%%%%&&6--$ $$Ifa$ $$Ifa$kd$$IfT4ֈ[ % a0n44 Uaf4T&&N&v&x&z&(kd)$$IfT4ֈ[ % a0n44 Uaf4Tx$If$Ift&v&&&&&&&&&&&&&&&&'''''''''0'2'6'÷機機}kYKhe6CJ EHOJQJaJ"he6@OJQJmHnHsHtH"he6OJQJeho(r!jhe6OJQJUaJ!jHhe6OJQJUaJhe6OJQJaJjhe6OJQJUaJjhe6OJQJUjI he6OJQJUVhe6OJQJjhe6OJQJUhe6OJQJo(he6OJQJehrz&|&&&&''x$If $$Ifa$ $$Ifa$$If'''P'6-$ d$Ifd]kdМ$$IfT4ֈ[ % a0n44 Uaf4T6'8':'<'P'R'n'p'r''''''^(j(l(((((((((((((((() ))),)ܧsb!jhe6OJQJUaJ"he6OJQJaJmHnHsHtH!j֟he6OJQJUaJ!j8he6OJQJUaJ$he6KHOJ\^JaJmHo(sH!jhe6OJQJUaJ!jhe6OJQJUaJjhe6OJQJUaJhe6OJQJaJhe6OJQJaJo($P''b())V*X**+fWWd<$If]jkd֥$$IfT4#d$044 laf4Td$IfWD`  d$IfWD`  d$If,).)0)@)B)V)X)Z)d)f))))))))))))))))))* * *,*.*B*D*F*˺˗ՊyhW!j he6OJQJUaJ!j:he6OJQJUaJ!jhe6OJQJUaJhe6>*OJQJaJo(!jʢhe6OJQJUaJ"he6OJQJaJmHnHsHtH!j he6OJQJUaJhe6OJQJaJhe6OJQJaJo(jhe6OJQJUaJ!jjhe6OJQJUaJ"F*P*R*X*Z*n*p*t*v*x*z********$+&+.+0+<+>+J+L+N+P+T+h+j+l+t+x+z+|++++++++++++++++++ݳݦ!jhe6OJQJUaJ!jhe6OJQJUaJhe6>*OJQJaJo(he6>*OJQJaJ!jche6OJQJUaJhe6CJ EHOJQJaJhe6OJQJaJo(jhe6OJQJUaJhe6OJQJaJ4++&+0+>+l+v+ $<$Ifa$jkd$$IfT4#d$044 laf4Tv+x+z+|+~++++I>>>>>> $<$Ifa$kd$$IfT4hr,P #$  044 laf4T+++++++",I>>>>>> $<$Ifa$kdG$$IfT4r,P #$  044 laf4T+++++,,,&,(,,,.,J,L,N,R,T,p,r,t,|,~,,,,,,,,,,,,,,,,,,,˺˩˘ˇve!jhe6OJQJUaJ!jhe6OJQJUaJ!jҰhe6OJQJUaJ!j߮he6OJQJUaJ!jhe6OJQJUaJ!j$he6OJQJUaJhe6OJQJaJhe6OJQJaJo(jhe6OJQJUaJ!jrhe6OJQJUaJ'",$,&,(,*,,,R,x,I>>>>>> $<$Ifa$kd$$IfT4r,P #$  044 laf4Tx,z,|,~,,,,,I>>>>>> $<$Ifa$kd$$IfT4r,P #$  044 laf4T,,,,,,,$-I>>>>>> $<$Ifa$kdb$$IfT4r,P #$  044 laf4T,--- -&-(-<->-@-B-D-F-H-^-`-b-~-----------<.>.R.T.\.^.f.h.j..罱phe6CJ EHOJQJaJo(jhe6OJQJUaJo(!jhe6OJQJUaJ!jHhe6OJQJUaJhe6CJOJQJaJhe6CJ EHOJQJaJhe6OJQJaJo(!jUhe6OJQJUaJhe6OJQJaJjhe6OJQJUaJ%$-&-`--I>-;d<$IfWD`; d<$Ifkd$$IfT4r,P #$  044 laf4T-:.<.h. //0b}ncVE(d$IfWD`( vd$If`v d$If)d$If`) d$Ifjkdķ$$IfT4|#d$044 laf4T;d$IfWD`;........................///4/6/8/:/d/f/h//////////˺˩˘ˇv!jhe6OJQJUaJ!jhe6OJQJUaJ!jQhe6OJQJUaJ!jhe6OJQJUaJ!jhe6OJQJUaJhe6OJQJaJhe6OJQJaJo(jhe6OJQJUaJ!j_he6OJQJUaJ*///0 "bd248:<>LɸɧɖɈ{p{{he6OJQJ\aJhe6OJQJ\aJo(he6CJ EHOJQJaJ!jhe6OJQJUaJ!jhe6OJQJUaJ!j/he6OJQJUaJhe6OJQJaJUhe6OJQJaJo(jhe6OJQJUaJ!jyhe6OJQJUaJ' FORMCHECKBOX 9hncN)RT\Oag~,{25agyrdkTV[wƋNCg@\cQ YgBl v^N  FORMCHECKBOX ]BlVE@\\chHh-N gsQeN OV[wƋNCg@\  FORMCHECKBOX ]OgqN)Rl[e~R,{103agvĉ[RtۏeQ-NVV[6kvKb~0 eq \o\ac(%,28)3ueNnUS ۏeQXf N u ffNXd N u XdDV N u Cg)RBlfN N u ffN N u ffNDV N u PCT/RO/134h N u 8hxT/b(lWx^Rh N u {:gSb__^Rh N u Cg)RBlvype y eq \o\ac(%,29)DReNnUS  FORMCHECKBOX  cN)RT\Oag~,{19agO9ev-Neыe N u  FORMCHECKBOX N)R'`VERekbJTPCT,{Nz DNv-Neыe N u  FORMCHECKBOX  cN)RT\Oag~,{28/41agcQvO9e N u  FORMCHECKBOX N)RNtYXbfN N u ;`YXbfNYHhS_____________  FORMCHECKBOX [([gBlfN N u  FORMCHECKBOX 3uCglf N u  FORMCHECKBOX 3uCglf-NeU_ N u  FORMCHECKBOX OHQCglf N u  FORMCHECKBOX OHQCglf-NeU_ N u  FORMCHECKBOX WU_yvSf3ubfN N u  FORMCHECKBOX uirPge7hTOυf N u  FORMCHECKBOX uirPge7hTX[;mf N u  FORMCHECKBOX uirPge7hTOυSX[;mf-NeU_ N u  FORMCHECKBOX W ODnegnb2{vh N u  FORMCHECKBOX ~nxvVE3uoR,g N u  FORMCHECKBOX (WHQ3ueNoR,g-NeU_ N u  FORMCHECKBOX ]YHhvfeN N u (feNYHhS_____________)  eq \o\ac(%,30)hQSO3uNbN)RNt:gg~{W[bvz  FORMTEXT       eq \o\ac(%,31)V[wƋNCg@\[8ha  FORMTEXT     t^ FORMTEXT   g FORMTEXT   e FORMTEXT     t^ FORMTEXT   g FORMTEXT   e N0VE3u ^g(W-NV_N)RObv ^S_(WN)Rl[e~R,{103agĉ[vgPQRtۏeQ-NVV[6kKb~0RtۏeQV[6kKb~v ^S_&{TN)Rl[e~R,{104agvĉ[0 N0RtۏeQV[6kKb~e^S_cNVE3uۏeQ-NVV[6kXfSCg)RBlfN0ffN0ffNXdv-Neыe gffNDVSXdDVv^S_cNffNDVSXdDVoR,g v^4~vsQ9(u0hyOO(uNx/~~:ggNxbE\lNNSx3uN/fYVN0YVONbYVvQN~~v ^S_kXQvQY Tb Ty0VM|blQV[b0W:S03uN{|WSN NR{|W-N bkXQ*NN0ON0NNUSMO0:gsQVSO0'YNb!h0yxUSMO03uNBl9(uQ4N][b9QDk4~ _NSN0RV[wƋNCg@\b40 Q N495uP[3ulQ(u7bS{vFhttp://cponline.cnipa.gov.cn v^ cgqvsQBlO(uQ N49|~4~0 @\Gl>k6e>kNY TV[wƋNCg@\N)R@\6e9Y FU7b[7bS1100008600 LGl>k_7bL-NOLSNw%f/eL 7b TV[wƋNCg@\N)R@\ &S71117101826001660320 Gl>ke^S_QnxQf3uS09(u Tyb{y SRyё0*gQf3uST9(u Tyb{y vƉ:N*gRt49Kb~0NfY~Oo`SBl {vFhttp://www.cnipa.gov.cng0 [NSǑ(u5uP[TLGlNv ^S_TLN5ub9 cknxkXQv^BlL\\3uSS9(u Ty$NyReQGl>kUSDh-N TeSV[wƋNCg@\N)R@\0 49TGl>ke^S_cknxkXQ3uS (WRtۏeQV[6kKb~eSNO(uVE3uS O(uVE3uSN9e؏^lf3u{|+R0(W_V[3uSKNT4~Ty9(ue^S_lfV[3uS0 9(uǏ@\bLGlNWo_49Oo`v SN(WGl>kS_)Ygߏ NǏGl>k!keeEQ49Oo` eEQ49Oo`ve_Y N{vFN)R49Oo`Q NeEQS{t|~ HYPERLINK "http://fee.cnipa.gov.cn" http://fee.cnipa.gov.cn ۏL49Oo`veEQǏ Ow010-62084312/8065 bS5uP[Nshoufeichu@cnipa.gov.cn ve_eEQ49Oo`0eEQ[te49Oo`v NeEQ[te49Oo`e:N49e0V>geEQ49Oo`beEQOo` N&{Tĉ[ bGl>kVbeQfX[v Ɖ:N*g4~9(u0eEQ49Oo`v ^S_cO@\bLvGl>kUS YpSN0@b49(uv3uSbN)RS STy9(uv TyTё0 Te ^S_cOc6e6encv0W@W0?ex0c6eNY Tb TyI{Oo`0eEQ49Oo`Y NcO@\bLvGl>kUS YpSNv ؏^S_cOGl>keg0Gl>kNY Tb Ty0Gl>kё0Gl>kUSncSxI{Oo`0 *g c Nĉ[Rt49Kb~v @bNuvl_Tg1uGl>kNbb0     SfN)RBlfN VE3uۏeQ-NVV[6kXfSf PAGE  PAGE 2 150101 2019.9 SfN)RBlfN VE3uۏeQ-NVV[6kXfSf laNy PAGE 1 150101 2019.9 49{w bL`ul______ & Fdh$If d$Ifjkd$$IfT4#d$044 laf4Tvd$IfWD,`vvd<$IfWD,`v 6lft@N:;dh$IfWD]`;dh$IfWDd]` dh$IfWD@]` dh$If] d$If dh$If & Fdh$If <>@tvNPlnp:ǼǜǼǜǼvǜǼcǜǼPǜ$jhe6OJQJU\aJ$j|he6OJQJU\aJ$j he6OJQJU\aJ$jhe6OJQJU\aJhe6OJQJ\aJo($j:he6OJQJU\aJhe6OJQJ\aJjhe6OJQJU\aJjhe6OJQJUaJhe6OJQJaJo(he6CJEHOJQJaJo(:<XZ\ LNjlnœ|s`M$jhhe6OJQJU\aJ$jhe6OJQJU\aJhe6OJQJo(jhe6OJQJUhe6OJQJjhe6OJQJU$j&he6OJQJU\aJ$jhe6OJQJU\aJhe6OJQJ\aJo($jLhe6OJQJU\aJhe6OJQJ\aJjhe6OJQJU\aJLT<>;dh$IfWD]`; dh$If] dh$If] TVrtv.:<>Z\^  >@\󹱢s`M$jhe6OJQJU\aJ$j4he6OJQJU\aJ$jhe6OJQJU\aJ$he6>*B*OJQJ\aJo(phhe6OJQJo(jPhe6OJQJUhe6OJQJjhe6OJQJU$jhe6OJQJU\aJhe6OJQJ\aJjhe6OJQJU\aJhe6OJQJ\aJo(\^`,.0:<>@TVX\^`|~õےyjyyjhe6OJQJUhe6OJQJ!j_he6OJQJUaJhe6OJQJaJo(he6CJ EHOJQJaJhe6OJQJaJjhe6OJQJUaJhe6OJQJ\aJo(he6OJQJ\aJhe6OJQJo(jhe6OJQJUjhe6OJQJU$>xz|||r $If]$If}kd$$IfT4Z0y#044 laf4Tz|Twn $$Ifa$ $$4$Ifa$}kd $$IfT40y#044 laf4T  $&(,.02FHJNPRVXѸѪѪwѸsfhe6CJOJQJaJo(he6!j|he6OJQJUaJ!jhe6OJQJUaJ!jhe6OJQJUaJjhe6OJQJUaJhe6OJQJaJjXhe6OJQJUhe6OJQJaJo(he6OJQJjhe6OJQJUjhe6OJQJU%TVXJ8Fqqqqqqfff hd WD`hhd WD8^h`}kd.$$IfT40y#044 laf4T  "BD<DJPRTVXZ~    " & * . 0 2 : > D F H J L P R       v x B~h־־ֳֳֳ֠֏!he6CJKHOJQJ^JaJo(he6CJQJaJo(he6CJaJhe6CJOJQJo(he6CJaJo(he60JCJOJQJaJo(he6CJOJQJaJo(he6CJOJQJaJjhe6CJOJQJUaJ8P |  N  j   Xd^(PV" & Fdh`hhd `h hd WD`hhj\^bdr&vxz~ں纬}}}}rhe6@CJPJo(he6jhe6Uhe60JCJOJQJo(he60JCJOJQJhe6CJOJQJjhe6CJOJQJUhe6CJOJQJo(he6CJaJo(he6CJOJQJaJhe6CJOJQJaJo(he6CJOJQJaJo(he6CJOJQJaJ'"v><x|~&`#$$x@&a$$@&a$ gdVD^g & Fd & FdH$ "&JNVZ\hjlnp~ҽ̴璡ҽ̴}he6CJOJQJaJhubOJPJo(he65@ZCJOJPJo(he6@CJPJo(he6OJPJhe6OJPJo(hub0JmHnHuhe6 he60Jjhe6Uhe65@ZCJOJPJhe6CJOJPJo(he65@CJOJPJ&$&LNXZp~ & Fd&`#$$x@&a$$@&a$  9r d87 0182P/R . A!"S#$S%S 7 0182P/R . A!"S#$S%S A0P182P/R . A!"S#$S%S DpA0P182P/R . A!"S#$S%S DpDd //x  s 4A(8 ? VGr 1C"`2#KL6t()% 'zD3`!#KL6t()% 'zs$s$xcdd``b```da ff``L Ȓ*b128pc21@l6jo/!@ v:$/ŵICƏ@61 u!s2fu& Dd //x  s 4A(8 ? VGr 2C"`2͙O l4("3`!͙O l4("s$s$xcdd``b```da ff``L Ȓ*b128pc21@l6jo/!@ v:$/ŵICƏ@|@s u!s2fu& Dd //x  s 4A(8 ? VGr 3C"`2vt*CzV3`!vt*CzVs$s$xcdd``b```da ff``L Ȓ*b128pc21@l6jo/!@ v:$/ŵICƏ@܂?B]FLYfIXDd //x  s 4A(8 ? VGr 4C"`2 ^!oo32t3`! ^!oo32s$s$xcdd``b```da ff``L Ȓ*b128pc21@l6jo/!@ v:$/ŵICƏ@<]6MB]FLYfIe= Dd //x  s 4A(8 ? VGr 5C"`2 X4[pߧ >Pl&a2"[V; &^G6?}cfY{mO=KM~4sw7h5E[ڦk$f%,g+$$If!vh555 #v#v#v :V 0W,555 / / / /  /  aTDSf Ty$country=13;province=3;city=3;type=2;Sf Ty$$If!vh55#v#v:V 0W,55aTxD@,{NSfN_Y TqTotal=2;basecount=2;addedrecordtitle=0SfN0;addedtitlemark=FMR_Mark;componentmarkbody=SfN;sourcemark=SfN2;oldid=1; SfN_,{NSfN_Y TDSfN_,{NSfN_ NlQ^Y TSfN_,{NSfN_Bl NlQ__DR$$If!vh555 5 #v#v#v #v :V 40m+,555 5 aTD@ SfN_vQNSfN1_Y T SfN_vQNSfN1_Y TDSfN_vQNSfN1_ NlQ^Y TSfN_vQNSfN1_Bl NlQ__DR$$If!vh555 5 #v#v#v #v :V 40m+,555 5 aTDd    !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~Root Entryn Fq@UData WordDocumentm@ObjectPool'qq_12345678900ҋB `qqCompObjtObjInfoOCXNAME #%)+/157;=ACGIMOSUY[_aegkmqswy} 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qSfN_,{NSfN_VM|(S)H(|5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qcontentsD_1234567891 0ҋB `qqCompObjtObjInfo 3uN_,{N3uN_3uN{|W(CH(A 5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_,{N3uN_VM|b;`@b(W0WOCXNAME "contents X_12345678920ҋB `YqYqCompObj tObjInfoOCXNAME0contentsT_1234567893 0ҋB `YqYq,SH(5"[SOQ 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_,{N3uN_~%@b(W0Wb%N@b(W0W1,SH(T5"[SOQCompObjtObjInfoOCXNAME0contentsT_12345678940ҋB `YqYqCompObjtObjInfoOCXNAME, 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_,{N3uN_wꁻl:Sv^ Ty,CH(%5"[SOQ 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qcontentsT_1234567895"0ҋB `YqYqCompObjtObjInfo 3uN_,{N3uN_^S Ty1,CH(05"[SOW) 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_vQN3uN1_3uN{|WOCXNAME!!,contents"T_1234567896$0ҋB `YqYqCompObj$tObjInfo#%&OCXNAME&'$contents(X_1234567897;)0ҋB `YqYq(CH(A 5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_vQN3uN1_VM|b;`@b(W0W,SH(5"[SOQCompObj*tObjInfo(*,OCXNAME+-0contents.T_1234567898.0ҋB `YqYqCompObj0tObjInfo-/2OCXNAME032 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_,{N3uN_~%@b(W0Wb%N@b(W0W11,SH(T5"[SOQ 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qcontents4T_1234567899,630ҋB `YqYqCompObj6tObjInfo2483uN_vQN3uN1_wꁻl:Sv^ Ty1,SH(%5"[SOQ 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19q3uN_vQN3uN1_^S Tyy1OCXNAME594contents:T_123456790080ҋB `YqYqCompObj<tObjInfo79>OCXNAME:?,contents@T_12345679011O=0ҋB `YqYq,SH(05"[SOW) 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qT|N_wꁻl:Sv^ Ty^ Ty3(S)H()5"[SOCompObjBtObjInfo<>DOCXNAME?E,contentsFD_1234567902B0ҋB `YqYqCompObjHtObjInfoACJOCXNAMEDK, 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qT|N_^S Ty^S Ty3 Ty1(S)H(45"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qcontentsLD_1234567903@JG0ҋB `YqYqCompObjNtObjInfoFHPBlOHQCgXf_(WHQ3u1_(WHQ3uV+Rb0W:S,SH(5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u2_(WHQ3uV+Rb0W:SOCXNAMEIQ2contentsRT_1234567904L0ҋB `YqYqCompObjTtObjInfoKMVOCXNAMENW2contentsXT_1234567905EYQ0ҋB `YqYq,SH(5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u3_(WHQ3uV+Rb0W:S,SH(5"[SOCompObjZtObjInfoPR\OCXNAMES]4contents^T_1234567906V0ҋB `YqYqCompObj`tObjInfoUWbOCXNAMEXc4 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u4_(WHQ3uV+Rb0W:S,SH(5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qcontentsdT_1234567907Tc[0ҋB `YqYqCompObjftObjInfoZ\hBlOHQCgXf_(WHQ3u5_(WHQ3uV+Rb0W:S,SH(5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u6_(WHQ3uV+Rb0W:SOCXNAME]i4contentsjT_1234567908`0ҋB `YqYqCompObjltObjInfo_anOCXNAMEbo4contentspT_1234567909^he0ҋB `YqYq,SH(5"[SO 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u7_(WHQ3uV+Rb0W:S,SH(5"[SOCompObjrtObjInfodftOCXNAMEgu4contentsvT_1234567910j0ҋB `YqYqCompObjxtObjInfoikzOCXNAMEl{4 0ҋB `Microsoft Forms 2.0 ϿEmbedded ObjectForms.ComboBox.19qBlOHQCgXf_(WHQ3u8_(WHQ3uV+Rb0W:S,SH(5"[SOOh+'0 ,contents|T1Table9D(SummaryInformation(o~DocumentSummaryInformation8p      !"#$%&'()*+,-./012345678:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}  DA?(8 ?Control 7C"`2TH.XTJ3`!TH.XTJ!xxm @ d_=WI>[߮ H>Pl&a2"[V; &^G6?}cfY{mO=KM~4sw7h5E[ڦk$f% DSfN_,{NSfN_NSSfN_,{NSfN_NS$$If!vh5551 5 #v#v#v1 #v :V 0W,5551 5 / / aTD@ ,{N3uN_Y Tb TyqTotal=2;basecount=2;addedrecordtitle=03uN0;addedtitlemark=SQR_Mark;componentmarkbody=3uN;sourcemark=3uN2;oldid=1;3uN_,{N3uN_Y Tb TytestDd F  DA?(8 ?Control 8C"`2nSh);6ȸ. 3`!nSh);6ȸ.Z Sxcdd``ven0̌ &$ da8f1d&qgkۤ?3XWi$$If!vh5Y5%5455#vY#v%#v4#v#v:V 40V++,,5Y5%5455/ / / / / / /  / 4 UaTD3uN_,{N3uN_*NNNSb~~:ggNxtestvDCheck13D ,{N3uN_5uP[{3uN_,{N3uN_5uP[{test invalidEmail$$If!vh5Y5%545 #vY#v%#v4#v :V 40V++,5Y5%545 / / / 4 UaTDd 2    DA ?(8 ?Control 9C"`2_%#t6P~&3`!_%#t6P~Jxm;@ DP%ul9V {$dlRXx4aexW-+hw1,ȃ`ħO ?9SH֚"߭J}muu Dd    FA ?(8 ?Control 10C"` 2~Vcj}?c(3`!~Vcj}?-xm;@ DP%ul\#q$cJ^ǣ;( tklYy4@{S}g!|G #>,5}j̙@DnUFkv;E_ [$$If!vh5Y5%55@ 5 #vY#v%#v#v@ #v :V 40V++,,5Y5%55@ 5 / / / / / /  / 4 UaTDd r   FA ?(8 ?Control 11C"` 2E2[BH2ٷ:1}+3`!E2[BH2ٷ:1n15Sxcdd``ven0̌ &$̐ da8c212BM6! IfeZE$$If!vh5Y5%55#vY#v%#v#v:V 40V++,,5Y5%55/ / / / / /  / 4 UaTDd    FA ?(8 ?Control 12C"` 2M lHcMS.3`!M lHcMNODSxcdd``ven0̌ &$pȒ*b128p,ebdl6Cl:`E$$If!vh5Y5%55#vY#v%#v#v:V 40V++,,5Y5%55/ / / / / /  / 4 UaTD,{N3uN_W:SaNWSLrS3uN_,{N3uN_W:SaNWSLrStest$$If!vh5Y5%5#vY#v%#v:V 40V++,5Y5%5/ / / 4 UaTD  ,{N3uN_?ex0000003uN_,{N3uN_?extestvalidatePostCodeD@,{N3uN_5u݋ 3uN_,{N3uN_5u݋test$$If!vh5Y5%545 #vY#v%#v4#v :V 40V++,5Y5%545 / / / 4 UaTD@ vQN3uN1_Y Tb Ty3uN_vQN3uN1_Y Tb TytestD@ vQN3uN1_(u7bNx3uN_vQN3uN1_(u7bNxtestDd F   FA?(8 ?Control 13C"` 2nSh);6ȸ.63`!nSh);6ȸ.Z Sxcdd``ven0̌ &$ da8f1d&qgkۤ?3XWq$$If!vh5Y5%5 5$ 55#vY#v%#v #v$ #v#v:V 40V++,,5Y5%5 5$ 55/ / / / / /  / 4 UaTDText13uN_vQN3uN1_*NNNSb~~:ggNxvDCheck13$$If!vh5Y5%5#vY#v%#v:V 40V++,5Y5%5/ / / 4 UaTDd 2   FA ?(8 ?Control 14C"` 2_%#t6P~;3`!_%#t6P~Jxm;@ DP%ul9V {$dlRXx4aexW-+hw1,ȃ`ħO ?9SH֚"߭J}muu Dd   FA ?(8 ?Control 15C"`2~Vcj}?t=3`!~Vcj}?-xm;@ DP%ul\#q$cJ^ǣ;( tklYy4@{S}g!|G #>,5}j̙@DnUFkv;E_ [$$If!vh5Y5%55@ 5 #vY#v%#v#v@ #v :V 40V++,,5Y5%55@ 5 / / / / / /  / 4 UaTDd r  FA ?(8 ?Control 16C"`2$*\Re%D}@3`!$*\Re%D}n15xm;A C3j^$**(8Pq9@ b Fq,b |%hk7@;?cQbσ!zi(SHVkmI߭)a>ok ;7E$$If!vh5Y5%55#vY#v%#v#v:V 40V++,,5Y5%55/ / / / / /  / 4 UaTDd   FA?(8 ?Control 17C"`24UR=jFC3`!4UR=jFNODxm;A C3j^$**(8CH!@lH8X\ёoUbdmmh2gl?a\y0cST7͔Wewj;5%M}-s^E$$If!vh5Y5%55#vY#v%#v#v:V 40V++,,5Y5%55/ / / / / /  / 4 UaTDvQN3uN1_W:SaNWSLrS3uN_vQN3uN1_W:SaNWSLrStest$$If!vh5Y5%5#vY#v%#v:V 40V++,5Y5%5/ / / 4 UaTD  ,{N3uN_?ex0000003uN_,{N3uN_?extestvalidatePostCodeD@ vQN3uN1_5u݋ 3uN_vQN3uN1_5u݋test$$If!vh5Y5%545 #vY#v%#v4#v :V 40V++,5Y5%545 / / / / 4 UaTD@T|N_Y TT|N_Y TD@T|N_5u݋T|N_5u݋$$If!vh5Y5Q5#vY#vQ#v:V 40V+,5Y5Q5/ / / 4 UaTDd   FA?(8 ?Control 18C"`2"J$ⲼyL3`!"J$Ⲽy:m:xm;A C3j^$**(8N4GH!@lH8X\ёoUbdmmh2gl?a\y0cST7͔Wewj;5%M}-s^L$$If!vh5Y55#vY#v#v:V 40V+,,5Y55/ / / / /  / 4 UaTDd   FA?(8 ?Control 19C"`25A<%1I̋XO3`!5A<%1I̋XJxm;@ Dx*DEg{$0"+y=#Pnȷ*ڰY26T t`w"}WG 3M3gĤLn"Yq}kvX8eK_Y$$If!vh5Y55g#vY#v#vg:V 40V+,,5Y55g/ / / / /  / 4 UaTD T|N_W:SaNWSLrS T|N_W:SaNWSLrS$$If!vh5Y5"#vY#v":V 40V+,5Y5"/ / / 4 UaTD T|N_?ex000000T|N_?exvalidatePostCodeDT|N_5uP[{T|N_5uP[{ invalidEmail$$If!vh5Y5Q5#vY#vQ#v:V 40V+,5Y5Q5/ / / / 4 UaTD NhN_yr+RXf:NNhN NhN_yr+RXf:NNhN$$If!vh5a5#va#v:V 0n,5a5aTD[gW@x_SYcNvVE3u-Neы,gvW@x N_Y[g_DR$$Ifb!vh55!#v#v!:V 40+,55!af4TD N)RNt:gg_ Ty N)RNt:gg_ TyD N)RNt:gg_Nx N)RNt:gg_Nx$$Ifb!vh555#v#v#v:V 470+,555af4TD@N)RNt:gg_NtN1_Y TTotal=2;N)RNt:gg_NtN1_Y TD@N)RNt:gg_NtN2_Y TN)RNt:gg_NtN2_Y T$$Ifb!vh555: 55#v#v#v: #v#v:V 4v0+++,555: 55af4TD@N)RNt:gg_NtN1_]\OSN)RNt:gg_NtN1_]\OSD@N)RNt:gg_NtN2_]\OSN)RNt:gg_NtN2_]\OS$$Ifb!vh555: 55#v#v#v: #v#v:V 40+++,555: 55af4TD@N)RNt:gg_NtN1_5u݋N)RNt:gg_NtN1_5u݋D@N)RNt:gg_NtN2_5u݋N)RNt:gg_NtN2_5u݋$$Ifb!vh555: 55#v#v#v: #v#v:V 400+++,555: 55af4TDcMRYtcMRYt_ cgqN)Rl[e~R,{111ag_DRDeNoR,g_DR?cMRYt_ cgqN)Rl[e~R,{111ag_,gVE3u\*gVElQ^BlV[wƋNCg@\\O:Nc[@\BlVE@\ OVE3ueNoR,g_DR$$If1!vh5d$#vd$:V 40,5d$/ af4T~DcMRlQ^cMRlQ^_DR$$If1!vh5d$#vd$:V $0,5d$/ aTD[gW@x[gW@x_SYcNvVE3u-Neы,gvW@x N_Y[g_DRD NReNW@x N_Y[g_DR[gW@x_ NReNW@x N_Y[g_DR choiceZDWJ$$If1!vh5d$#vd$:V l05d$/ aTD _Y[g_ffN_DR[gW@x_ NReNW@x N_Y[g_ffN_DRDffN_ cSYcQvыe_ux'[gW@x_ NReNW@x N_Y[g_ffN_ cSYcQvVE3ueNvыe_uxDffN_ cRekbJTvыe_ux+[gW@x_ NReNW@x N_Y[g_ffN_ cVERek[gbJTDNvO9eRvыe_uxDffN_ cN)RT\Oag~vыe_ux-[gW@x_ NReNW@x N_Y[g_ffN_ cN)RT\Oag~,{28agb,{41ag\OQvO9e_ux$$If1!vh55H#v#vH:V 4'0,55H/ af4TD _Y[g_Cg)RBl_DR[gW@x_ NReNW@x N_Y[g_Cg)RBl_DRDCg)RBl_ cSYcQvыe_ux([gW@x_ NReNW@x N_Y[g_Cg)RBl_ cSYcQvVE3ueNvыe_uxDCg)RBl_ cT\Oag~19agvыe_ux)[gW@x_ NReNW@x N_Y[g_Cg)RBl_ cN)RT\Oag~,{19agO9evыe_uxDCg)RBl_ cRekbJTvыe_ux,[gW@x_ NReNW@x N_Y[g_Cg)RBl_ cVERek[gbJTDNvO9eRvыe_uxDCg)RBl_ cN)RT\Oag~vыe_ux.[gW@x_ NReNW@x N_Y[g_Cg)RBl_ cN)RT\Oag~,{28agb,{41ag\OQvO9e_ux$$If1!vh55H#v#vH:V 4m0,55H/ af4TD _Y[g_DV_DR[gW@x_ NReNW@x N_Y[g_DV_DRDDV_ cSYcQvыe_ux&[gW@x_ NReNW@x N_Y[g_DV_ cSYcQvVE3ueNvыe_uxDDV_ cRekbJTvыe_ux*[gW@x_ NReNW@x N_Y[g_DV_ cVERek[gbJTDNvO9eRvыe_uxDDV_ cN)RT\Oag~vыe_ux,[gW@x_ NReNW@x N_Y[g_DV_ cN)RT\Oag~,{28agb,{41ag\OQvO9e_ux$$If1!vh55H#v#vH:V 4:0,55H/ af4TD _Y[g_8hx_DR[gW@x_ NReNW@x N_Y[g_8hxTb(lWx^Rh_DRD8hx_ cSYcQvыe_ux/[gW@x_ NReNW@x N_Y[g_8hxTb(lWx^Rh_ cSYcQvVE3ueNvыe_uxD8hx_ cRekbJTvыe_ux3[gW@x_ NReNW@x N_Y[g_8hxTb(lWx^Rh_ cVERek[gbJTDNvO9eRvыe_uxD8hx_ cN)RT\Oag~vыe_ux5[gW@x_ NReNW@x N_Y[g_8hxTb(lWx^Rh_ cN)RT\Oag~,{28agb,{41ag\OQvO9e_ux$$If1!vh55H#v#vH:V 4r0,55H/ af4TDCheck1 sQNW ODn_DR6$$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / / /  4 Uaf4TDd   FA?(8 ?Control 20C"`2SȫGPFy3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u1_(WHQ3ue yyyy-MM-dd}Total=8;basecount=8;addedrecordtitle=0OHQCg0;addedtitlemark=YXQ_Mark;componentmarkbody=(WHQ3u;sourcemark=ZXSQ_DataSource;oldid=1;BlOHQCgXf_(WHQ3u1_(WHQ3uetestD@ (WHQ3u1_(WHQ3uSBlOHQCgXf_(WHQ3u1_(WHQ3uStest($$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / /  4 Uaf4TDd   FA?(8 ?Control 21C"`2SȫGPF3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u2_(WHQ3ue yyyy-MM-ddBlOHQCgXf_(WHQ3u2_(WHQ3uetestD@ (WHQ3u2_(WHQ3uSBlOHQCgXf_(WHQ3u2_(WHQ3uStest($$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / /  4 Uaf4TDd   FA?(8 ?Control 22C"`2SȫGPFt3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u3_(WHQ3ue yyyy-MM-ddBlOHQCgXf_(WHQ3u3_(WHQ3uetestD@ (WHQ3u3_(WHQ3uSBlOHQCgXf_(WHQ3u3_(WHQ3uStest($$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / /  4 Uaf4TDd   FA?(8 ?Control 23C"`2SȫGPFӇ3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u4_(WHQ3ue yyyy-MM-ddBlOHQCgXf_(WHQ3u4_(WHQ3uetestD@ (WHQ3u4_(WHQ3uSBlOHQCgXf_(WHQ3u4_(WHQ3uStest($$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / /  4 Uaf4TDd   FA?(8 ?Control 24C"`2SȫGPF23`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u5_(WHQ3ue yyyy-MM-ddBlOHQCgXf_(WHQ3u5_(WHQ3uetestD@ (WHQ3u5_(WHQ3uSBlOHQCgXf_(WHQ3u5_(WHQ3uStest($$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / /  4 Uaf4TDd   FA?(8 ?Control 25C"`2SȫGPF3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u6_(WHQ3ue yyyy-MM-ddBlOHQCgXf_(WHQ3u6_(WHQ3uetestD@ (WHQ3u6_(WHQ3uSBlOHQCgXf_(WHQ3u6_(WHQ3uStest`$$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / / / / / /  4 Uaf4TDd   FA?(8 ?Control 26C"`2SȫGPF(3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u7_(WHQ3ue yyyy-MM-ddTotal=0;BlOHQCgXf_(WHQ3u7_(WHQ3uetestD@ (WHQ3u7_(WHQ3uSBlOHQCgXf_(WHQ3u7_(WHQ3uStest`$$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / / / / / /  4 Uaf4TDd   FA?(8 ?Control 27C"`2SȫGPFϙ3`!SȫGPFX $xm;@ DP%ul9)P ۀ$Vz<GA#^Ud{o? ø>23ԳGs&w0r_۴C}-rĬ$GmD (WHQ3u8_(WHQ3ue yyyy-MM-ddTotal=0;BlOHQCgXf_(WHQ3u8_(WHQ3uetestD@ (WHQ3u8_(WHQ3uSBlOHQCgXf_(WHQ3u8_(WHQ3uStest6$$If!vh555555a#v#v#v#va:V 40n++,5555a/ / / / / 4 Uaf4TDc_ReQfc_ReQf_ gc_ReQcNe*gS+T_DRDc_ReQf_ gc_ReQcNe]S+T_DRDc_ReQf_ gc_ReQcNe]S+T_c_ffN_DRD c_ReQf_ gc_ReQc_ReQf_ gc_ReQcNe]S+T_c_ffN_uxtestD c_ffN__eQe yyyy-MM-ddc_ReQf_ gc_ReQcNe]S+T_c_ffN__eQeDc_ReQf_ gc_ReQcNe]S+T_c_Cg)RBl_DRD c_ReQf_ gcc_ReQf_ gc_ReQcNe]S+T_c_Cg)RBl_uxtestD c_Cg)RBl__eQe yyyy-MM-ddc_ReQf_ gc_ReQcNe]S+T_c_Cg)RBl__eQeDc_ReQf_ gc_ReQcNe]S+T_c_DV_DRD gc_ReQcNe]S+T_c_DV_uxc_ReQf_ gc_ReQcNe]S+T_c_DV_uxtestD c_DV__eQe yyyy-MM-ddc_ReQf_ gc_ReQcNe]S+T_c_DV__eQe$$If!vh5d$#vd$:V 40,5d$af4TDuirPge7hT_N NRb__ZPQ}_DR$$If!vh5d$#vd$:V 40,5d$/ af4T)$$If!vh55$5 5 5#v#v$#v #v #v:V 4h0,55$5 5 5/ / / / / af4TD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DR)$$If!vh55$5 5 5#v#v$#v #v #v:V 40,55$5 5 5/ / / / / af4TD% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DR)$$If!vh55$5 5 5#v#v$#v #v #v:V 40,55$5 5 5/ / / / / af4TD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DR)$$If!vh55$5 5 5#v#v$#v #v #v:V 40,55$5 5 5/ / / / / af4TD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DR)$$If!vh55$5 5 5#v#v$#v #v #v:V 40,55$5 5 5/ / / / / af4TD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DR)$$If!vh55$5 5 5#v#v$#v #v #v:V 40,55$5 5 5/ / / / / af4TD N'N1Ye'`[PgXf% N'N1Ye'`[PgXf_](W-NV?e^;NRbbvVEU\ȉO N!kU\Q_DRD!kSh" N'N1Ye'`[PgXf_](Wĉ[vf[/gObb/gO N!kSh_DR$$If!vh5d$#vd$:V 4|0,5d$/ af4TD YgBl YgBl_6e0R NRw_DRD 6e0R NRwt^ YgBl_6e0R NRw_eg_t^ invalidYearD 6e0R NRwg YgBl_6e0R NRw_eg_g invalidMonthD 6e0R NRwe YgBl_6e0R NRw_eg_e invalidDayDSt@\b~~NVE3ueDR YgBl_6e0R NRw_St@\b~~NVE3ue_DRD ,{12ag3ZPQ[" YgBl_6e0R NRw_VE@\ cN)RT\Oag~,{12ag3ZPQ[_DRD St@\[^3u:NdV YgBl_6e0R NRw_St@\[^3u:NdV_DRDT\Oag~,{25ag YgBl_9hncN)RT\Oag~,{25agyrdkT`O@\cQ YgBl_DRD,{25ag2 YgBl_9hncN)RT\Oag~,{25agyrdkT`O@\cQ YgBl_]BlVE@\\chHh-N gsQeNN`O@\_DRD,{101ag: YgBl_9hncN)RT\Oag~,{25agyrdkT`O@\cQ YgBl_]~ cgqN)Rl[e~R,{101agRtۏeQV[6kKb~_DR$$If!vh5d$#vd$:V 40,5d$/ af4ThDhDrD Y FhW6hDhDhDrD Y FhW9hDrD Y FhW2hDtD Y FhW10tD Y FhW11rD Y FhW2rD Y FhW9rD Y FhW9rD Y FhW9rD Y FhW2$$If!vh55#v#v:V 4Z055/ / / / af4TD 3uNbNt:gg~{z_~{zhQSO3uNbN)RNt:gg~{z_~{z$$If!vh55#v#v:V 4055/ / / / af4TD cQeg_t^V[wƋNCg@\[8ha_cQeg_t^test invalidYearD cQeg_gV[wƋNCg@\[8ha_cQeg_gtest invalidMonthD cQeg_eV[wƋNCg@\[8ha_cQeg_etest invalidDayD cQeg_t^V[wƋNCg@\[8ha_cQeg_t^ invalidYearD cQeg_gV[wƋNCg@\[8ha_cQeg_g invalidMonthD cQeg_eV[wƋNCg@\[8ha_cQeg_e invalidDay$$If!vh55#v#v:V 4055/ / / / / / af4Tb  666668 0@P`p6888 0@P`p 0@P`p 0@P`p 0@P`p 0@P`p 0@P`p8XV~PJ_HmH nHsH tHF`F cke $1$a$CJKH_HmH nHsH tHZ Z h 1dB$$@&TJ5CJ,KH,\aJ,mHsHtHHH h 3d$$@&x CJ PJ5$A`$ ؞k=W[SONi@N nfh*B* ph*U`!* c >*B*phX\X z-zSOvza$$&dPCJOJQJ^JaJ<NBN u w'a$$G$&dP 9r CJaJ.BR. ckee,g B*ph2Zb2 ~e,gOJQJ^JaJ6P@r6 ckee,g 2a$$OJQJ8Y8 ech~gV-D M hh 15dhXD2YD2G$7$H$VD^`CJOJPJQJ5\.. yblFhe,gCJaJ8 @8 ua$$G$ 9r CJ4b4 _Style 5OJQJX]X z-zSO^za$$$dNCJOJQJ^JaJ<00 cke)ۏWD`ff Q3\`?/[G\!-Rk.sԻ..a濭?PK!֧6 _rels/.relsj0 }Q%v/C/}(h"O = C?hv=Ʌ%[xp{۵_Pѣ<1H0ORBdJE4b$q_6LR7`0̞O,En7Lib/SeеPK!kytheme/theme/themeManager.xml M @}w7c(EbˮCAǠҟ7՛K Y, e.|,H,lxɴIsQ}#Ր ֵ+!,^$j=GW)E+& 8PK!mQtheme/theme/theme1.xmlYMoE#F{oc'vGuرhF[x=ޝzvg53NjHHzZ $ʯI)*E_N&IA!>Ǽ3xN>UWL0Č߫߿z}rx{h9T8T/χ?xY'~3S~O_|w)ӈHt=a+d NG1-RlƁ1RJwT蠯M1K"o he˓ێ½PL-|%EhY7'qP.\L=dqķ3Iofi.ñBRb-JP_pG ݢiKtdӌhFio7;7Q2ȾD>a/Q>XW ˔M_uHq)h +:Viw4rBqϫ"r!2laCbU|!8^8>ܠ,AбVt׎~ls14_=,ɬožTV G"ѦbH'.4x޵w-ϷE|F;v`b3"G 'e\fHO '$i_wp >*8i&LY%\,xҕ= r6f 3Tʅ):ªZKLs&C Mܛ0 [˫p@ע`j۽7 YHxHicT5Ar@HZAZC}i' RQ\m,zo,gQu{Y\,Nר/=L _.̇Y7C6-fSh62"5NHT[X65̫4X%Yֳ2fkhi~tCKF#b +w1m|4`!:U!p5a:~{4mmio ήc8mDJpSǹ橠V1?#Si?3E'pS2W`qB]( 08w nA[s)k8= Aa?R dڒɾcUӽ˲d)#Queb}C!&i0>4S7{z F} 4sKvUKoȳh~1jYUVH5U8Vk;֜L9ŰD ?*|FL "A3>g]dm2iVֵ褽mg ,Y!O& @ 9@ r@ @ )4NWWWkkkkkkqq D 4Xl l"\#v$%t&6',)F*+,./:\h!%(,/37:>CFKNQSUW[^bfilnoswz{.  <  6 h bT<" lZD<Zn4^ ,!!&"r""b##$$$>%%&&z&'P'+v++",x,,$--bzT" "#$&')*+-.01245689;<=?@ABDEGHIJLMOPRTVXYZ\]_`acdeghjkmpqrtuvxy'6AMSUdl{$*,;BRYeko"(*:BR\z|!-3;K_kq&(3?ENZ`dpv !@^`o ".47GUagkw} #3Uafr,8>GSY`lr}  v  + 1 = C V b h  ! ' E Q W o    " . 4 B N T m y   5 7 9 E K M Y _ f "$&28:FLSqsu%'39@^`bntv5EO[ar~"(,<FV&)9AQTdl|.4DIUZ\hkmy|1A[k:J{-L\w*:Vf/gw$'!@$f$~$O&1F11F1F11F1F11F111F1FG$FG$1WF1FWFG$FWWWWFFFFFWFG$WWWWFFF1FFWWFFF1F1G$FFFFFFFF1G$G$1G$1G$G$G$FFFG$FFFFG$FFFG$FFF11G$WFFWFFWFFWFFWFFWFFWFFWFF1G$G$G$FFG$FFG$FF1G$G$G$G$G$G$G$G$G$G$G$1G$G$1G$FFFG$G$G$G$G$G$11G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$G$1F1FFFFFFXX)04;=qxz!!!;FQTWZltw z }   !*3<E4  2$#KL6t()% 'z2$͙O l4("2$vt*CzV2$ ^!oo322$ X4?@CDEFHGIJKLMNOPQRSTUVWXYZ][^_`\cdeabhijfgmnoklrstpqwxyuv|}~z{T+l );B!r+Fawyy 257Uh~ !#g,?Zs , D i ( X  5 U L c c c c 9MPPP&:===ub)E[l}Bl;(P&%%%%%%%%%%%%%%%-&7&D&E&P&%%%%%%%%%%%%%%%-&7&D&E&P&%%%%%%%%%%%%%%%-&7&D&E&P&5%5%*F*F\^`\o(.H\H^H`\)\^`\.\^`\.4\4^4`\) \ ^ `\.| \| ^| `\. \ ^ `\)\^`\.hh^h`o(0H\H^H`\)\^`\.\^`\.4\4^4`\) \ ^ `\.| \| ^| `\. \ ^ `\)\^`\.*F5%,^mhmv  $H J%&(.>.0v2;4c677}8/>DHHlNOPTXeYYZ6[\hkkm rt!uv/{Y+y i q M x9`N@ "`.$/j/#22J4z778=8;@@A+EFEGGI/KRS[\B`^bhk'lmpHs zzz\s.Ck $&+,1#558T9=>@AB F4F=PQTbVx[[h]eou{uww%y_}~7) V*"##&'(7*00w36<<=@CdC IEK7MQUW3X_no=u,v\v)x)y~$%C l''))\/0\2 33:-;@CwEEDHK-R/TUV\^@`aPghswsx|B|} cS=EEYP!#T#&&)+-./34669:>eCETF}RRV\`agLggtlmsyyl Q  CqP#n" %\-70~0126:?0@]ACD(OO^\c^`bd nnnn^ruv/xyy-{|m}y~($%%&+&C&j&/1O3:==B CGcLTX4aradeaopwyz{{i}u F 7{w !|""&'(**,.03389s:;.;&<@CrDDGHKKPTUY_tbboef'ghhjjkn?oos;tv ? @ sC C I J L O :Q R U a c =e f yg h i j yj m p jt Xx fx U c      S# * - 0 1 w4 W: ; ; = &? ? B B )L P P \ _ s` a d d 0i p q 1r #s t t u x x y  R # c         ~ l& p' ( &, K. 1 4 U5 : ? iB B E kE I )K ^K N N O R S T Y Z b wc e e f uh j m m Nq 5v Uw y { '   H S     z! $ $ $ & ) n* *+ + - A1 2 2 4 64 6 4< > A  '(*12i4w55v88i9BXFuFFJW}X^k`iccFipqbtvv y}$ YH| "#6%q&&+l+,R.x.406@@BEDFkH~HJKLMORPT@W[X^6aa:cdik}orrt\w|~ [$6Hm0#$%@'e'p)6193=EHJUWYV^,bbce fiokAsdwnwz}D~|~ Hv: :#r$M&-0\3g78Q:;9D,HIJKKQSSXTTUW]x``*dhknhq,t/uw.GQ"zlY Y!""#$%++,-W02<b<=<>>>;AyEFFFGIOQXX_^3aNb\beklanps*t_uw:~`   q} #%k+ ,1333@55=?@HJSWWW=Z\gJhkxn9o~quvx3xxxjz\N ! !:*!$)1+b-.0044K668 ;BEFG?HI@PwPQRUDXZ[aOgTlmnpwssvvfzR~qn3 j   ^A%'?(>*566h<?}BBD$FCFGGGsMZ__U`lei~oqvww[y|<Gb WS( !&&=&&**++L@QxQRVX\K^__`MiHm2nuz`{|~ Y %-(-R/01o23345Z78R>?ACqFGMSXXY\\]Oldww~~ ixaM  6UT i*#C#)* 5B9<>ADJ{KlMQ:XY_#_T`bq tttx^z||q  -9yqJ h!"%/238%==??1@AGITYYZ[[[]^`aUm+u%vxRxxx}}Lz#D m   2K#+J.&0*33G6749`:w;<R=DE2ILMMNRXY\]<_bblOoqwx8yyzq{M4  xGP\b < $7&i)-/-^7U9c;D8FIKuMYPPZ[q_]befj8m]mp?sWsuzk   R"X%%(+):*+-@-1G?D@BEEJ^NO!OO"S%TWnZ^b ghjmho:pptCI    .   ~    E ! ( u, 0 ;7 < A L N N UU U 1Y ] b p t 'v y # !! ! !!9!#!!!!m!!"!#'!.!/!O1!E;!;!FC!C!E!J!L!N!P!T!'W!Y!Y!^!`!`!i!i!Jl!l!n!p!{!q"""m""""y ";"%"""9"" "t)","-"/"65"^<">">"B"`B"B"R"KW"Q["H^"_" a"b"f"f"Eg"h"Lj"j"Yn"p"xq"Nr"r"v"Lx"y"y"{"2~"R"#]## #S #/ #V#I######_#r##!#$#2&#&#-#p/#/#0#3#5#KB#B#LC#D#uE#H#K#O#Q#KU#W#yX#Jd#Be#f#g#Xq#w#lz#}#~#~##$$$Y$$t $ $j $$ $7$?$"$j'$'$B)$*$-$-$1$1$1$\5$6$J:$?$:A$H$J$\K$VL$O$ T$yT$U$bY$x\$g$l$l$n$p$r$ss$u$y${$ ~$$p%%%%q %%k%o%%%%%j%%!%%&%(%5+%J+%0%a4%<%E>%_H% L%L%N%\P%R%R%|U%"V%A^%c%i%6j%}j%l%p%w%@{%|%~%*%%& &&&&&"&& &&&2&p&&[!& $&)$&-&.&/&f3&X4&5&5&56&`6&6&~7&7&R9&;&"=&A&B&CE&F&dK&[N&N&R&U&W&\&p\&]&_&b&d&g&m&Kn&sn&qq&q&ht&t&-x&Fz&3{&|&[''B'' '| ' ' ''I''9'|''''`'|' '!'#' )'+'r/' 3'4'6'8'9'9's;'>''@'@''B'*H'H'SJ'M'RT'gY'Z'^'d'i'l'Kp'Zq'v'w'Gz'~'e(( ( ((((E(((`(!#($(;%(&(4(V6(6(a7(B(Q(Y(\(`(c(e(e((f(i(n(p(q(9u(Zv(x(y(y(D{(}(~(E)) )J)m ))))h")$)2$)j+),)/)1)C9)9)?)Y@)B)"K)rM)TY)Z)_)a)Je)wf)li)j)j) n)p)s)|s)Ku)~)))***G** * **u*\***P** *#*$*n%*u%*(*V****-*4*T4*B5*d5*s?*?*B*II*SK*O*UU*U*W*OY*Y*\*i]*_*a*ab*b*b*e*n*u*z*\{*{*~**+++ +' + + +++++++:+++o+j'+]++-+<.+t.+0+D1+=4+5+7+?+B+F+G+LQ+xW+X+]+^+`+a+b+cj+k+k+(s+s+u+u+{+{+~+,,~, , ,i,,,O!,$,%,',e*,*,f+,',,3,5,6,C;, >,>,@,D,\F,#J,K,RM,M,rU,U,V,W,^,`,!f,f,:l,o,or,yr,u,w,.z,|,, ----]-H-o-----g'-r)-1-K1-5-:-=-=-5?-{?-dA-H-H-J-Q-Q-:[- \-$]-^^-g-}h-j-n-r-eu-kx-jy-|- ~-|. .4.H.H.+... .d"./.4.4.6.9.><.C?.EB.D.MJ.M.O.T.W.Z.1].ib.f.Bm.q.q.Pu.wu.w.~.z../` / /` />/|////2/"/1#/&/'/(/*//+/,/r0/ 3/;/=/D/G/G/I/TK/3L/M/%O/Z/]/`/`/g/dh/\j/fp/w/w/x/z/iz/}/}/^0000E 000#0b*010L20O709090+:0 ;0F=0@0nB0OG0H0bJ0fK0Q0ZV0*W0_0W`0c0d0d0Ah0Ko0/r0u0Pw0x0|0F~011 1e 1 1 11=1{!1v"1'1*1.10317191=1&>1SG1L1O1R1&T1U1*U1dV1W1[W1W1a[1[1 \1_1 a1a1f1h1Tk1Io1Mp1q1Xr1s1t1x1{1|1i}1~1~1v122_ 222224222r 2 2U#2z$2%2(2>)2r)2/2w42i52$92U92aB2C2cH2O2)S2?T2_V2V2Y2]2b2c2i2nl2nn2r2s2`v2v2{2{2x3333 3 3]333e3#3V&3*3n+3+3+3z-3/1383<3@3B3C3G3I3]N3XR3!T3V3:W37[3]3]3`3c3e3~f3l3p3Pq3|q3s3W445 4 47 4d4H44244M4V4$4'4,)4n,4c.414)24(34i7488494P:4?4\G4 J4R4T4W4BX4X4[4`4a4ed4e4/f4m4xp4&t4w4R 5s 555r55 5!5 &5C(5(5$)5G*5[+525<658595:5@5B5C5D5G5I5J5R5Y5_5b5Jd5e5j5j5l5m5Vt5-z5|5|5H66W6666h 66666I!6$6'6 ,6-6A.6[06H16363636j6666(=66K6 N6P6(Z6]Z6aa6e6e6j6s6x6z6=}6}67 7V7l77f77)7R-7n-7-7Z47"57 77'87,87<7=7n>7?7+@7?A79B7I7L7\R7S7DT7pX7 ^7pa7If7i7k7o7q7t7Kv7w7x7^|77788 88y8:888a/8/8'6868K7898;8@8C8D8H8H8I8L8IP8ZR8U8U8Y8a8b8g8t8x8.z8z80|8|8}8~8$88.9919$99.9R%9j'9)9\*9D+9|+9x,9.9/949k6999}:9:9>9@B9VB9{B9\E94G9RG9H9(I9I9jJ9eN9DO9P9R9V9]9Y^9zb9d9i9xl9q9s9 t9y9: :::D::::=:: :!:):+:2:3:&4:5:!7:8:<:4D:vH:H:H:^J:M:>Z:]:]:_:rc:#g:g:s:t:u:u:x:y:}:':;; ; ;;;;;f;;6;B$;N);s);//;5;7;g;;j;;=;C>;ZA;D;qE;5G;G;`H; J;V;FW;Z;];^;.`;C`;d;i;9k;vl;l;>o;o;p;p;t;=|;U<<[ < <: <3 <<<3<y<w<<| <!!<A#<&<o*<*<R/<0<2<5<|9<9<':<F<jI<I<J<P<P<oR<R<5b<f<h</h<Xl<gm<>n<n<|v< = =3 ==M==x=p=== ====W==1!=!=X$=%=+=0=|2=7=f9=:=:=z;=O>=A=D=gF=gJ=R=)S=V=X=Z=R^=a=e=@i=k={m=m=o=}q=t=hu=x=|=8|=E|=}=>N>>>>&>,><>)>X,>,/> 3>H7>:E>GH>J>M>4T>V>Y>Z>%\>`>e>f>g>h>l>m>Mo>,p><??u??G?R???>?" ?4?L?]?O?\?<?V?E? ?!?)?I.?J.?/?4?6?J:?C?GG?HM?|N?N?7Q?^S?Z?\?"h?pj?k?n?o?St?w?y}?P~?1?@@J@@@@@T@L@W@t@Q@@@2@ @&@G+@,@2@,4@6@7@N9@;@=@U>@?@B@E@H@2I@zM@)Q@{V@0c@d@'g@Zj@k@#m@jr@5s@u@x@Qz@{@|@|@C~@ @qAzA A A A}AA AAAAA)AAAAY!A$A&A6)A)A*A*A,A-A!5AP7A8A9A@A@A^DA"FAOKAKANA1NAOAPAZA]A_AbA=dAeAZfAfAhAiAclAlADnAoArArAtA uAwApxAv~AYBBBBB]B1#B$Bd&B(Bj/B82B 3B5B 9B:BLCrECECXJCJCJCKCMC.NCSCTCTCUCVC[C]C^C_C`CcCeC fC>fCfCgC&jCkC{pC^qCqCrCsCsCqtCvC{CDDDZ D D DmD!D1DD DDjD3!D!D"D$D%D)D ,D/D#:D:D=D?DWBDEDQHDJDMDrNDPDRD:SDTDTDVDEWDYD(ZD^DbDcDkDhmDunDrDtD@wDyD9~DEEE EErEEET"Et#E&E+EF,E.E/E50E0EA2E5E7E:E=ECEFEWGEhIEIElJE#XE[E^E`cEdEOeE&iE-jElEtE%uEnwExE({E7|E|EEFFF F FFFrFFFFFF%F%F&F&F2F:F@FEFAJF4NFOFPFIRFRFSFSF\Fw]F^F_FPdFeFNfF\kFpFzF~FGDGG GG*GGG>GGG]"GV%G-G1G|1G2GB9Gq?GBGkHGMG:QGVG]G^GbGmiGoGrGtGzGe{G{Gg}GHHHH H# Hz H Hd H+HEH{HHHHH<HZ H#H-$HM%HJ)H,H-H:/H1HC5H5H6H6H9H9HBHDHxHHLHLHOHOHOHTHR\Hv_HocHcHifH}kHrHrHtH{HN}H}H: I ImI%IIII~I7II&!I'I*(I-)I%*Iv+I+I.I'1I6I7I?IqDI FITPISI\I]ICiI4jInIxrIrI{vIcwIkwI(|Iu|IIJJ J J& J JJvJJJ:JJ!J&J)J-J/J/J2J2J15JP6Jc9J":J):J:JGJPJPJWJVXJ [JV\J_J)aJbJvfJgJgJiJoJsJ wJyJ"zJKm Kg KKKKlKWK&KKKKU K K"K9&K(K-K.KU0K4K:6K8KjEKGK5QK!RKSKTKWKXK ZK`K`KybKcKfKfKkK>nKjoKsKvK$|K|K/}KyLgLL L LLVLLJLLALL=#L$L (L5L8Lc>L?LBLCLDLKFLFLGLKLYPLRL TLVL[L_L2`LUeLjLmL rL8xLuxLyLzLw{L}LM-MMJM M& MM]MMdMMMMMM M M'M'M/,M0M4M4M66M7M1:M?M?MXAMAM%CMEMEM8PMSMTMVME[M7^M_M0cMnMRtMwMyMn~MNCN N6NNN N $N$NK(N[+N6N7N:N?NBNGNINJNJN.LNMNVNWNF^NbNfNP@PT@PAPAPCPDPcEP_IP(KP{MPPPrRPSPUPWPWPZ[P'^P^PaPdPJhP*kPkP8oPoPsPvPQdQsQ QQQ Q QQQQQ1QQVQ QJ%Q'Q(Q-)Q)Q*Q0Q3Q4Q"5Qc@Q BQpJQ@NQQQ [Q~_Q_Qq`Q`Q{eQlQnQoQxQzQ |QR RSRRRCRR=RORRRRR"R#*R-R 2RR2R'4R9R;=R)?RFRGRXHR[JR1NR(VRVRYRZR*]R]RP^Ru`RoRpR xRBxRyRyRzRX{R|R SEStS S SSSSSSSkS<#S(S)S)S..SZ.S.SA5Sk7S8Sz>S?S @SDSIGSFHSJSOSPSPSZS.[S^S`SbdShdSgS iSnS;rS|S|S~S~STeT T T TTDTyT TTTZTT^Tg!TQ#T%T%T%T%,T^-T1T5T7Ts9T9T$;T?TgATCTFTGTJTOTQTQTUl@U7CUAHUOUQURUWUUZU[U[U^UObUcUgUhUiU lUlUnUnUoUqUtUovUvUwU\xUyU3zU{U|U|UVVw V[VVVVVVVVV?V"VV#V&Vl+V-V0V2VT3V6V:V(?V>CVFVJGV)LVSVUVZV[VbVcV'fVfVgViViVjVjVkVkVBlVoVrVsVvVwV)|VRVWWK W W W WW>W#W(WW9WW?W'@W}@WHWIWNW9QWQWUW ZWZWs\W`W eWhW~iWrWvWxW~WXuX_XK X XXX!X$X%X0XK3XsY@YBYCY DYmDYEOtTQ4YTYUYVYXY\YdY#iY mYpYrY;tYtYxwYwY{Y|YY}YHYZZtZZZZZZZZ#Z`$Z)Z+Z6.Z/Z0Z1Z?ZJZ*JZTMZRZJWZ^Z^ZMcZ|dZXeZgZiZsZ vZyZ*}Z~Z[N[[[[ [f[n[[<[[![S%[)["0[0[)1[1[:[;[D@[K[[S[.U[X[[[_[Ec[ye[3f[%h[ph[i[Vr[s[t[y[|[|[E}[~[`[U\\S\a\\> \' \ \ \W\\\\\W#\F+\ 1\>1\-4\O5\6\+=\G\I\O\;R\#a\a\a\Db\d\#i\0k\l\:o\t\Nx\|\}\j]f]Y] ]]Y] ]]T]] ]]2!][$] ']']P+]/]1]4]5]6]KL]~S]T]W]`X]J]]@^]:_]h]n]y]z]}]/~]~]]@^a ^ ^p^^"^$^Z%^y'^'^_)^).^q.^.^4^>5^:^'>^U?^?^HA^(F^zJ^L^&N^eS^Y^]^t_^wa^8b^Pb^e^j^l^l^m^m^r^r^tu^v^z^}^/___w___^ _ _j __G__ _D#_&_,_z-_._o._|2_4_:_s<_v>_?_K_K_L_^M_OU_V_V_Y_Z_]_`_e_e_}f_h_(j_o_q_q_r_ps_-y_nz_l|_~_)```2`{ `````t`R```V``!`#`(`(`-`-`.`c0` 1`1`7`8`m9`p?`A`tB`D`G`H`5I`I`L`L`R`&T`X`Aa`)n`p`p`,s`0t`w`x`saa aa awaa3a"a`a a#a'a7)a)/ab5aA6a7a7ac)>cE@c+Dc.Ec!HcLcLcOcPcPUcVcWcYcw^c=`cDdcgcVmctmc:pctc"tc7vccccdzdd%d&ddd(d_)d .d.d1d3dS4du4d 5d*Dd1DdPJdQdRdSddYdZd^d_d$edqdwqdqdudXxd}d~d0eeee6 e ee!eeeeegee #e'*ea,e.e/e/e3e4e66e9eTeTeUeVeVeYe]e^e`e3deeeleoe5teteteF|eeff!fTf, ff'ff f1fff$f)f(.f 6f6f:fJ=fQ?fmAfGBfCfDfGfHfzIfJfKfLf_OftQfRfTfUf.WfWfbZfM_f_fbfhf@jfjfmfqfjyf|fgYggogg ggggggg:#g%g%g%g'*g*1g\2g5gsisiyijjjjjHjj}jjjja j j>&j)j*j ,j,j;j;j;j(=jA>j>jIjKjNjPj>QjUj WjDZjR`jfj{gjznjBqj\vjwjyjO{j{jikkxk4kN k k kEk&kkkkkk$k1k k"*k+ke6k6k7kj:k:kd;kns>nCnsInNn=On PnPnCSnTnWn[nS[ns`nfenhnpinAln qnPrnrnxnm}ni~noo\ oo`ooo["o1+o,o/o/o0oF5ogAoAo0Do,EoFo$GoIoNonPouQoVRoVoZo_ofofhoiorkoClomoOooooporouovoxo=pippp- p pppppCp] pn"p#pB$p%p&p&p(p-p}0p0p2p7pN8pApxGpGp5Hps_BsHsSsIVs*[sC^s_s`cscskscksnspsrsus[xsysO{stttb tE t t! tt]ttwtttt!tv"t"t#t#t$tl't`+t+t0t2t5t"6t-8t8tEtGtItOtYt[t[t[t_tbtdt7etetftnt>qtxtxtxtxt&ztzt|t|tT~t=uDuuu\ u6 u u1u9uuuuu0u,u uE!u+"u$u,*u#.uL6u>u3?u AuwAu?HuIuQuSuTuUuZWu XuYulbudumupuquvuyu~uvvUv vq vNvv9vvvvvv*v_vDvuv`v;(v^(vN.v.v0v0v7v[8v8v:v=vBvEvFvwGvMvNvOvPvWTvVv~Xv[v_vl_vcvdvmv"w%w9'w'w*wC0w3w5w:wAwWAwXBw3IwIwNw#OwGPw`PwSw+Uw\\w:^wcwdwewgwjwKlwpw/vwSvwzw{w{wz|w!xxx xxxx:"x{"x[$x'xS*x*xu+x+x 2x2x'5x5x6x;xg>x@xnCxDx!ExEx8LxLx$PxWQxRxdVx^xcxexixdmx.oxUrxhrx^xxEyx~yxyxA|xI|xxy yy@yyyyyyOyyy y(yU)y@*y2yh4y5y78y|=yCy DyFyHyPySyTyTyWy1XyXyXy[y[yj]y^y`y`yfyfyhymyoykqyvy>wyzy}{y{y{yzV z zzzLzzzozSz$#z(z<)z)z(*z%,z3z8z=zBzDzPz;QzRzSz[TzUzXzZzb[z;dzjzoz^pz(szwzO|z { { {{{{{@{{{{#{${({-{0{1{5{c5{6{<{<{#>{H{H{L{O{eQ{Q{S{W{X{F\{\{$]{]{c{qh{j{k{Ok{l{o{p{x{{{}{{%|n|8||O|v |V | |/ |P||%|C|K|||!|+|)0|10|2|d8|3M|CQ|U|uZ|\|]|_|b|6b|9d|^j|p|r|s|v|y|z|~|}}}} } };}w}-}}}}0}i}2%}%}'}(})}[/}/}3}v4}A}^B}SE}>G}zI}J}HK}%O}Q}T}eU}U}TX}(Y}"Z}S\}_}(~\*~+~L-~-~0~1~3~43~a5~o7~Y?~?~'B~mC~D~H~I~K~K~oM~N~T~`~a~~c~e~i~m~xo~o~q~}~~~LM x  -    $|*W6G!O$+;..06]:<;H<?@@F8J KLkPUVY\```ddhjkkollmjppq r|k~7OwT| s jA"9$ &:'u+,./2//202y335Z67<<@MBC|EEI~KKKMNRX[^$i6km nopp=qtu H D!'%]%&)y-./&6 8C9c>>@HI#JLtPPQGRS}TUV VqVj^p_WaCef%h6lmxz|Y}`V _ 'X*23O: ;==H>>>@CGHKMN]NNOnPRW[/^7`eMnEqssy|}~M r !~'0O235oA7BEGOz]c(fRillWm6orttuCx}d ,$!,--N//;23<3'9#<<JFMwM9QQUV[acccejexeiik0lnosu(u~W 6 &,+z+1267:"?@DF=OVyXYM\_ !25>%~+"%.&='(**./55'>>@9BCDELMOP e S".|/163 8f8:9l@CDFFGeKpK LOR-UUXZ,Z_ddfahhLlZmrvXzK[ E P P$N% &)+ 0C89`;w<0@VBCwDDvH5ZZ^^^`fim r_rd-/028I999z@ACFNQVVZ[\ ]g^G_bdefzinwa||| !f k'*..]12O5b5f7 84=@@dDEEhI[KdKLQFVX\a`acehpttt~Gr C?p!!(,- 4 5]<z<?X@C!DDEBFI@J]JR3S6TgU\\Ka{ijn s`tfx1{~A- i OuW U"Y"#C&',';)V)*>,,#1+3667":E@AOQ5UY/]]`)`b]ddhjjjkpmmIno qqsuzz {#  DV Y!"&j*,n/.035X7*;<=CGIJ#WXZ\]{bccedsttRwkwxaz}V+ivV!I%h'M+a+-.3 <AbFFHaLLHMTUWX\-^d~hmmowszz&{{1nY8)-T #,-.../3q58B>DFfM PGQUtW[L[)\x^airjlpqbvvv{t}o 7 vew" '$(,I.m/37::>~BBEJRU9VW X\G];cAe\ggjWknr~v{{} $&A%U(<++|..234457$;==@GHCIEKO)QGSSTT_V[]addegghh.lvw}8}z~!b "$'*N/@AIIJJKVMPQ VVZ8[C_lacff*g hik"llotuv-zz{U{if =zg%$,$, /2/7:::=AfHjKKL4OR\`cbflImrvx{/} \cdS#1$$1686;;&??@AFGI.JKK-NSRUmZ\]garacRcfgj6pkrrttux2yVzzg}~'5L k ^!/#>/1z23m88>D@CC/DPDGLLOQmTTT{Y]}albcd_hiklKnorsRvw}qZ jx\c 7 "'))8+-R0r234669=BFFzIJ:P W[XZ[^bi:nov{(|R~F $^ """$)2)+0(1E:ACDGGMNNQJTV5XY\]^clgtv X_ :"('+,50s2 >>@@ACFMQRTUfkmsxUfm/? !C*/%0]3568T88>>FGPW[]R^jlsktpw)yyyzk}* /@Our y 5!(])~)1,,-E29L;;@<>BD0KLMPUX["\be!kqs1xDz{~cSO8 wg0&)*T+/4j7779=r??ZB/DFFFzH4LkOOQSZ=^b^`bce+hmtuwK|&3@LE"#$x''(,..1j5J6YCFH+IxL;N%OKOQQWRZ[%]_knnTrqr?vw#|(W g$.%a)G1g689(<>@EIILKLPRWW XX~X3[@]aeHiop{|C~~s$ u !~&&'K003J7<==R>?SAJKG3HHhIKLJNRSTY1bOcdgg{hijrk\nou=v}{T FqzXq#,".g16=@ADBFI?TVZK_afik nrsy\}A |4va w"#(+,.G/d/2:0B}BCIJuP,W?WX[\Rc`cd7e4gBijm&pq5x#|_}`~ n$&(189Y::cADDiGAHI+,X7?BEKQVVa+bfmmox)~1 f"%{&'1d1L2Y4!5:;uDF`JWK*LLNPROWXWX\]9aabkk8mmqr_s{}xT#="(--/1:HI@JsLQ!Z]ai3k"mop % d>$%&Q&&**+,L/08V;=RB&EGLuLL&M}OmPSU V~VdXZZ[)\\ijmmqst;wzD>a Q e VZ%&u&(/J0223`728G:;BEG~H;LJMzUV\badjjxprstu| b ""%(*/T025":z<>lANSS-VZ\adefsj/n}npr/tuuzwlyy|}q@  !!')K*,712 34A7d7;<.? BkCJOQZTV#^+^_:`%b diii lrzz} r9 }z;D!<""&)_**+-3./z6=6>{?ACMU^Y`aWbnbce9f{ghjk/ppqssv -{ S !@'h*..k/;2t377g8:F;<BCSY(^ bhhnv{l|g}~~vq L <H_!!""%,27;73:<@FFIqKK LPRRBSVlYZf\]Tf#jkqIr sux|Yc4 p<Tv"7$>)@***,.'/b0Z1127p8A99<BgDEEI5KRfVVVY` behnlorx8xx,z0|]c2@w #V%+R-2BC6ELGGJO/VWY\\`mcc/df~fhi|npnqvN|:}:~~; :9K<tb#'*~/*4856]:;BeDEH{NPRDVSZ]aLff%jnrrr{t|n}~M9x @#%q!%Z*..a.26:ACEGJQLNRTXZ\^^|_bocdzlm o>oost`vw{r~"!FQ~j!J""(+++,,6-:00[57389X>>?kFL5SSY\,^```df,rbstu=ww7U| W bm=v}!m"&))#,,07011467; =z???ErJRRTNYYZZ [f]E`'bd3fZg@l,m!((u-12=KQRS)TYZZ[\C_a dgffiqpvOx2 } uu k$+,y. /V/:26:>@ACC*DFCGG}LTWY3ZZ_c1dad>jZlqsrux#|~1] ~ z\#r#_'(*388>B\EzEH%IJLNDOsOPYO[^ajkqrkxyy|}} \H$T /0578:x="@AfOOU[d|ee{gjsmo sx[yzB|} 0  vig !m&u.e67:BFGJKMN"Q{QsUHY]^^_eij3luyy,z'9G!"F&+/0223367-;@;~;?lADDJJ=MoTTX]&do(ruzi[z |H!3#'( /?//t23C4478:@eHI~LxPzYJZZ_eeSkckrauuvtv3w|nX=}^!! *+00799;?@%AFGKMS"U,V6Y[\]h>YAnCAFGHJLMNOPV.WWX$ZvZ4^&`*a]dnu vnv:  4 L&!3!%(**+@,- 569O:L<<7=R?AC>D5EHLNAOyOTdVY]``RagGhhjpl(nSopv`v#*mn | |!())--./.3W66 7J7x7b9:,;?;>"AAEGHOQRVSXUVRWY=Y0]5]abceiJlmq\rs}xxzzp{{N.os j`{%)+ -m5<??B~BFFHeJLWZ ]dlnssuv{Mn V,s -96e6=~DFJLaM6PTsVBWZ[gllo3qqr@r1]%9'(/566M7S;>EiFXILLQRTVr\``Kefixopvvw=}J W#kSj(1[2{3t4M557;@`A DEEFJ"L NOUpXXcdn_oooMww,zz}Hj 1 ?& ' **+,2H?qAhBsBGKKNNQS[^bdde(moop"rTss3tw7" ]r) "$).P78D;k>@mDDK`LLN:PQQQR'S0VWYYsZ:\+`adHkkmpqtRww|) \ qs y "$ 'V'*-Q4^77<=>BGNPQR7U:VWWYrdVf$ioqrsvxx}2P = T ! *-50\113<=>u@ BEjJLLMOPQQX2\cftu y){| F x zsW %&(-|499>Q@AFGqMcOQ\QQXY]S^`cdfghJrCyS  "&'c+1wDSGKLQYS[XiX.YZ^<_Uad7gllmruNvvsw,yzR{&A k vAr5)G-52f4577;CDZG^I1JyUU[_bEe hjbjpBy9z }l) $}))-003254<<RBCGGIK*NOTVYZu_cjnor7xxey|Z~ ,  }a  "q%-.03 47?@AgCDHHH[MOXQUddagh"inqLr|rtuw w*w]yk{|^ ^nA|!"p$S%%'i,-!1_629>\@F\IPUXA_ogsu_vCw%y}}Iby-i #='D(w(*-{1275$6;@tCALLpMTNN}RJY\aPfjrssy{h|~x8 #pYkjv2D346::?M@ACGH>IORSUY_`~cThejgmnnu6wrxz6 ' a  L"Z#&*./)1389:m<k=@{E3IxM1PYUV0[[]P`UcdebhdlnIrowz{~~< e+5"#')x)O/0<45k77";<*AAnDJHMnOSWXZ[^bcdg`imTqOz|h}+eG,C%0*|-/;<J@ADMwNNRTU_efhoprr`zz{}}^ !"u"&'X){./023}5788? @ AHR4RLUBWiZf\`b>hhvOxZx?{{|(}PA | * P8(#$}&R'07<<C@AA+B~HqI_KLNOtScT]]fffillnqssuvww|.} r o3 !)*).0i117 =>s?@AB|BDIKCLNNQ9Y]8`|abzeeDCGNvOO(Q_RSiU\^Td7kZlmYn*ooMvwYzF|~%S u g!!\#$"&)@,->8M8;;;3>AXB/H(KLT\acegghl"q{| V%**+.s268@$ACWI1KVKMOQDTZ\_`ahrkyy{}3 R\ $%'-e238f:;B?{?HIJMLSO TPW_YZ1]5H7BbELAQT&UzVW[_0dqgnqz|~q \ xI'013J68?AAH5PBU5Z6]b]:__efkkdlrr|gE*6i s&*{/&2\45P9<<-=>u@ASCaHHL%XKZQ[^^bc|g hcjTloapuvw~xmz{}# 9"%,D.\2_679/:;<<@E?FHQVeXx_`ccegfko3ppssvP{UV]aK8{"3%-))Y/0<?K@1D{DGJKPQaVXT]efWlmBquwwx}? Z r^!Y$`%*-1)23F46s889:<>AACGMiPSTWg]j~kn%vivQzzJM1YV s]W C#($ &&!''. 01a26=L>@@DGEGIJKMmOOO6PzZ^[N\^`ao>qsuzww|}}}x ( )M!_!m$%e''*=3'4(449:FG#I|I2K:KKLQSITUVMYk``b!chlloZ>B?i?x?BE]HIIJ KHMPTU"WYPYNghijkno-ss?vx=z{|:~W "&'446U79@LGKRR SVkm{*~MZj [j !-C.257;>9?@zCGnHKKM)TjV a_af*knpJrs-tu@{2}u q!l'()[**,-/14]58:;;@@AEFCGJJ)L@NPR:SVXYY[P_&kknpwy|}BL y"B##&O'v)*,,P01 6788r9>?DF:RkR>>GI|KPrQQ(S^YZ3]kklmp|uIv*x4{u~Qz+P%%/+3//=066J7QAVAC+G&K MZ__abcqdem_nssptKz 5 5"^ X!^""#&(-G017:<'?? A8BQEEKM0SSU:Vegxiajjsuu3wPyVy[{~~/l2 [|'(7)k-D./227>?@:CDhFF8GN SSY\[ccefgijlpaw"|}F}}~Nx <+""&*+3-B1089I9:O:[={BB;EHOPQSTVX[[^tddijelmlmMmnouvwz{ ] G U +L!_%K&+.'3P5"77c8f9<<DGI1IQJKLLSXRY'^_deh#jmnnoorxsitxy y|X{Y$,(Q)[*,F#GI"J MFO}O QRV2Z^'_kc dfaginr syttvyJ{'|}}c{  L X d p|0밴ձ桰עȷдauto޸ĵ8222352Microsoft Office Word@@ B9#@F0@Ȫq ՜.+,D՜.+, X`lt| D%  P&Jb _PID_HLINKS XMLLoadedDocGuidInternationalLangualeLanguageEdition IsTemplateKSOProductBuildVerA ]http://fee.cnipa.gov.cn/3Ohttp://www.cnipa.gov.cn/3 8syspara=;,ZH;,DE;,EN;Ӣ,ES;,FR;,JA;,KO;,RU;,PT;,AR;,OO;1.0.207/2013-11-13 14:53gwssiTemplate2052-10.8.0.7287hxMEMacrosqqVBAqqBIO> dirrt (S<S<S<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}P @i`i`;  % i ^ @% "   ((8`*p6200`,h  "    D]] $( " %!$'RID  ! Ʒ  (?5_  $'=½,¶bookmark  !  A@XFormField  A@0 Total=  " %A@^Td Ʒ  A@Ck` $(oH.IJ $( A@IJ $(o̲Attribute VB_Name = "BIO" Bash0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse CreatablPredeclaIdC@ExposeTemplateDeriv%Cus tomiz E Public S(ub Ue(NewComPonentID As Integer, FieldS tr ing) ' Dim T4MarkCmpPara; 3p3AppIation.ScreenUprdng4"=NitY%(ThisDocum1 .Form.s(BKM_9Info).HelpText1ID If0@>= .Count` Then #.FirstCellTxt@,"`Ʒ" &M@OJO= 6( , /½,b0ookmaReAFilqsIn Bh ,9Sour ce@  - 1 'WGl\'݇{eTotal "=N,__xS+Et5a.\5_6End IfWTru Sub oDeleteFaM@jpRen(@TgBT  bqRow=E  n  50* pHdProjectQ(@= l 4X J< rstdole>stdoleP h%^*\G{00020430-C 0046}#2.0#0#C:\WINDOWS\system32\e2.tlb#OLE Automation`EOfficEOficEE2DF8D04C-5BFA-101B-BDE5EAAC42Egram Files\@CommonMicrosoft Shared\OFFICE11\MSO.DLL#M 11.0 Ob LibraryKMSForms> MSFrms3 D452EE1-E08F`A-8-02608C4D0BB4SFM20L'B _&/;"~1jIqAHq00}#0Bq# ў50 ADBCA11F9-B274-4C5A-A347-62E53A1C1BF96DOCUME~1\ISSUANLOCALSTemp\Word8.0Àc8.exdd=".E .`M AуMSXM L2hXML2l b2F5078F18-C551-11D3-89B9KF81FE221}#4msxml4.dll,, v #RN@FalNEaQp ` `* \CW&cxa=xxxx{x5xbzxxxAVBIDE> @/VBIDEC`E)E157A05.3#PVBA\`6E6EXT.OLBhHVisual Basic for Applics Extensibility. @("ThisDocumentGTiDPcu en2` H1`L",Qx""+@,CopyT oEach G @CpyTEa`h 2joO2\/-"g!b%frmAddDaiLiRenG! fAd@ai iR6n2 -U(Z AP MsgBoxGV M g,olx` j2o`xr qp}2ppDataGpSDt0 f20̿s-FaMi\ngrq-FM0ng6!s-'3-3B srmShenQ S76Q 4$X9$_1_ _ _ BOYouXiaP.F$Yp!uX Ja0A2iEnA$3ListHorizantaZls7LPH0 rz%lt7[3o_ S?ՠ`=' {ASQRGSQ`%D62H9A#?3modGon@eField3mdGoeЦiGlH&[3U_Feda };ar#BiologyGx Bo6ypO#7 * ͨģG(u!jWW2.W0Dy`NkqDDja2'su2odMsM3{? MM3{_ Y? &; 0Ihnit^ 1#I]@)iw_2Ы/0q,q? {\4PubG8PbtVerif/wV8If jwgrifyHP18(HP,P!0D+ShenQingRen_NewGhShenQng"R_Nwp2 8&L tmp@modG  mpodM27R7F.7G.KmՋ(lu 2 1S1c11!jW|W1f 0 0rbtKvLCommonObjHectvmNC@mQnObj@vct 'vO)O)/EK)ABIOCABI"@OnO"EBBpyandFillRecor@ G5padFQllcJr;B2O2QO2NIFMRIFM&I$$@fQ_'$$ reateFponentsG`tA"EdCrDaUDe`op#n`n`sG2o' /$+$ heckPIDGckP LDm2@-*s5DL5DL_55 ZJF5dYXQcBYXcBc o -q *InterFaceA*Iet6rfac s`+uN2HQ]=^+,!frmBuzgN@-`r Buz5DgR 2oCoP>q&caBio#B}`oթrB+!{Elem ;G`{ELe1}t.K9/t? WhrPrVo##Cr9rw0:##C& /s ^ -f< i PCLef tTree&.G..C C;e%htTOe0DNeFs/22fS = [ {0F  #G/8o9c_ :W[ 8Addux8AvdReDo;? m4>;R0ESu*p;fmu~p@3;;_%__odSpecialCharGR-ASi&l@whpr_2_0G6a?q3a _ |;9_ T` JxMEDLR{ FMRsw6SQRYXQvxu      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSUVWXYZ[\]^_`abcdefghjklmnopqrstuvwxyz{|}~ (S<S<S<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}h @i`esii`  %`B  iD X0%00 "  ( 0@Xx&62 $@hp  "    DУ]]] $(  'B ID B %!$'  ! ! ( ) (  $'=½,¶bookmark  !  A@XFormField  A@0Total=  B %A@^d !  A@kp $(oX.IJ $( D A@IJ $(oAttribute VB_Name = "DLR" Bash0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse CreatablPredeclaIdC@ExposeTemplateDeriv%Cus tomiz E Public S(ub Ue(NewComPonentID As Integer, FieldS tr ing) ' Dim T4MarkCmpPara; 3p3Source6@5AppYation.ScreenUpdng" = BKM_7Info,ID#=9itC?G%(ThisDocumC.Form%s().HelpText)IfAQ>= D.Count Then ,FirstCellTxt5AKeVBody & x"("@,Fl)A@c=%8(, +@u½,b0ookmu,ReFilsIn{| ,=KHD  - 1 'øYGl^ '`GDeTotal "Z=&,1?=D;E}E,nX6# End Ifc:]TruSub jyDeleteFaMtRen>(^3@y $v dA "IRowe=E Bt   T\h _'xME (S<S<S<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}  @i`OWim;`  %  pi8_i` h % i   0i Mark 8pi ص%806 "  ,(Xh62$8(@h p "  ,62H$0  "   ( 8H P` " h p    ,"   (8]] $(  %!$'R ʼ  !  (  $'=½,¶bookmark  !  A@XFormField  A@0Total=   %A@^d  A@=k $(oxM]8]P $( N %!$'U ʼ  !  (  $'=½,¶bookmark  !  A@XFormField  A@0Total=  N %A@^d0ӢϢ  A@Ek $((op $(  A@A@ $(o $(  A@ $( RemoveFuYeo@&ƣInitCombobox0 $( >!\A@Z $(0oijAttribute VB_Name = "FMR" Bash0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse CreatablPredeclaIdC@ExposeTemplateDeriv%Cus tomiz E Public Sub UeFaMingRen(NewComPonentID As Integer, FieldStr ) B Dim Ta3MarkCmpPara /p/AppHation.ScreenUpd\ng4"=JitU%(This Docum/.Form,s(BKM_Info).HelpText) 'ʼ@!IFf1?>= .ACount Then $.FirstCellTxt@-"" &GL= 3(D, -½,bookm^ReAFilmXsIne ,6S`ourceH=  - 1 'øFUGlZ'0݇ByeT@otal "=L,\u Eq2a.2[End If TTruSub lEngm m 'mme;mmvmtm ?n*?nW?n&B?na?n?nld?n?n?n ?n?n?A;#+n!ӀϢ|;5otРoDelet(nnjl?>h$PoRowRemoveFuYAQO 7wzL ( ng ?> "  ~ 'P'ƣ@Init0gboboxSlear(OcxContainebObjectCValue fPՎ.Fr1/`]AxME (S<S<S<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}@ @)i`ii`$ stBo %`` Hihi`  %  ineSh x `  i  `!` 0%xR"  ( 00@p.62 8X`x Z .h . . . ( DH    0@&Hp x "  ,6 8H2$08 @P " X p  "0H` Bhpx(V]]] $(  %!$'R(Դ)ID ! x(  !( ) (@  $'=½,¶bookmarkA@  !  A@XFormField1765  !  A@]  %!' country=$'   %(e  A@0  A@,  %! TInitCob1 .InlineShapes(1).OLEFormat.Object, Mid(thisdocument.txtProsperType.Text, 9) !!d $7!!A@ !2!d $7!!A@ !4!d $7!!A@ !2!d $7!!A@ Debug.Print> Debug.Print .InlineShapes(4).OLEFormat.Object.name7!!!0$H'd@7!!!0' k 7!!A@qTotal=   %A@^Td  A@=k $(op]] $(  %!$'U ʼ  !  (  $'=½,¶bookmark2 Debug.Print NewTableMark & ";NewTableMark"  !  A@XFormField  A@0Total=   %A@^dӢϢ  A@Ek $(o.IJ $( A@IJ $(oP ]`  %!' country=$'  province=$' city=$' type=$'   %(ox]]  %!' country=$' )type_ type=$;country_ ; province_  province=$;city_ city=$;country_ $ X 'i`XAttribute VB_Name = "SQR" Bash0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse CreatablPredeclaIdC@ExposeTemplateDeriv%Cus tomiz EPublic Sub Te(NewComPonentID As Integer, FieldStr ing, cob) 'Ā PDim (T= T 0.FirstC@ellTxt@9"(" & & ")"aAdJd=k CC(!,<½,@bookmv-_ek;sReFil@sIn I",@SourcM# - 1 'FkM@ , Get@@ !] [}`SD`|CS6 =`:WMTotalM SetFlagbAdd(, "cMry=")g\K  =8lcd29B'̀KaWith5'BdOsF).pRang /e'Init1 .InlineShapes(1).OLEAHat.Object, Mi)dtxtProsperType.a, 9* ! Reg wb-t,'' . nryM 2o_ hV#vincG!em 3 it%5 Q 'A$5Debug.PriQWe4_.nPf IsNull(S$ot.9)+enKa 5""\P qE;,End If;+_City  m :CaF "b=j,=]kxl+^Iq،qb }1Tru0FSu b ߔQREnggc4Eos T#zo dU?!3_y0ʼ nt1d  nBC(Ew;<k3ldOyew& /Oy!e::o # 9#9ӢϢO e_:_:7DeleteFaM`5(@2 ϳ6p!ć,/5/5(pBRowFEEpc92rs(XC [ng s{MopoAe = provyHd(tmpDataSource, "city="0) = SetFlagValueAdtypexThisDocument.FormFields(BKM_TotalCobs).Help0Text^ n End Sub Private Function GetSQRAMarkStr(Dim CF As i ngCoun8try = [.,=OD_? b"_8" &!";_?֊"c5% N& provinceX!@2`"@l4T((6) + 1 xME (S<S<S<<N0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} \@"i`:iroi`%  %` ` `` ~  i   `%`1 "  (08@&P0x   (60h 6,8X &p0( " 8Xp Bx( xV]]]] !2!d' HKTW;̨,HK$`'  %!$'R(Դ)ID ! P(  !  ! 1 (  (d ('k  $'=½,¶bookmark  !    %!%%l!(dk@A@  ! A@TFormField  !  ~ A@  A@0  A@,  %!  $7!!A@q`Total=   %A@^Td(  A@?ko]H  %!' country=$'   %(o`]  %!'country_ country=$'~ i0(WAttribute VB_Name = "YXQ" Bash0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |@GlobalSpacFalse CreatablPredeclaIdC@ExposeTemplateDeriv%Cus tomiz EOp tion 0licit Pub Sub ]e(NewComPonentID As Integer, FieldStr ing, cob) '@ D(im (TEMa rkCmpPara = y@en ; + 1 Sou8rceuڀ1@ FirstCellTxt@57NřG(E ""B npd If gO=k&6(,(2½,@Abookm@X )0)*EBD so).Range@`s(1).'(2, @DYy)q!Upd@iHs'ReFil|sInB:I',D?ID' '_ _ KO , Geti !g `lnB'frmSupz|)txME(<<:< <h+X @iZ `i\  ^ %`` x`b a;a;`d b;b;`f '+h @iZ `if  ^ %`` `b `d  j p( )8HP%iZ   il  n ) r P   ^ %` @ %  i<@iVB @@HPX`h   (:H  B ,H` p  $08@HPX `hpx " 4  $8 " @ HX`h6p0"   " 8 @P ` h px            ( 08@X p"   " 0 H h   @`      "( 0 8 @ H h            "   0 N4newvalueҪȺ,UpdateRecord("SQRGJ&","flag=888")]]]]] \  \ =$'f ^ !5_ ^ !&  ^ !&  ! ^ !& $ Z B@ ^ !& f '` `   ` ^ !& ;'b ^ !& ` b ` $'d ^ !& `  $ \  ^ !& b $ ^ (& (ypdh ^ !& \ ; ^ (& y@k8k0k(k i]]]] f $ =G f ='f j ^ !9 ^ !&  ^ !&  ' ^ !& $ Z M-dd ^ !& f '` s `   ` ^ !& ;'b ^ !& ` b ` $'d d  d = $'h yd'h ykkkki 8!d; 벻ҪϿ';' lʾA@j 8(d  8B@H|k Z 8!= 8!0A@X op l |k l    %%lB@H  l  R  B@A@n o DelLine Macro 2009-4-15 ¼ !v l 7  9 n 9 p 9 q r 7  9 n 9 p 9 qP t 7  9 n 9 p 9 q  v 7  9 n 9 p 9 q p 7  9 n 9 z 9 q ~ | 7 ( ~ 7 ( 5 ( qx 9 n 9 z 9 qPoH Macro59 Macro 2009-4-15 ¼ v  %!t (X %!t B@x  %!t (z ? %!(|  %!(z v  %!(X  %(~ @ %( @ %( ? %! ( ? %! (  %! ( G %! (  %! (  %! (  %! ( վݬ %(& oP]]] t = timeGetTime ^ ! ^ !& ' ^ !&   $aaaaaak(k k MsgBox timeGetTime - tooyAttribute VB_Name = "ģ1" Public Function UpdateRecord(shpFla@g As Sng, NewVa(lue&) 'newv<ҪȺ, "SQRGJ&","fX=88@8") Dim tmpShapPInlin e eiStartteger1EndBody ad p = Left(!z, In"(1, "=")bFor EachdIn ThisDocument.ks5}If.AlternativeText@ <> ""!enLen( ) > 5F4, 6)~ThMc=DVSI?D> 1- izC ,UOf;ŗrA†= MidR, E-2A@UI - 1) &G&\'D#Exit RG Elsk%5"; ay|Ifo?mN`h !% ReadbT1WG7HCmFIn a T e@Right(f,aFa= =h&c_'___E;f_ k_,g%Tj@ ___r__/I1P'xnan +p&U?=qF"C?Y? CxCSubtCob(0Objq=ComboBox, $#s..Q~0{0oMsg "벻Ҫ';'", vbExclam 0onʾ8pSelect?B`ٜe, dna2Fk4H#X ` MergeCells(totalsq>rQ<= 3 On ErrRespsx C @.Tables(1).1!(28p,w- @3) * 61T.MoveUp Unit:=wdL`, counO, Extend DelQH!T( ' ' Macro 2009-4-15 ¼ƃWith O/.Bers(wd!U@1. Styl3Singl Wid= a050p($.8ColPaAutoq*c' !a O rdI n_ _ _ _ e_ #_ _ _ Top? ? p? ? '? ? 1  ? Boto o o S L"h" "HorizonD -T -pWhit2!DiagonalD0own)B8eNonX?4UpTN@one .Borders.Shadow = FalsEnd With$ OptionsDefaultLineSty$lewdSingl 4Wid th4 050pthColor/a WhitSub  Macro59() < ' 2009-4-15 ¼CSelec!.Inluhapes(1).Fill.Visibb}msoSolid"0Transparenc2y~0#.W eight.75?LockAspTRaU(NTrurMH45.4]45.9^?PictureFormat.BrNnessOlContras^TypрD%Auto%ic<1CropLef"^ORG'8TopA'?.Bot`oAlternHveTex"վ`" 60ADim tmpp As 7zc,T St>r (atimeGetTAH Each In ThisDocumentjC! =.'Ifu <> "r" en @Len(c ) > &6ft$, 6)@1"a aK !a/IfmN7D*MsgBox * -  Public  ChangeSQR( ShenQ4RenIDC:teger, Sted<&      !"#$%&'(*+,-./0123P6789:;<=>?@CDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~|`<OpenClipboard8CloseClipboard\$EmptyClipboard(HtimeGetTimexMEl (<<< <H+< `@ i+> $ +@ H +& l +B ` iD iF   L  8' % X %`@ @  p  (% P  `A@j x % R   % T  8% PH HH H B  ,(X "` hx "D0xD(0 "8 @*Hx0 " .0@ HX "`hp&  "& 0HPX h`  D $J  F $H 'B i A@< A@@ A@> op] ]@]`]xa;a;a;a;a;a;a;a;a;a'b;b;b;b'7' ;$' ;$'   %!!  %!! %! $ (   'X'   %!!  %!! %!  $ !!(d  'o]  9 %!!%  ' N l\ yyyy-MM-dd !VB@Xbbs  ((o ]H]` &'  Ʒ1 %!![ ![ &  o]  !h ! ļϢ [ !!k0(o ]   !Ϊ !^ ļϢ [ !!koAttribute VB_Name = "" PrivalDeclare Function OpenClipboard Lib "user32" (ByVal hwnd As L0ong)CloseR!@Emp ty @time0GetTiwinmm.dllkA!ublicExecLine(sCodexSng,fCheckOnlyBoolean+ 3&Eb .)Ptr1), 0&Abs(.))00 E ZSub Jus2t()Cv(0 ltttDim flFormF0ieldASh"pDInlOSh(apeiCtegerGarr, @CobTextCStr@@8"a;NXco2bb;BSQ RMark7@@Split(, ";"H"  ? EachCIn ThisDocument.Range(km$s(')C .Start, ).^sJAB2.Result`(i$!ii + 1NF-LaA9."F.OLE!at.Object.DDFAhSubAZ  ReYXQ@s\"]F$`M$AG"aO9"= c 2A!9!Input.EditType :=wdD@, Defa=: ="", at`y-MM-ddD^e nbbs" & i@##fdsj'"a!wA `C !PH`e&ĀƷ1Z'@Debug.@ntap.c cc1- t Bfi|nd a'aϡ a @#IfS 1@B`CļϢ") > r0enaI7IfPba `Ftur.R\\(<C_(: +#*"//,SsQO N  .WxME P<<<<:+D i^ N%+Hi^hi` N% ( )Z%` h )8 %ib`@P @ ` dX )8x %i@f `@ `F j@ il`in p@ ii r% t8%+ i`ib``d 0 iPi`@h +zP !i` ib``d | i6 )8  %i~@< ``>` P     08 B @X`hp x   4     "0X `hp x 6 *( Xhp B Vx $  HXx  B , 4@Xp x B ,  8PX `hpx B   $  B  (08 @Php x    @ `p x  (0 B 8@HPX` x   B   ( H P B X ` h  p     B (      T8 4   4  l        H   0 xH   ` @  B  (0&H*p B ( HPX p`@HP4pl (0 @P HX8`8 X`hp " (@ &`    0 @]$]$]$0] H] `]] J DKT R'J BKT 'J @KT T'JnX ! Jl !%^.HT H L9 ^9^ 9 JG!X 5n(0X JSe(d .ComboBox.Value = FieldTextd 9kq JStry= N$ ;G N N $'Nj N;$'P L %B@H L %!V!XB@8  P $P L %!V!XB@^ex, pkiLIFixCountָмǹ̶ģotherMarkΧڣڷ˵ı]X]p  \ Z!L > Z! * n  > Z%,'n >atio n n $'n% n;'n i`; ͨõķcomboboxıݵĺ] N ! N!!lW N!!!$H N!!!0$H N!!! ^ N!!!0'DkkkxpihO ͨõķcomboboxıݵĺ] N ! N!!lW N!!!$H N!!! ^ ` N!!(dykkki] Z 5L  ;   ; qi(]]]] 8B@8 8!,$'P bKT  P $P 8B@J KT  P $P;$' 8B@J 8!L ',$  8,%$  8, KT  P $P;$' 8B@J@ 8!L '$  8, 1$  8, ni]]]] 8!0$H 8!0'Fkp; A@h ;$'f 8B@8  f  8B@J F 8(0i l n$  n l l n $'lki]]  .r   r%.t tB@H !vB@xi@@`ѡķ(IJ)]] ` %!B@f ! !! ' $h $h ˡ $h $h   %(dDLR_Mark   %!B@^k0 ! !! !! %B@jd !  %!  !  %! %B@jkh  ! !!R'dd8 !  %! %!!R 'dk d %!.n b n!B@^ $h  $h  $h ( !) d %%l!(dq8 d !A@b ! %!! ! %!! %!rB@^ ThisDocument.Range(ThisDocument.Bookmarks("" & frmAddDaiLiRen.DaiLiRenCount).Range.End, ThisDocument.Bookmarks("" & frmAddDaiLiRen.DaiLiRenCount).Range.End).Paragraphs.Add d'i]p] ;$'h h  %!!!R ַ lʾA@jzXkP  %!$h7($h7($h7(qiaѡķ(IJ)] ]8 ` %!B@f >!@, !! ' $h $h ˡ $h $h   %(daFMR_Mark   %!B@^Fk >!@- !! !! %B@jdP >!@  %!  >!@  %! %B@jk  >!@ !!R'dd >!@  %! %!!R 'dkX d %!.n b n!B@^ >!@ d %%l!(dq d >!@ A@N >!@ %!! >!@ %!! %!rB@^ ThisDocument.Range(ThisDocument.Bookmarks("" & frmFaMingRen.FaMingRenCount).Range.End, ThisDocument.Bookmarks("" & frmFaMingRen.FaMingRenCount).Range.End).Paragraphs.Add d'z >!@  >!@ %!!  >!@ %!! %B@k i P ] ] ]( ]@ 6,$'<  < $<$ ~  $<$,' Debug.Print cobDataSourcekP  $ ,   $'k debug.Print cobDataSource  8A@2o UAttribute VB_Name = "ͨģ" Public Const DOCP_COB1dTXT22fHK232urTableIndex A@s LongR0ange  Function NewDocOcx(Typ-Integer, FieldҐ, Op/alPTextWSngL""StatusHelpcobLin!3) Di8m i@U ar rC Select Case q # HK C = wdFormCheckxBox n AurIndexTCount - 1vC<, 0)@(2 5151 5@Next iEnd Select Function Public  Initd1(g As ComboBox, ?Str ing:Dim ^8iInteger atmp`Value' If Not IsPNullC.)p The[҆ ==Rb#tIfDelTailyF1C-_C8ɃACB.Clea2For Each aKK>&  FlagiVRightF( Ben(D )EY= LefL)@L C:= `IϝMergRange(rStart/x, r@ID oc umen`myASet aa=@Iis=.BD.jck.Cellts.ae:nQoNewDaiLiR(SourceMarkm, Obpval @aNtamg)AD$'ѡķ(IJ8H(OLongc$' Tab0leID Th&.Bookms(')&.CopyCOfrma.#= 3/{w cJ B1.!A o( , ).Thr(13) + C!+ ""I#(3 `1 6)!aŀ "DLR_M""e!]  Ur5A NMsgP "ַ", vbExclaЌ0 ʾ2Exitfà YX A .' (Q@esulft@((0E2`a=(3d CA߫Y&FaMѿ p1FX$poH-e- .4(en '@ZEbk?o›o0o'H  ThisDocument.Range(tmp@ + 1,  6).Bookmarks.Add @"FMR_M" ' End IfIf frmFaMingRen.Count <= 4 Then A.k-).PasteEls 1w("Ȱ" &gE)II%aWithsnE^  NewTableID =.s.cm S[CEX)$A%H%Set Cur0!S7(?)L Name) 9OJCell(C1.Text@&#C Re Fiel(ds 3,ݭ, 2cc6JY|= ,KJ? 6 bra graph ~'<zs? - oA@5`@'72y>䨃_!t'X Start o99 ).Dele$x[Function Public Sub InitCityCob(DataSource As Str, Obj!ComboBox, PrvcuDim cobListArr,ay)iInteger  1 (hp "x "   X  (8]@ `!0'^dP'^k@ !X !d ^A@b A@roX A@rxop@ϱΪ0±Ϊ15L]8]P]h] !! %!! !! %!!! $( d'f !. !!'L ! f 'N H d (d! A@ dy strTag = thisdocument.Range(thisdocument.FormFields("").Range.Start + 13, Selection.Range.Start).Text% strTag = strTag + ""! . strTag = strTag + Me.TextBox1.Text& strTag = strTag + ""y strTag = strTag + thisdocument.Range(Selection.Range.End, thisdocument.FormFields("").Range.End).Text L N %!(T dy strTag = thisdocument.Range(thisdocument.FormFields("").Range.Start + 13, Selection.Range.Start).Text% strTag = strTag + ""!. strTag = strTag + Me.TextBox1.Text& strTag = strTag + ""y strTag = strTag + thisdocument.Range(Selection.Range.End, thisdocument.FormFields("").Range.End).Text thisdocument.FormFields("").HelpText = PutFlagValue(thisdocument.FormFields("").HelpText, "Tag=", strTag) L N %!(R k@, thisdocument.FormFields ("")A@ $(H $B@d˹Ŀǰдƣ 6 ʾA@jkiox]  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZEo״Attribute VB_Name = "frm@Sup" Bast0{2B794E57-2A01-48F8-8470-6F261D86DF92}{1AAECCF1-979D-4AC6-AA6B-0FFB392EC8A9} GlobalSpacoFalse CreatablPredeclaIdTru BExpo se0TemplateDerivCustomizD P Sub cmdAdd_Clic@k() Dim suFlag As Integer If opt.Valuo] ThenG= 0 E 1nd IfEJscript Me.TextBox1,% CUnload E 8QuitK8 ubA Fun@ction I#(@strTxtDSng, ModeH) 'ϱΪ0‡8StrLe@SRngStarLong6D5`"f"C fSele..Range.>=gisDocument.FormFields("") AR "< AppXaW.ScreenUpdngĹyCL= &/S!Set tmp` "+= #*= '+ -`' S1xtyKck-G3E= 1e'e! :ahisd5(tI7 + 13,)h s+ "O@ t vbCritical~0Guqx}}UserP}(InalizelngDeskTopHand v= FindW0ow(vbNullCxe.Capm ' PlPos , HWND_TOPMOST, 0(SWP_NOMOVE Or SIZEsU`K modBio5modDya{BpmodPub tmpmod~~oBxME(<<< <hj Hhl Hhh B`v!d`x+t  p h)%` `>`  )%` n ( )HP%i  % ` h)%iv `t`x ` ^  i  % Z ( i H)h% %`Px\  @ Ph B  " ( 08@ X ` p D   " $8@H ` x " > "0 X`hp " x( " 8HXpx*  B  (8@H " PX` hx   ]$ mark_BIOStart]$ӱǩ]$0]H]`յx  j 7!!'v l 7!! 'x@I v x7!!R h 't qi.wordеļ¼listbox] 8]P   t C@J5L ' A@ > h >   h  v x %%$  >; > qoh(Listboxĵһ%]  5L  ; qpohA1ListBoxеתTextУǰTextBoxTag]p !G|j 5 $TextBox ! ! % (dkqo] ]8]P t 't ! h  'x  v  !L0  h 8 յһ  v x %%B@  !\A@^  ! B@|k x v x %%!!B@ ! B@ A@o h]  !M $TextBox (dki]p] B@J !L '  ! $TextBox !d  ! ,k A@oAttribute VB_Name = "modBio" Public Const RecordStarkM As SngCd"_BIO B@_ Hƺ1_0 ƺh%B@`v`x  Oi@ @> `  d B@  (8, %`v`x h Ai 9i  B@i@ B@ih  iB@H%  %  %  %  % ( %``  ^" (08@ HPh  ( 04@ x&N $J8 &V ,(:X 2 .< 0$@2h , $J  B@ $J $ JH &    . >P  ",        $(  P p      .    4@  x $ V     N8           . :H  "        (H Pp 4  B HX4p $JP h&x .8@"H Pp x "  ( (Hh&p <  . @ B` &v x&v( @,P . T&@ h "6p  8HP`hP p,h*0&, *P2** P ,*@0p&,*2(*`*  & <0 *p 8 * 2!*@!*p!  ! ! ! ! ! ! "." 8" "6@"x"""""" $"""# #(#8#@# H#0$48$0p$  $$4$0$  (% 0% @%H% h%x%.%%"%%%%%% &8& @&`&p&x&&& &&@',h'*'  '&p(,(*(  (),)*H)  x) )) ) ) )).) *" *@*H*P* X*x** (**6*++ +0+8+ \@+ D++*,  \0, D,,*,  p - D-*-*.  p8. D.*.* /  pP/ D/*0*80  ph0 D0* 1*P1  p1 D1*82*h2  2 *2*2  3 33& 3 H3 X3h3.p3 3 " &333J384 0@40p4  .4$4$4 505  \8555 T5J(6x66666  6 (74(7`7 7  7767  @8D@8 8 *8 8 8 48 f(9 9*99999 9: " ::0:J8:: 0:0:  .:$ ;$H; p;;  \;;< T <Jx<<<<=(=  @= (P=4x== =  == d>$>>(? @@?x? ? R@h@NpA VA NBhB  pB B   B B B&BBC80C hCxC 4C fC D*0D`DhDpDxD DD " DDDDDDDD  DE E@EPE&XE EEEEEEF F 0(FXFtpF F0G 8GxXG G0G Hr@H  :HxH (pI xI J00J`JxxJ J KK K (K8K @K PK`K hK xKK K "K KKL L ]@]`]x]]]A@ ! n  B@. kpmarks05__'doc_end %!B@H R B@:1'    !%b  ' B@P  d B@ B@ ơd B@_  _1_A@ B@ û롿d B@%_  _û1_ûA@ B@ ͡d B@_  __1_A@ B@ ܲڵءd B@_ _ܲڵA@ R B@ B@ ӪڵػӪҵڵءd B@V_ _ӪڵػӪҵڵ1_Ӫڵض _ӪڵػӪҵڵA@% B@ ʡֱϽơd B@_ _ʡֱϽA@ R B@ B@ ơd B@x_  _A@ R B@ B@ ֵƺšd B@_ _ֵƺ1_ֵƺŶ _ֵƺA@ B@ 롿d B@_  _1_A@ B@% 绰d B@_ _绰1_绰A@` B@ Ӣơd B@_  _Ӣ1_ӢA@ 8, B@  Ӣĵַd B@_  _Ӣĵַ1_ӢĵַA@; ! ( !B@8 !   C@^ 99q ! ( B@$  l  B@aĵ_  _ %B@H%oh ĵ´ҪԪ]0]P]hA@ ! `   B@. kmarks07_ר_' doc_end %!B@H R B@d'   !%b%  '0 B@ d B@B@ B@ d B@ר_ _ A@ B@B@ ֤šd B@ר_  _֤ר_1_֤A@ B@ 绰d B@ר_ _绰ר_1_绰A@( B@ !e ( !(d !  C@^ 99q ! ( B@! l  B@[ĵ ר_ _ %B@HAddDaiop ӷ, ]]]A@  B@. ).marks03__'doc_end %!B@H R B@h'    !%b  'йx B@ʾA@j  d B@$h B@( d B@_ _1_A@IJ) B@8  d B@_  _A@ d B@ B@ Ӣd B@_  _Ӣ1_ӢA@ !e ( ! !   C@^ 99qH ! ( B@ l  B@_ĵ_ _ %B@HoinitCityList'090416pzy'oPȨ]]] On Error Resume NextA@  B@. marks11_ҪȨ_'doc_end %!B@H R B@ '  00$ !%b  'P B@ 00$d B@ B@ d B@ addTextInput "ҪȨ_" & i & "_", "1_", "" & i & "_" addDropdownInput "ҪȨ_" & i & "_", "1_", "" & i & "_"ҪȨ_ _A@ R B@ B@ աd B@ҪȨ_  _1_ն  _A@ B@ šd B@ҪȨ_  _1_Ŷ  _A@ !~ ( ! !  00$C@^ 99qh ! ( B@ l  B@_ĵMthisdocument.FormFields("ҪȨ_" & i & "_").Select  00$ %B@Ho*ĵɾһ̬ӵ˵Ϣ] ]@]X]pA@  B@* marks05__''    !%b  '  ' KT$ '4AN[hu2_ %!!d2_û %!!d2_ %!!d 2_绰 %!!d2_Ӫڵ %!!d2_ %!!d2_ֵƺ %!!d2_Ӣ %!!d2_Ӣĵַ %!!d2_ %(2_û %( 2_ %(2_绰 %(2_Ӫڵ %(2_ %(2_ֵƺ %(2_Ӣ %(2_Ӣĵַ %($ '4AN[hu1_ %!!d1_û %!!d1_ %!!d 1_绰 %!!d1_Ӫڵ %!!d1_ %!!d1_ֵƺ %!!d1_Ӣ %!!d1_Ӣĵַ %!!de1_ %(1_û %( 1_ %(1_绰 %(1_Ӫڵ %(1_ %(1_ֵƺ %(1_Ӣ %(1_Ӣĵַ %(d8  %(  %( !(dһ_绰 %(%һ_֤Ż֯ %(һ_ %(!һ_ӪڵػӪҵڵ %(һ_ %(һ_ֵƺ %(һ_Ӣ %(һ_Ӣĵַ %(kX Exit SubS@    %B@H B@ B@n l  B@[ĵo*ĵɾһ̬ӵĴ˵Ϣ]]]]A@  B@. marks07_ר_''   !%b  '  ' KT 'ר_2_ %!!dר_2_֤ %!!dר_2_绰 %!!dר_2_ %(ר_2_֤ %(ר_2_绰 %(dX  %(ר_1_֤ %(ר_1_绰 %(k Exit SubS   %B@H B@n l  B@_ĵoH0ɾ]p]]A@  B@* marks03__''    !%b  '  ' KT '2_ %!!d2_ %!!d2_Ӣ %!!d2_ %(2_ %(2_Ӣ %( '1_ %!!d1_ %!!d1_Ӣ %!!de1_ %(1_ %(1_Ӣ %(d  %(һ_ %(һ_Ӣ %(k Exit SubS`    %B@H B@ B@n l  B@[ĵoɾȨ]] ]8 On Error Resume NextA@  B@* marks11_ҪȨ_' '  00$ !%bL Ȩ  '  ' KT   %!!d8_ %!!d=thisdocument.FormFields("8_").Result = ""  %(8_ %(   %!!d7_ %!!de=thisdocument.FormFields("7_").Result = ""  %(7_ %( 6_ %!!d6_ %!!de=thisdocument.FormFields("6_").Result = ""6_ %(6_ %( 5_ %!!d5_ %!!de=thisdocument.FormFields("5_").Result = ""5_ %(5_ %( 4_ %!!d4_ %!!de=thisdocument.FormFields("4_").Result = ""4_ %(4_ %( 3_ %!!d3_ %!!de=thisdocument.FormFields("3_").Result = ""3_ %(3_ %( 2_ %!!d2_ %!!de=thisdocument.FormFields("2_").Result = ""2_ %(2_ %(d` 1_ %(1_ %(k Exit SubS  00$ %B@H B@ B@n l  B@[ĵoX P&Ҫ꣬ǩڲ¼']]]&;ڰarr_FileNameInfoеݷarr_NameInputеĹ]P]"¼ǩĹʼλ]"¼ǩĹλ(д˺֮ǰѾɾһļ嵥 !%ļ嵥 %B@H B@k Vַʼarr_NameInput涯̬ӵҪarr_NameInputе ;$'    $,$'=4˴õ5ַǷarr_NameInputTemp @=4ôַstrFileNamearr_NameInputֵ$ $($ $($ $($ $($ $( marks15_ļ嵥 %B@H !'v "¼ԺǩĹʼλ R B@ B@̬ı򲿷 >   >$! >$! d B@:һΪstatustextֵڶΪƶ ļ嵥_ >$!_ҳ >$!A@ҳd B@ >$! >$! %( B@ > !'x"¼ԺǩĹλ ! x v  (6BΪӵһǩԱմ˺ʱɾǰӵʹ ! !ļ嵥C@^ 99q ! ( B@o]@Xp]]&;ڰarr_FileNameInfoеݷarr_NameInputеĹ]]8"¼ǩĹʼλ]P"¼ǩĹλ(д˺֮ǰѾɾһļ嵥 !%ļ嵥 %B@H B@kxVַʼarr_NameInput涯̬ӵҪarr_NameInputе ;$'    $,$'=4˴õ5ַǷarr_NameInputTemp @=4ôַstrFileNamearr_NameInputֵ$ $($ $($ $($ $($ $( marks14_ļ嵥 %B@H !'v "¼ԺǩĹʼλ R B@ B@̬ı򲿷 >  ] Selection.TypeText Text:=arr_NameInput(j).itemNum & arr_NameInput(j).itemName & " " >$! d B@"ļ嵥_ļϢ_ļ >  _ļļϢ_ļ >  _ļA@ d B@:һΪstatustextֵڶΪƶ"ļ嵥_ļϢ_ļ > _ҳļϢ_ļ > _ҳA@ҳd B@ >$!ļϢ_ļ >  _ļ %("ļ嵥_ļϢ_ļ >  _# >$!;"ļ嵥_ļϢ_ļ >  _Ϣ# >$!ļϢ_ļ >  _ļ %( >$!ļϢ_ļ > _ҳ %(ļϢ_ļ >  _ļ %! ȨҪ  '9mڼ¼ȨҪ顱СϢλãԱȡֵk= B@ >  ȨҪ B@ B@ȨҪ d B@ļ嵥_A@d B@  $!ļ嵥_ %( B@k< !'x"¼ԺǩĹλ ! x v  (6BΪӵһǩԱմ˺ʱɾǰӵʹ ! !ļ嵥C@^ 99q; ! ( B@o`;] ] ] ] ] ]0 ]H marks05__''   !%b  ':ӱǩ %B@H  R B@ R B@d(: R B@ B@  B@k9 ! l !%^.   ((Ʒ_ʽ_ؼ  _ر (^T#"_" & i & "_ļ" R B@ ! l !%^.locationInFile  ((Ʒ_ʽ_ؼ  _ (^T'"_" & i & "_ļеλ" R B@ ! l !%^. beforeChange  ((Ʒ_ʽ_ؼ  _صλ (^T!"_" & i & "_ǰ"3 Selection.MoveRight Unit:=wdCharacter, Count:=1i Set fldac = Selection.FormFields.Add(Range:=Selection.Range, Type:=' wdFieldFormTextInput)" fldac.name = "afterChange" & ir fldac.StatusText = "Ʒ_ʽ_ؼ" & i & "_ַ" '"_" & i & "_" R B@ ! l !%^.pages  ((Ʒ_ʽ_ؼ _PCTRO134 (^Z!"_" & i & "_"   (k4   (k4   (k4   (kp4 If Pages <> "" Then flddc.Result = Pages End If R B@o33>Attribute VB_Name = "modDya" Sub addShenQingRen() '  Dim fld As For@mField2MXarkg W5J v?1pe#S A#绰k$ Qm 2/ / I {k-A u ַ__g[ &Sptart^- 444 Wit^h2Q. b:=, n:==DefaultSortwdByLocaeShowHiddenpFalsԸ  =h4Mo7A 0c7𷱪All@owOnlysd, :=0orese0True ' (2յ qҡ`DaiLiQ´ҪԪOOOж@Jr γ p7_רq_T3 P.‘e= (@ ?1,??tp2/SI{aax@01,WNdddTextInput "ר_@" & i "_", BKM_DLRInfo  Selection.TypeParagra,ph8 :="t ֤š"=1a';1_ -绰RPNStar0t = - 101$With ThisDocument.Bookmarks.Add Ra`nge:=,P namM@ N@DefaultSorting"wdByLoca ShowHidden FalseEnd )C2I7@ CЙJ;Prot  :=wdAllowOnlyFormFields, Password:=str@>oreset:=True 'ĵ KJ( ).9 >Sub " @FamQren() 'ӷDim fld As GFhXStri I@ntegerBinitBefor@~orDel Aq Unp((#'@a" F = "L0|3_z Q("doc_endx")."O$ BMoveUp U9Line, cXoun4d^iK3cDo WhileT`.Exist s(F+ 1)3 i Loop#O" !? ƫ0 Ї$1& "g1#H!!N +CheckBox "A*\ߺӢ_(Q(%(M)_b__[Cj.߷b}[1L[n.#O.h*B/\/\/\\/\/\eq)\)aoq:s1\ Private \U (D'QCityLG'09041@6pzy U= LhaaYouxianquanSHMa`bl~d bp@b' On Erro r Res Next #c70vQc c11 _Ҫ_ԀTAodAod&# 'odod}`d9sododzat(i, "00")eqepW ?V *q,A+e 'U Se SU1w!Dropdown2$ 'eT*@OLEInlpShape "#A+RightChcterݐ#/q<% V$ _dHo{) ?62!!a {  ?r26u_71,Bf .DefaultSorting = wdXByLocation .ShowHidden FalsepEn@d WithSelecr.StxartT"R HTypeParagrapAoThisDocumen@t.ProtS +:=wdAllowOnlyFormFields, Password:=str , noreset:=True 'ĵ 't3d3'("ҪȨ_" & i"").q [Bookm@arks(MName1at(i, "00")  Sub   Del ShenQRen() ']ɾһ̬ӵO˵oDim fld As m JStri IntegerG0signG initBeforApddor@, AUnpofx'd C%= "O05_6U" i3Do While _.Existai + 1)!Loop - 1y Case i12 If"_s("32_Range.Text <> "" _ Or#û뇿 y!绰  2_Ӫpڵ  7`+ @ֵBB MӢğMd ,@ T`Z we! es`" id dѕ c!%c ؋a|` J@/3?zK/.ROOc?y.>@3-K-E_`1_`_`gO_`eooa.[k_`P_`pA/. 1_`d _`ooa?1._`?TR _`/g ooe_``?C>C2?9`_`O[L~1$`///1_`|00 $_`_?/` bOO_` `?q`?BKM_SQRInf|o)DFuYeed?) ThisDocument._һP0.Text = ""  T FormFields("绰")@.Resul9ŻA]%Ӫڵػҵ,xֵƺ'_ӀaַKE nd If' Exit Sub Case ElseʴBookmarks(M@Name & i + 1).S`election.D@tOC0"Prot Type:=wdAllowOnly, Password:=str, noreset:=True 'ĵ ez A% `& delDaiLiRen() 'ڡɾһ̬ӵĴ˵Ϣ# Dim fld As '&*@StringgiaIntegerasigninitBeforAddor ..98Unp((#'a"A&?07_רl!_Ci3o Whi(le H.Qst=kI)#JLoop - 1C WiC!2aIfD("@2_maHnge<> f_ a Or (%2_! en/*6_%D%$> $ aq2_| OQ~BKM_DLRInfo/~E(|1"__:1,dd7 dddS >dmbnbbbqcbbaSubQaFam [ra '%a_ld__o^¨/^p*^so^3_ d^D^f^ĂO^O^ O^QC_O^:yFƘ ]t ]BWW 첼/c`0c__x2? Th\ i5OrDEo% J0["/[se~ȀUr  }81 B  a1&?fB_k  +&gQa{&FMRInfo).Result = "" ThisDocument.FormFields("һ_"03Ӣ J YEnd If'Exit Sub*Case pElseu rBookmarks(MName & i + 1).Select A ion.Dt?1] ) DProt6 Type:=wdAllo wOnly, Password :=str, noreset:=True 'ĵ2 ;G@H delYouxianquanSHM() 'ɾȨDim fld As GKStringi Integer hOn Error YNexDVinitBeforAddor@T GUnpG=s'A< C'Bw11_Ҫ8_*Di@9Do While e.stʋGat(i, "00")T&DTÂLoopCX- 1È i78IfK)js(FJF1_DS_Count`uange.T/ <> _k P Or "%8&' Then Nt@dQ i?'  a5SQ5̵575Hg5 # 5 L 55 ?5j&a6f+?a@,6 k666aPy  BT$M675oQSOGVp'oQp 9C/4 OG!U' 9{/ | /mF!3 G! 9ooa2oo ooGooo!omooo 9oo6q Jds("@1_").Result = ""  ThisDocument.FormFiel ZEnd If 'Exi t SubCase Else ) Bookma rks(MNa me & at(i, "00")).Select% ion.Dt6b ) IProt6 Type:=wdAllowOnly, Password:=str, noreset:=True 'ĵ22 ;  addFuJ iaQD("fileAs String) 'Ҫ꣬ǩڲ¼'!Dim Ij  IntegerAarr_FInfo() K InputTemp 'ڰэеݷXQ7DanItem G pos1A*Long 'A;@AAĹƀʼλGPos2aG'˺֮ǰѾһƒ (If .stļ嵥")@ en>"`Zes 'ַ@ʼ 7搶̬!Ҫî;> AKSplitY1@x;")g iLBound(#o Ut#a'V (i),/ '`G@õ5!XAV gRemP!|rve j oh'0 }&'䅁 .ifNunmJw0-Code21=a-2B29page3append 4h3Next ics("x15_l=> lᶁ*`MoveRight Uni`wdCharacter, c`a`.1PgrXaphS'5:ı򲿷փ5j5e5f!TaIA:=(j)(&0|" ؉'һΪst atustPֵ^Gt k S_"? 3 _ҳ", , B6/` " (@ O>5n.# =R1jSr-Start-Rv9r g?- 2(- 4ΪeǩԱwaxʱvǰʹӔ~Withwr=C .Add Rang0 g`:=vDefaSort`5wdByL0ocat ShowHiddenpFaVaC _MAS:ShenoQ, m1(RfXmFq> Y . vw"?}ё$utT#kks?^+9] qPa ?trbarr_NameInputֵ  (i).item@Num = hT@emp(0)pCoder199B29page38appendIhnfo:4yN`ext iThisDocument.Bookmarks("14_ļ嵥").Selectapos1; i@on.End'¼ǩĹʼλ "MoveRight Unit:=wdCharacter, coun1 TypeP@ graphC'̬ı 򲿷FoHr j-LBdB(Filefo) To U '8- TUI:=ʛ(j&@ & " 8"C(" 1add# "CIqtϢ"A j + 1"_A|", ,G! 0:'һΪstatustUֵڶ/' ҳ_d#''v6x"ҳ(3joRmFieldo5.`rResult@ZSOK_&D_AHelpKKkKy"#b;XX?A ##"_yB).1ļ 'If AuA"ȨҪr" en Am}'m aE)a0ȡiIf_ ' c̵Bj  !InStr(1, strf䳠HH ) <> 0 anl]ʖWtW_@+b4A:="h!A!y_'C(m - 1).y. #Pos2>WStartA~~"#S=3H- (- ) 'Ϊ|ݑbS(մ˺ʱɾǰʹӴWitfh"ks .Add Range:= , nTpHA X.DefaXSorti$ng wdBy`Locatp%ShowHiddenpFalse MD tASub15Public  rBuzhen@gNR(Op a l 6 As hStr " ql9 Inђbefore_UafPO *P`s<Dim fldfnslo bcյa d^M@iIntegerSS 6= Ӷ05_%@i!Do WhPo,.Existsb(& iHiA_LoopFX417 f'?Z f*QLefON7{UpLine]E2/z2 {InsertRows Collapse r#bBTKc7pSet*7N'AG(OGQH, qh:= _1 1wdҢ1crg1.<=  %"Ʒ_ʽ_i"" '"m+CvēSK//S+et fldlo = Selection.FormFields.Add(Range:=|@, TypX _ wdtTextInput)DA.name"locaInFile" & i &StatusB,Ʒ_ʽ_FJ"" '"H_$ļеp">vMoveRight Unit:=wdCharacter, couǹ 1bcX ئbcbeforeMՂoIaλRVڰFQ'QCQD QaQEIaGRafv R }Rַ^QZSCd%( ;{d'(pagesP_'zPCTRO134ß((If fŽ<> "" Thenca?fn.ResultweEnd Ifc k lo + IwU x& (X 1  ^P?9* "'I " ?I'`nɩSub       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNORSUhVWXYZ\]^_`abcdefghijklmnopqrstuxyz{|}~4H*_*DFindWindowA4SetWindowPosL xME < 48,00&p& x&& &X&' ' '('0'8'P' *h'H''P(P(h(p(x((((((()) )) ) ()8) X)h)x)) )) ) 8)** *0*<8* Px*" *****+ +<0+p+x+ B ++++++++++ + + (, (,@,X, p,,!,%&,!,%&,!-%-!(-0-8-"@-!h-%&x-!-%&-!-%-!--...& .H.&X...... .."."./ /(/0/"8/ @/P/X/x/ /// " /////////0000 H0X0p0 0402021@1H1P1 p1x111 " 111 11 11111 R1" H2P2X2`2h2 Xp2 P23 3 B@3 ,3 3 3 B3 ,04 `4p4 ^x4 4 ^4B X5`5h5p5x555555556 66 6 06@6H6P6X6 x6 66666 6 667 77 7 (7 H7 " h7p7x7 7 7 777 7 7777 B 778 B8 8(8(@8P9 BX9`9h9699 " 99999999::: : 0:@: P: p: : : ::: (; (; ,@; p; *; ; ;; ; ; < (<8< `X<< < < = > = R`= *= == >> 8> H>X>x> >> > >> > >? 0? 8? P?6h? ? ? ? $? @ @ @ (@@@ `@ p@@ `@ @A  A (A8A@A(HA pAA AA A AAA A B 0B @BPB `hB BB C CC  C0(CXC hC C CCC,CC D  D 8DHDPD  XDpD D DD D DDDDD EEE ( E HE" hEpExEEEEEE *EE EE F F(F 8FPF `FpFxFFF F F .F G(GHGXGpGGGG G GGGG HG 8HXH pHxHH HHH HHH H $H $I "0I XIB pIxIIIIIIIIIII"I>J2HJ:JJJJ J KKK K0K8K@KXK 2pKK KKKKK pKhL bLL MM8M@M \HMM MM *M N0N8N @N hPNNN  N bN@OXO 4`O*OO dO8P" @P HP`PxPPPP P " P PP "P PP "P PP "QQQ(QHQhQQQQQ "QQQR R8R B@R HRXR`RhR " pR xRRRRRRR " RRRR R RR SSSS  STTT "T T0T "8T@T HT XThT " pT xTT " TTTTT TT T TT UUU U0U "8U@UHUPUXUpUUU~U"(V PV pVVVV "VVVVVVVWWWW X X 0X 8X,HX xX XFX XXY Y@Y`Y Y  Y YY Y,Y Z Z  Z(Z 0Z@Z BHZPZXZ `Z *hZ4Z ZZZ *[40[ h[[[ *[4[ \ \(\ *0\4`\ \\\ *\4\ 0]P]X] *`].] ]]]  ] ^ ^(^ B 0^ 8^@^H^`^ p^ x^^^ ^ ^^^ ^ ^^_ _ B (_ 0_8_@_  H_ X_  p_ __ _ _ _ _f======================================================================================================ģ湫ú$created by wangchaoyuan@gwssi.com.cn coundate 2008-06-26f======================================================================================================/ бλκڵǰ]$ ִڴС]$j ִλB@]$] ] ] 0^H^`^x^^^^^^p]  8^P^h^px]$ XMLLoadedex] ²Ϊģͨú]$MSXML2.DOMDocument.4.0]$˳Public Const strPassword = "1"!& ] ] ] 0(ļ嵥ļ嵥õĽṹ H^`p^x$^^ҳ^Ϣ1p] ] ] ]  Public strSchemeFile As String8 8'~ ' ;ڵǰλ򣬲strNameָӵƣ" bѡoriFldNameDzοõؼ֣ӵ֤ʽԵȡֵοؼͬP] ! l !%^.  (dh d ($ kP d (^ G|jh $ G|jͼƬ  %A@   B@,o Ӹѡ N] ! Rl !%^. d (coun d (^ G|jylist# $ G|j8  B@ oıx;ڵǰλ򣬲strNameָӵƣN!& bѡoriFldNameDzοõؼ֣ӵ֤ʽԵȡֵοؼͬ]x]] ! Tl !%^.   (d d (k d (^ G|j' $ G|j  %A@  %!V!X!R'   "   %!V%X! !V!XB@^  $   B@Po3 Ӳʼؼе](]HOn Error Resume Next8debug.Print name $Gname='' pʾA@jjForms.ComboBox.1 !% .N' debug.Print 1  N!!( debug.Print 2 N!!(   debug.Print 3  N!!( N!!( N!!( 8 N!!( #B@ N!!( N!!( $ ,@ N!!( ; N!!( N!!($  debug.Print 4  _$. $'   debug.Print 5 $ ܲڵKKT debug.Print 6 N!!A@ 3ʼ debug.Print 7ʡֱϽKT  debug.Print 8  N!!A@* 4ʼʡ debug.Print 9  KTA@d N!! !!d $A@d ZB@8no/жϿؼǷڣڷֵΪtrueΪfalseƖ` h] d %!!d' ' z0 ( ZB@8celist' i:ؼıoriFld֤ԸƵĿؼdesFld !9 !9ʡ !9 !9д' .StatusText = oriFld.StatusText !V!ll !V!\\ !V!5VB@X! !V!5V(е/ .TextInput.Type = oriFld.TextInput.Typeͼ5 .TextInput.Default = oriFld.TextInput.Default3 .TextInput.Format = oriFld.TextInput.Format8q0o(5formƺxmlļ˺Ϊͨúh ]  MSXML2.IXMLDOMNodeList]  MSXML2.IXMLDOMNode]  IXMLDOMNode]0 ]H ]` ]x ] On Error GoTo ldebug.Print Now x $ . , New DOMDocument \$. $'   $' ' $$*b  'h   $' $' '<  id='  '> B@  % .  ! !^ !!dA@ p //  % A@   B@  xmlļdebug.Print Now|   ZB@8 o3createFormXML "c:\a.xml","110101ר.doc" X As MSXML2.IXMLDOMNode ' Object]H ]` ] ] ] ] ] ] ]( ]@ ]X ]p On Error GoTo l _' _ ' ! !  ! ' k KT $  B@ SX b   $_/$`' / '  /$. $' /$. $' % . $$ NOTHING % . % .  B@ k(  _ ' % . _$. $ $  B@ n  ZB@8i  \ Object % . iH  j Object] Object ']  % . (d . iȡǰؼݼ=fldNameֵǵǰؼƣֵǵǰؼ ]P]h]  ' ' ''zk !%v!!!R !%v!%!'  !%v!%!' d !'  !!R  %!    %!    %!'  $  marks  %! %!!d' zkkk ' k`iX#ָƣnameformfieldֵ  !lGKT 0 !n(0S  0A@n|  ZB@8oֽڵ ]] '   $$*Gyj   $$'  $' i]]0c:\a.xml B@//ר % A@ c:\b.xml B@ ohP/Rڵе˳ת䵽ڵ,ڵƲٱ˳,Index2Name෴Ĺ]]]]]( ! $ '  % .  z % .  (  ! B@  A@  ! B@  ! B@ k ! ! A@ koH*BϢе˳ת䵽ڵ,formatNodeIndex෴Ĺ]]]]]  z $ $'  !  % . A@  ! B@  ! B@ k ! ! A@ hk`oX@]  !  B@ iH޸ԭnod As object  ! % ! ' z ZB@8' ip] MsgBox "ڰͻҪƷӹܣӦschemaûƶ湦ҪԺ󷽿ʵ֡", vbInformation, "ʾ" Exit Sub%!If testInput = True Then Exit Sub !T !T $xml' A@"  .MsgBox "ϣ", vbInformation, "ʾ"ڵo0  _ļ嵥_ļ  %!#йҽ׶PCTһ ( %& ļ嵥_ҳ  %(ypkh`oX5formƺxmlļ˺ΪͨúB@]h]]]]]]]]8]X , G|j debug.Print Now On Error Resume Next x $ . (.  (0 ---------------------------------------------- ֤i = CheckInput(errMsg) KT * $h $h  2 ר$j 4 G|jKT * 6 רA@j|@S8n0---------------------------------------------- xmlObj.Load fileName_÷ $(( 8 B@  ! !  ! ' kxpA@8 A@$  %B@H&˾嵽ģ % A@   !/ If Fld.StatusText = "Ӣ" Then E MsgBox ""% End IfB@ !!d$// / !^_/$` % . $Nothing !^ $B A@  !code= ! nodepath=$ !code=$A@ kd $B  (dKT !code= !code=$ ! % (d\#˾дxmlģܻ仯kkk]p N ! N!!lW N!!!d$syspara// / N!!!_/$` % . $Nothing!d N!!!$HB0And Not IsNull(insh.OLEFormat.Object.Value) Then N!!!0$H'd N!!!0'%kh N!!! A@  k@d8 N!!!0$H  N!!!0 (dkkkk A@:  //  % A@  A@<    B@ A@> ԭ* Exit A@@  * ԭͼƬ  ZB@8B@HA@ $(B@2 MsgBox "ϣ", vbInformation, "ʾ"|  ZB@8ɾo3createFormXML "c:\a.xml","110101ר.doc"xtI''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''']]'B // % . $D 'B B  % B $F $ (d^ spicalko(]]]]]A@'B   H 7).5!'N 5! 'L (" For i = 0 To Len(.Result) - 1 5  5%P 5!R  ! L L  %cume5!R " B  5d  'B 5!T e B  5d  'B d B 5d 'B kqd N  N  %5!R  B  5d  'B me5!T e" B  5d  'B d  B 5d 'B kqkd5!R  B  5d  'B 5!T e B  5d  'B dx B 5d 'B !k`kXqP .FormFq8 B $`'B " B $`'B (qA@ B 'D i $(A@ ~ A@X  A@X  $( A@oHH]]] ]8]P'^ '`  7 5(5!d Z $.'^ ^  ^ 5!d \ '`  ^ ` 5!'L ! L  ^ L ` % ~ A@b d L ` L  ` %(dǶ L ^ L  ^ %(d kk ^  ` Gyjqqxoph d f KT d !(R KT d !(T n qoK''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''']`]x] Q mySQCount = GetFlagValue(.FormFields(SQFile_DS_Count).HelpText, "Total=")ImyFJCount = GetFlagValue(.FormFields(FJFile_DS_Count).HelpText, "Total=")q  If mySQCount = 0 Then; Set nod = xmlObj.SelectSingleNode("//ļ嵥") & nod.ParentNode.RemoveChild nodҪ End If If myFJCount = 0 Then; Set nod = xmlObj.SelectSingleNode("//ļ嵥")& nod.ParentNode.RemoveChild nodǩ End Ifo X========================================================================================xmlļװX======================================================================================== ]]( $Gzj $~$zP kH t $p A@>  ͼƬԭ*,A@@  * ԭͼƬz k $(rr_NamA@ A@r  @ A@t =4÷'A@' A@@ " *ԭͼƬ n  $ t A@v $k` A@A@ %B@H$ $(( Debug.Print "finished"z   ZB@8嵥iͬxmlļdocģxmlFileName xmlļ@] 5 '| A@kX z x 7b(0 | >$A@k qo x %b!0'p i8]x  %!'Ʀ)6type_ type=$ ;country_ country=$ ; province_  province=$ ;city_ city=$ ;country_ country=$ 'i]  %!'ǰcountry_ country=$ ;'~ i@]H]h]]]]]]]( x $ . (. (0  B@r_ On Error GoTo lr_Name˶̬ // % . ! '  P  %!$'  ˺(  ) (  $'  ! A@QFormField  !  A@VTotal=    %A@^涯A@ _NameIk ˶ؚ̬ // % . ! ' $  '  %!$' Y ECmpPara = InitNewComponentPara(thisdocument.FormFields(BKM_FMRInfoEng).HelpText)  $   ($  $'  ! A@$8 NewTableMark = NewComponent(ECmpPara, i + 1)K ReNameFileldsInMark NewTableMark, ECmpPara.SourceComPonentID, iTotal=    %A@^ 򲿷kȨ̬ // % . xt ! ' ameI  Num  %!$' & "  !  ! 1 ( ļ  ( d( (1k  !   (/ "" &k $'  !    %!%%l!(dkX  ! A@  !  ~ A@ >Total=   %A@^?A@ k?ļ嵥 //ļ % . ! '    % % . J.xmlObj.SelectSingleNode("//ļ/")   !dA@ k> k>A@//ļ嵥/ % .  ! % !d$ % !d$' A@ k>k>k>Ӹļ嵥 //ļ % . ! '    % % . J.xmlObj.SelectSingleNode("//ļ/") $Nothing  !dA@ k< k<A@//ļ嵥/ί % . ! % !d$ % !d' A@ kH<k@<//ļ嵥/ % . ! % !d$ % !d' A@ k;k; Ʒ //ؼ % . ! '  A@ k;A@|; ; ZB@8:o:"ͨxmlļеΪdocֵxmlFileName xmlļH]]]]]]0]P# Debug.Print "setValueByXmlData" : UnlockDoc x $ . (. (0 B@ ! !  ! ' k99//  % A@   ! !^' // _/$` % . $Nothing $Nothing !lF  !dA@ !lGe !d !n(0k`8kX8kP8kH8@8 N ! N!!lW// / N!!!_/$` % . $Nothing !d N!!(0k7k7x7 LockDoc|X7 P7 ZB@887o07 ֵ1--бδ뷵2--δıо0--δı;sResult--Ϣp]]]](]@]X]x As String]]' 6ƶ B@^һ_һ_ B@^һ_һ_ B@^һ_֤һ_֤ B@^A@ %$'  B@ k44 !R ' k4 N ! N!!lW N!! N!!!  N!!! B@^k04k(4 4 Kһ_K_һ_K"_һ_ܲڵKT *  '* $_һ_ʡֱϽK_һ_Kһ_KT *  '* S2  ' n2 Kһ_Kһ_Kһ_֤KT % A@_һ_KT !("_һ_ܲڵKT !~(n11 * aerrMsg = "ʵд±Ŀ" + vbCrLf & Replace(Mid(errMsg, 1, Len(errMsg) - 1), "_", "/")'k81 [warMsg = "Ŀûд" + vbCrLf & Replace(Mid(warMsg, 1, Len(warMsg) - 1), "_", "/") G'jk0-sResult = errMsg & Chr(13) & Chr(10) & warMsg"õɫΪ' ']If i <> 0 Then MsgBox "õɫΪʵдϢ", vbExclamation, "ʾ"i/ %!H !%  9 9 9 qh/o`/@  ( o@/ PB@o /! B@o/H!]!  %!' country=$' country=$'  province=$' city=$' type=$'   %(o(.!]!  %!' country=$'   %(o-! ',k-i-8" v' 'vd`-' kP-oH-" 8- G|j 5XC@ d-C@k,q,|, -ܱǸCtrlFormVisibleִз  룺 Z!\   Z!  Ƿִкij 2 6 ʾ$j +k+o+" A@ o+8#+ ` B@v ZB@8o+x# .` op+#X+ 9 5$!P!R KT C@Bn+d+ 5$B@ k*q* ZB@8o*@$]$]$]$ ǩ_' ǩ_' ǩ_'   % 7!!d$$ 7!!d$$ 7!!d$$ 7 :yyyy$A@ 7 :mm$A@ 7 :dd$A@kh)q`)oX)$]%] %]X%]p%]%;Ȩ;ʹ;1_;2_;3_;4_;5_;6_;7_;8_' P( ;$' $  $  %!' '  $ --ڸʽȷ 6 A@jd'  $- $- $ 'd ' \-$`' .-$`' -$`' ,-$`' _-$`'kx& X yyyy-mm-dd$'  $  %(d & $ --ڸʽȷ 6 A@jk%k%k%k% o%%]%', ' ǩ_ %!$  ǻǩ_꣡ ' ǩ_ %B@H', k% ǩ_ %!$  ǻǩ_£ ' ǩ_ %B@H', kh$ ǩ_ %!$  ǻǩ_գ ' ǩ_ %B@H', k# _ %!$  ǻ_꣡ ' _ %B@H', k8# _ %!$  ǻ_£ ' _ %B@H', k" _ %!$  ǻ_գ' _ %B@H', k" ,  6 УʾA@jk!i!%]X&]p& $ $*' z!kx!   $' $ ' y !k!  $G' jk i &]&]']'  '      $$    ' kX P   ' i8 0 ߶Attribute VB_Name = "modPub" '=bhģ湫úcreated by wangchaoyuan@gwssi.com.cn&d$ 2008-06-26elic Declare Function FindWow Lib "user32" Alias "A" (ByVal lpClassAs Sng, & ) LongD DSetP os E;hwndEhWndIn,tAfterx y ccwFlagsE2' бλκ AAǰ?Const HWND_TO PMOST@-1A A С SWP_@NOSIZE@ &BH λÒ MDOV 2 hkAllA4Boo8leaeOptAu ForA`ppObjectType ShenQingRe@ str TeEEAƓ Countre CitGtCodeD Address_xPro eeJ$ ES!!"CurFrm !%CobscobGuoJiTex. `PrvcTM/NXMLF Z' I"Loaded dAt2:<'² Ϊ%ͨ%d#] _OBJ_NAMQ"MS 2.DOMDocument.4 .0'SHUNXV˳' KPworda1)JDB n@X!2!Y@DanInf*E'ļ嵥õĽṹFkc tem EnFont9! Supsc"0p PTa2R'ڵǰUcc@^N ָIāѡoriFldοC"ؼ֣K֤ᅡʽԵȡq͈ !add?Input( Sy@].{3h", 6f )Dim 0a@mField |=l5.6$s.T(Re:=Se, q0:= _wdϢ $Ifa <> "" T`I .n!1=eElse_3T`\IfStatus!` Exit @3PNot iRs`st f!(ͧ) lse2S `his&S{sS-Key Unit:=wdLin@!/ .ѡ. $CheckBox$x"Gq" t "+."! D1wzqm!O ~ (ubGıDGRIGGGGNG5LGGGDropdow s/H`o#A-k#8=%A/H%H]iIc RCnJonJngJJ )D)a# J 0Jq K-p<KK+8;K/9_._._. KldGKcK iC@TMeݷName).DropDown.ListEntries.count For i = 1 To iCP\fldvAdd ThisDocument.mFields(oriFld(i).neNext i Selection.EndKey Unit:=wdLine  Sub @Public addOLEInl#Shape(A\ As Sn g)c'Ӳʼؼе ADim insh *aMark. '@On ErrR4es j debug.Print {If TrimU)""en MsgBox "=''", vbInforma, "ʾ"/SeW= [s.jGCo@}ol(ClassType:="ls.ComboP.1")'I,1D.@A at.Objiq.5 2AutoSizeFalsv hJ3XBackCol[= &HE0A ButtonStyl4SpecialEff@8'0X\qginJ3SL-umnC@ HBd \ Height 14.25+how!WhM ~AWidth0 *44a= MDid"Y, I,rRev"_")p + 10KCc( @Case L(A v#"ܲ ڵb"Cb6fb0ryI}[#'Åҁ6j 7g"Ͻ Y8K Prov0inceBʡУ ? 9-),Cob1$,B?*txt sper.Text, 9#:`.ClearBj'Ƿ ڣֵΪtrueΪfFun` isEx fa(str)ABoonc FGolss`a ).RangeMa' t  l:rr$@Ħ!( ''ıc֤Ը@Ŀd$esz u set|S0z(sv, SJWiC6|tryMacro 8#.}xit"hHelpa%HOwHatuA4& StA7!Inpu@t.Edit- 9A:=a, Defauli, !aӔaEY^ ?{!$ Ot.q o+ a+"Cj?ݡ R!WxmlļΪͨ ÑʠcreateQXML(f8ileщ*à, wordFplAa?nodLst!Ac ' MS2.IPDOMNo|deq*cXWGgroot ID cWiAInte4geCW 1ob~j3WPnNowqT= C R(@_OBJ@_NAME)New P I8k"\ ,, 1, Len() - 4I3Do Whp IsNumeric(Qgin)t18iLoopS  i`d S, i.load "<" && " id='A` '>$~1.:ØS leQ.7p5@ Each )In 8C@d C,.V]sӣIndexT. "/zASave @'𱣴D ?.ySybAM  ':H "c:\a.","110`.docVLF( :;, e@, sValue=S) ' As MSXML2.IPDOMNode Object  Dim iInteger droot8 @xtmp #new#Fcur$Fe [rStarAsPath N ŏ= Replace(Mid(q@ti - 1)s~/ uCCPS& "/" &M?3(P= A, bJRev(D )B3 E]r+sSet =eM:S@slc3 1 D U=(O ( )) = "NOTHING"Q CAX^C#@252  bgG0ta.iU(?wS,h egi 4Loop Lpt+fFN+hxA$N l:rr.0CleaAFu nctioPriv % A#+a)A' ($ ZS?SO s , sQ ل {c` 'D5!:.Tc Gqht@ '  'ȡǰؼȀݼƠ`frֵǗ1Q Public%getCurqymControl(  sGlALo_q’'P}PTF3 l" T=[/ PCResulئ["g"Exit&?! =:.Range.Cel`ls(1)Fields.count1Lb7np7 //&̇l  P o isDocum .Bookmark8auTh@ks(t).<= $0q!>aoR 'OEsQ0*gIis@#stf%4) A4`~")/!| sz C'(U*!Ko0 ~ 1^ ?;e:%qgr'ָBOformֵNSub se"ҷ1J, r1NӅ1Cp .ga71oCheckBox.c=‚vaŶ / '3 3Y'ֽڵOdgetIndex(nodName As String, iNumLInteger")| Dim i@*Lene0i(= )1ForG=  To 1ep -1jIf N ot Iseric(MidE )) ThrExit N8Next i = Val > + 1)EFg = 113% End Function Public Sub testxml($objNew MSXML2.DOMDocume@nt40 nlNode@List .Load "c:\a." 2Selec$tSle("//רF"Iave'b'3@/J2format() 'ڵе˳ת,ٱ" ,1෴Ĺ ̃jDbasef@ISattr4 2?Hk j%= E.@D̀[D+<> 0Set += fcreatCp@G>"o  E2Q2, SHUNXV,V .e@ue Gnd."A$ibuY.set0dItem gAddAllChildr`o0nd, h od.Pa@I.In@sertBe`KeRemoveb !UIf .HasAUs+!Eacha,In.g*] fY!BaHHPbeaϢqechb cSµfc cML ~ccH!%RE`7bb>%c &]_S_SB!nAX_SfbM_S_S KR CCSriv`B +"(desO, orioL%`|-!g6od 46 S.append8cs65u6i%qWw%Objo,I: '޸ԭt yOn HErrPGolC&,R0yQvQ({rQ)UÈl:drr.Cleari"} S0{XmlFile @9!+S@'MsgBox "ڰͻҪƷܣӦschemaûƶQҪԺ󷽿ʵ", vbInK 8ʾ  '?InputTrhv !ØThisՓ.Full, rAQ - 3)B"Ep+m`Templ2t 5ϣݿ" P7 GetPages2iP1 w  p>fk Fields("ļǰ嵥_b"O).ResulQ "ʑ@й׶PCT"rҳ#`}(wdAberOf"I^nS1o/ : AID}7@b'Q`˺ͨÑ(f4n!W3 tNLstE oatcSfldm rooS|ID_ @LoaƁ inshQInlineShape err/a ;VerD+False$ =T'debug.1ntw Aq, 0a = CC(@;_OBJ_NAMEt.vali2d0 Onz =  c 4resolveExtern C'-4QT֤=CheckN(c s3 C͕20G>`Chr(1L0!bMJ$IYe}, "vbNoy ub Ca0se 1xMsgBox err$, vbCritical, "ר" p@Exit SElsePEnd Select '-)3' xmlObj.Load fileNaBmhAppltion.ScreenUpdating = FaGolXML getTemplatXFor Each no0d In9ChildNodesS_If. Type4NODE_ELEMENT` Thenr8ootY..bņ` IfNexImatDQGetPagDThisDoc@ument.Fields(1). '嵽ģЁIndex2$F S@NW;(-)C @GflG8 'B4IFld.StatusT@5?Ӣ"JF A}Ĥ"@G@Trim(".Range.) <8> " Setu=Eu;"//" & j& "ReceB2_"/")DGEA&V(z)CeIn Str(1He,lpD`c=") > 00S`B@NFlagValu ( epath , DH%:AK!` w"<) ! P,ar@j{.2s(0)E_) 'oд `loܻ仯|!@m$'Dim tmp A".lTe/ ZElsebTbO? O !6nd If E A U\ A- 2?h???y?AI{7M# :MM[P1!;0_ !CA+ &a ?5uN!iReplace(,xã"؟<b> +0LockGetInvName aFunctioPublic Sub UpdateField(AppaA.ScreDening FFa؃ UnliDeepSetŗaT, psc- "qa}c6aP Priv B(strBegin As StrP , 0sc! TypeDim iqIntegerQ技Long4O/Y= 1C&.o`rmRs(") F orP To Len(.ResxultCS InRev1:/r > 0A7, s7P]A`Fe1t« 02%b2wϯƯ!7@ 2 58R""ump&`<)Us=p&Or' 1T Exit/lAa'4Sub}HObjDBϰ1QFG:wSelect Case sar0;qc/#?F5;KB 3'A^lSome1(ByRef xmloMSXML 2.DOMU40A1WmySQCount>^myFJnodQIpPA#1 'Eg= 0|FlagValue(.XuZSQFile_DS_2).Helpa`v@Total= \' ?_FJ??a R p4I Z . =+.#+Svl"//嵥") ' nod.ParentNode.RemoveChild hEnd IfIf myFJCount = 0 Then6Sett4xmlObj.SelectSingled("//F?Sub|=3T-ӀcUװZ8Public Function loadXml Data(DFiame As (Str)Bo0oleaOn Error GoTo l Dim obj/ feGL@UnSuccessed@}TrimI )x"" Exit,C@ Dir %P@GetProperty(XMLFlagTrueĞ ChangeWord 'ͼƬԭ*FUpdateSpeciaBS '*  F #Appgaf.Screen@aCFalseCUnlockDocsynchrAqocaqDetValue ByyQuit@= Init@CoA@ "N=9iH'* - A= +- |e2B 3 , 8JustEmptyCli@pboardcL!$Thisum.FormFields(1)dcz0›Debug.P@dt "finished"c{Shou ld).wWith?7G+c!=#ot Type <> wdNo@ ? ==Aal_'AIA.CAom#=iesj ).cK=+ nLAA$<24fIy4hvi[ @Ǥ Oriv`g` SQR Mar kStr(HCtmp a!`JTO7B7BKM_TotalPs).HelpTr0"t#_" & 1Z(s, =") + 10t";_Q6"cryn"province/&%??2cit/  2o!NN!YXQO!BCO!"O!XO!K!A!D _Vj ! hStم /0LstDMS j2.IPDOMqLis`]pZNew YI40S*AcNumInteg6ebi_ CommonCmpPapon neE/nt+ TableA><0b#m a? i= 8Cre@F_OBJ_NAMEA.valiOrn seP4resolveExternPOp‘_Ǒb|Ϭ '˶̬v =d qsqQб &=Q".Length#r>Kϳq1= @(_S4SQRInfoU i2 0ES 1.FirstCellTx٪"s(VieW)*%=w (,[ !ReQp3pIn)), J.Source%0P0IDa';#p-sk,i  @3 sTn "b=&qqt0bs@s i5'-L-?---ength If childNum > 1` ThentCommonCmpPara = I@nitNewXp onent,(ThisDocum .FormFields(BKM_FMRInfo).HelpText) '*EXtXdXEnNg [Z i2x Tom.FirstCellTxt"" &#+ 1 TableMarkz( +,zLReNameFilIn" ), M@Source PID+) HFc#."UpdateT@otal "=]P,_GZN iEnd If C'Ȩ̬Set nodLsoxmlobj.SelectNodes("//ɰ"dF=D4.L8ƋYXnQƅQ9i#@KBasunt ,K L:$Z"%%1"+  g5Else?Ko" '+e@e l<> f , 'F Wo%p=B=?µiBoHokms(I).Range. s(1).A(2, @Dl=l q-ߖ+C# Cobs, Geti@!WStrK5Ց[ "sq ColsQA)'!ļ嵥C_/_ `H0,q tmpRccT.item(i -"TSingleQ("T 'VOVuI/ /w Not Is hK Add .SQsEleQ i,.A ,UnlockOd/1 h/ ~ m{g\Trim(i0)d) O""I*0ValHpLAGMARKSuMù00/ /{!{0/{0S0Pk 0st0t00J// 0$Qyp(00O0FJ0q:0 !03S_10%/)N/ί1,o/1////# s ZWTSBHp 2t0 P-AAEoTooX>ڡBackono`oS'#;;;;;addBuzgNR3 -L^Exit S@ub l:Err.Clea(Res  Pͨp0MеΪPֵ@?9a! r@ @Public set`ZueByXmlData(As StrqQDima pMSXML2.IPDOMq?C $BEq  Dim nodeValue As String rootNamlflddFormFieldjxmlobj8New DOMDocument40Hinsh"InlineSh@ape 'e bug.Pt "setByXmlData"BOn Error GoTo l:Unlockn$Set = CreateObject(XML_OBJ_NAME).validnParse = FalsMMresolveExtern!Load>Fi "": w,Rep`lace(8, "_"/")D1C@[YA ) ANothA! 9@u708K EueT ,AI.N @@4 I1\aCheckBox.I J M Q Cd Kke..*870_G;]_"_eI OL"E1at..nKKr( 3m,#,LExit Sub l: .ClearResu`#a ' ֵ1--Уδ 2--#Ӡо0ͦsAlt--Ϣ Public Function bWInput(S)tegeD! ^9 tC# 2 !6errM$sgwa5clACola )e ' iInE,sBFla"Boo`8i&tz cl.Add "<ƱR %һˀ_qaa)֤LfGrayFld4B fw#h]pEcA1tG@etPure&(lsd d=tb b Removem a9Q@count > a(= Tru+TvTTm a.PqR"P{A`a?0.Bo0rder.= wdRedZq(W)KQ C:2?/3C@.-+3ܲڵ"DTF= & " + vpbCrLT "/ʡǀֱϽ<=A;:_ L& "_ Z E6eqDT0#T' m4 NouJChangeI0FF,2os eZPb&6X l.Back 7:1/%__,Bq>ɓ1or~R>J(  '*"lʵдĿ56%Mid(, 1 , Len) - 1),Ww1 u` .o ` /" Ŀû   C ) - 1), "_"@/") If i <> 1 Then,= 2tEnd If'sResult = errMsg & C@hr(13)09wa8hf"ɫΪ "4Che@ckInpuki5'0BoLx VF XȀʵд\@Ϣ|vbExclamation`ʾ @cClHose%(OBa4l bM`Integp = 0 rrp ea 4pSign퐔eɕYP vMonth  = "ǩ_! s _#)Trim(Del 63(|U).R.Ѡ)A"" AcF? ( /" KEv; ra1at(NowPyoӷ ,A3`tmm_ldBV LddJ${!.G8C ,i:LGL7,ArrÒSstrgG atarrg strFormField = ";Ȩ L(ϲx1_$(2(3(4(56*78"On Error Resume NexttmpArrxSplit(, ";") iLLBound() T8o UIf (iL) <> "" The2n 7Th isDocNnt.s4!).^l\1 2!12at_"qLen=!) 8N) MsgBoxI4& "--ڸʽȷ", vbCriticalI: ElseK/ =1ILefi+, (4) ""@Mid2, 5, 2Righ 2uA'AgReplHace"\;".-EE . 4, _End?N#99%M!Xat(CDat&)@jy-mm-dd-'dY#Y+?e%e^fK=\~\h#Aa?%c-! Sub Public Function Ver*) As BooleaDim sAlertAStrinĻd "TrupC"@d1IsFullwidthNumber(U/ "ǩa_"/) wǻx {LfC(?"Selec( Fa/g.Ÿ3=4Ÿi,; )m0:s('n"9_B30)o/ey"o/= 16o/a9i/ ????$&o/e?=?_OoFao/??Ob/(??.Q%b.I4T?.Q$q;OKOnly +h@}Уʾd%qUkln sbEValueln nTmpwiAIntegerS-Trim((oR0oeric= C<2rA@1Exi>tf|e i1W|s = G, i, 1` CharacterB`lɃ?  s oD*61g 0!q& _"R%"c %i_num#`indexPip_lenS= RA_S= SAsc(bS{a@ SA = s+ 1= Next  CharacterLen@ = i_l8+numEnd Function<4BRF.xME P< <<:<h4  ( 0 T@ * B *B HPX` B    l " : "0Hh " p x   "  B P (h *   < @ DX     6  6 8  4@  x   *  *  ( ,@ p x     H   0   ( 0 8 P h  8       B  (08 Pp   "  XHh< " ",@p""    4  "X "  (B  , >H  L  D H X x , >  L h Dx     (0 " 8@ `p "  "  "   "(08 Pp x B "  RP PX "  "  B   8P$h  2 $ 8"@Xx  0H X h "   (8HPX B N`$ R(h$( Ppx B  P j  "   6 6H  " H     (  0  P p  2        ! ,8! <h! ,! @! ," <H""L" " "# #(# " 0#8#@#H#6P###@#D#@8$x$$$L$P%LX% %% " %%% &&0&8&@&H&h&& "& &&&^^0^HpX] `[Eȡվѡ¿ѡеַpart=0ȡǰ벿֣1ȡ벿](]H]` N ! N!&  N!& '      $' henQin 0 ,  '0 kk 0 $'0  0  0 $$$ $' dh 0  0 $$$ $' k8i0xMȡPCTfile²] ]8]x]洢filename-filecode' ] split $ ' G ,$'j     $;$' $  $ ( $  $ ($  $ (  ' iN˹ӦΪprivateA@j] 8B@8>   $ ! $  $ !$ 8B@J @o)˹ӦΪprivate ftitle&fcode $ ' +ȡ ! A@ o$ô˷Ҫָλá]µ ! l !%^. ` L9 ^9^ 9 9q . M Selection.MoveLeft Unit:=wdCharacter, Count:=wdLine - 1, Extend:=wdExtend$ Selection.TypeText Text:="12345"< Selection.MoveRight Unit:=wdCharacter, Count:=wdLine + 5i#=========================ҵ]'   J!%b  'h ' iX  J$ '  J!% J%B@Hd ûҵǩ" "docģ" J!" 6 ʾA@jzxkpdh    J%B@Hk83 Selection.MoveRight unit:=wdCharacter, Count:=1~  Selection.TypeParagraph"  B@ R B@ z 9 iP ( J!( !  C@^ 99q0 R B@ o]Xmarks14_ļ嵥ļ嵥_ҳ_Child $ '   B@x .d B@.ǰкŦ  ! l !B@^$  R B@SPu R B@fo(str ! !d$$'?ļȡļ  %- ļ嵥_Child 9<"Text1"'ǩocum9999 ! ! ! %$9_9 ļ嵥_  9^B"ڵ·"5V Zl ! !d\C@X^ļȬ9qxqp  B@"˴ŵ洦û d B@   ! l !B@^_ R B@A@ %7 ļ嵥_ҳ 9999999 ļ嵥_  _ҳ 9^^ҳTag5V Zl ! !d\C@XZҳ9qq  B@ҳd B@!v   B@   ! !ļ嵥_ҳ_Child C@^ 99q  B@ʡ B@Ͻ op]]] !debug.Print Node.name( !   !   ' x ! $$' k0( ' i  JA@ ,?"marks14_ļ嵥", "ļ嵥_ҳ_Child", thisdocument R B@7   B@ ʾ !d G|j/" ļ嵥" Then Exit SubB@ R B@ R B@o InsertPosMark$  ' DefaultMark InsertPosMark A@  .A@ MarkBody   A@ A@ MarkBody  A@ҳA@ B@o ˵.RecordType0Ϊļ嵥1Ϊļ嵥FieldText1ָļơFieldHelpText1ļFieldText2ָҳ"FieldHelpText2ѡHelpTextH ]( A@  KTļ嵥_ҳ_Child$  'marks14_ļ嵥ļ嵥_ҳ_Child A@  .A@ ļ嵥_ļ  ļ嵥_ļ  A@ A@ ļ嵥_ҳ ļ嵥_ҳ   A@ҳA@ ļ嵥 A@  B@KTļ嵥_ҳ_Child$  'marks15_ļ嵥ļ嵥_ҳ_Child A@  .A@ ļ嵥_ļ  ļ嵥_ļ  A@ A@ ļ嵥_ҳ ļ嵥_ҳ   A@ҳA@   B@  ļ嵥 A@  B@n A@i @   B@  ! ! C@^ 99qX  B@o8  B@o  B@o  >B@o `  ! 1 B@% k ZB@8op  !  1 B@k0 i(  A@  KTmarks14_ļ嵥ļ嵥_ҳ_Child  ļ嵥A@ KTmarks15_ļ嵥ļ嵥_ҳ_Child  ļ嵥A@ nPA@o@@ A@ o  A@ o ] 8P  Gzj     $ '  $ 0  $ 9   'kXP G'j ' i(+Macro67 Macro 'ȼǷѾ˸ҳ 2009-4-9 101893 ¼hӸҳdoc_end %B@H ! ( ! ( l B@ l B@  !! ( !(  !! (doc_end %B@H  !! ( !( B@ҳ B@  !! (o`]] A@' '" " !% " %B@H B@ B@  ' '" A@o8LBmarkbodyֻҪ󵽵һ,recordtype=0ļ嵥1Ϊ嵥]]]]]' & _ļ_Child '( & _ҳ_Child '* ( !%68.FormFields() Is Nothing '.Bookmarks.Exists(tmpMarkBody) ( %.  ; !; !V!\  * %!V!\ҳ;  'J J !, B@J  ' & _ļ_Child '( & _ҳ_Child '* i8]]X   0 5 J If IsNull(.List(.ListIndex, i)) Then .List(.ListIndex, i) = ""d If IsNull(.List(.ListIndex + ChangeStep, i)) Then .List(.ListIndex + ChangeStep, i) = ""5 7'5 . 75 ; 5 . ; 5 . ;q/ frmShenQingRen.ListBox1.ColumnWidths(3) = 0/ frmShenQingRen.ListBox1.ColumnWidths(4) = 0 ZB@8ih0;strParaĸʽtxt11,txt12,txt13;txt21,txt22,txt23;Դ]x]]]]]]]8]P]h2 %!B@f  !!L !    %!! 'd@ !! 'k    %B@j !!R %!  5B@^ Zl\7!VB@Xר_ !_7( Zl\7!VB@Xר_ ! _֤7( Zl\7!VB@Xר_ !_绰7(qp !!R %!! !!R %!! %B@H B@ B@ ! ( o]]] 6 $ ;G 6 6  $'6 j 6 ;$'B Bר__ %!(dר_ _֤ %!(dר__绰 %!(dk  B $B,$' $ ר_  _ %!(d$ ר_   _֤ %!(d$ ר_  _绰 %!(d o@( d B@   B@  ! ! 8 C@^ 99q   B@ R B@op xB@oPHyAttribute VB_Name = "tmpmod" Public Type PCTFil0e $Code As Sng.fBn .Alterabl1 `Endgarres()VorivaFunction Re adTagy(ContentH!, Op(al PartI&hger0^ 'ȡѡ¿ѡеַp#=0ȡ벿֣1ȡ~Dim insh7lineShapalt;>strTemp For Each+In ThisDocumyh.In1s%I f.nativeText <> "" en;%=R In!.(1, , 5_)W1PJMiDd(Leno) + 4)G F= & ",8" & IfNACFA#8, 2@9= 0 3@:Left(E"$$$@") - 1DE|lsD4J !+| 3@A8A6 b GetMoCbIno' ȡy&\aT#wwCpU_@T;'洢 -c` 1 'splitc r=4, (= S(C,aJ.s.˜Msg0n "ûС#ǩ1c"d!e"docģ9oq#@ , vbCrPdcalʾ`1!5"t ft cW-& (x)_A$_9T9u@C?@*\!?xgr8aphEKeyV>D-!HDownJ, c w=yTail('UJ?=nt/ng*W c "_7!e ef, yaa:=9 @&S@orting5wdByLoco.SEhowHidden = False End WithhSelection.MoveRight Unit:=wdCharacter, cou"n&1 |Sub Public  AddNewField s(CurID As Integer)qDimB Name!S`trings orPosGo To ("marks14_ļ@", " _ҳ_ChildThisDocument>#wcKeyuLinTypeText :=Dj& "." 'ǰкC\Forms. RangeL:=, /:= _wd9Input .LefWord$5u 8Be= Trim(M@id(frm1Rec.cobF(ile..(, 7)) 'dȡa.A 3G$GG(1eA.n= t" Z_B'Cua'" 1"`'ǩEntryMacr2o"""Cxitnabled1 TruB OwnHelpA @dJList[Index), 6@S - StatuL'!!':&&fo`s'" ·H$"6;HP!!!Edit?XwdRegular!, De0faulFtx^tFAKF@a"iEA Width@+0#GL{@T˴ŵЃ(:=" "gW{{" {"3iii!CID!/gjgVhgs?]a 7] 'aTaϿ",_E_._PageP_'//?^T^"-.ҳ!.Home3, Extendyv.Bookz cOpDpQ_6_|^*TFSort0BwdByLocaS/joPБgr 0en1 =E) + L8en(= Valb)ȅIfCNC0$gs%DelÐ(T(Q g!pl.`ocObjA, QuitFlag7 d Vuf'"??;t0d4Bh7CneC'#rw= Th E5 '"4 9B"R%PIitǓ7k etelh>S QpH(Inser>tp7SmBody, "ADtPg{w2(i2L""A;! "H2;PXs!Їe¤ i.jPdOne i@&U (yrk22u.!xc1F'˵ '3F 0Ϊ/1ΪBׁ V1ļơ 'FieldHelpText1xh2ָµҳr<ѡHPublic Function AddNewRe cord(Type As Integer, String Opp,alN82")  Dim i ? UnlockDocSelect Case Z " 0 i = GetCurhID("ǂ嵥__Child" ) + 1GoToPos "marks14_ ", ', This^umenjt+ErK=&0 "."gOne, iōB1 &A m"" i"NI!.2M!P 2V ҳ MkLineM{^KZ".ParagraHomeKey Un@it:=wdF, Extend?#KFK)KKEnd # LŖŮ $Sub g([Nam#ĢWith.Book. Range:= , n :=DefaultSortI`wdaBy aAhShowHiddenFalsea"Agy7 %l'`Q!Dan($%fr6m.!UEditDaiLiReFaMfOn Errorlspb N0?sIf NotkProtp Nz= wdNosGenq3g.Unp "1"'0Ifrr.ClearOXD.     AllowOnlyFormRls, Passw:= * orese0?Tr^u(& A 7 % Dte#(rg%v ~ CfbCǢb`v z,\F _j~YDzRsas<!#c`Shenq@4Q= 48 A`i7<= \57).2ҳ i -ig(frmRbS.L{Box2.@DEc@AmoAAHwUBWyAxvhxChangeD(LstObj[ , StepCd, OpAal`artColumn2>uIlOn ErrorBs@ Nith A# ; =JTo .ACountC9'eIf ^Nul l(9Inde@x, i))`Ye n Q`"" G'8  It`1G!tA4E#ed**) Tru;l!*Wd6SheneRen 61Widths(3!0n4 &.Cleap1BatchSaaili(strPara'+pT4ĸʽtxt11,Q2R3; 2223;ҀԴCG1! Qarr9swfogEle7 M0Op 1Cur 勧]&TT1rStALongxSsQ("2").RJlpy%?2>YDaiL"K??<> 3?Qr 7%x0 SSFill2#|lial[TmpArraDX?g URight, 1wI ";" Then strFillText = Left(,Dn @) - 1) TmpArraynSpli pNIf U@Bound(b)d0IMhisDocument.FormFields("ר_" & 2"_").Rang$e.""=U@֤,绰*End LIf] iooarrEles(i)`, ","±i0 + 1Y(0 "_]IE3+aI23Ni  fSub Public @ NewEmptyBookMark(Name As StringSelection.Type:="2 HomeKey Unit:=wdLine, ExtendCÂpWithHA"m$s.Add B:= , n :=DefaultSort MwdaByLoca!hSho wHidd`= False!(Movea#Character, c@ &265Edit S`Q`Ren(2frm.HfrmDataT#frmMsgBoxyi modVerify[T5frmBiologywI(S<S<S<S<0{820A3DAE-6274-43BB-82C0-C803A6FBD3F2}{09B5CB65-3082-4B2E-88FA-EA6620002B95} <ph@%p %X@p" oph Attribute VB_Name = "frmData" Basx0{820A3DAE-6274-43BB-82C0-C803A6FBD3F2}{09B5CB65-3082-4B2E-88FA-EA6620002B95} dGlobal!SpacoFalse CreblPredeHclaIdTru BExpose0TemplateDerivCustomi4zaDP Sub UserForm_Click() End Lk 2xME(S<S<S<S<0{2C10920D-B4BA-458C-B93F-8C598ED17376}{FE61B70A-584F-498B-A44C-6C137FD2ECE5}@  @ & ( , 2@ 6   `%0 %,  "  "( 0@ "HP hx "   "   "  0 "8@H  ` X x $!0'"oX@ A@ro8 msgCoverAll'* A@ro 0!'.  msgAddNew'*  A@r o8 4!'.O msgCover'* A@ro@ 8!'. A@ro]  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE'*omAttribute VB_Name = "frmMsgBox" " Bas0{2C10920D-B4BA-458C-B93F-8C598ED17376}{FE61B70A-584F-498B-A44C-6C137FD2ECE5} dGlobalSpaco False Cr@eatablPredeclaDIdTru BE`xpose0TemplateDerivCus tomizD Option 2licit  P%) Sub chkNoAPm_Ck() ChkA llY.Valq_End%$mdCancel $Unload MÀ{overSelectedItem@""ms|gC kA) AddNewF.n>iB*QxuitWANUserForm_InitializeEDim lngDeskTo pHandAs` LongPN=@ FindWow(vbNull"S@ng,.CaUOC' Ϊǰ$Set# Pos, HWND_TOPMOST, 0HSWP_NOMOVE Or SIZEYJM?/Vt}Y &xME(< << <8 LS(PxME8hhh h  `> `$ `  "`> !0`$ ``` ` `'  X)`> `$  ``   @,`> `$ `` ` `" `  $ `> `& `( ݵ , 8`>  `$  . `> A@j`$   0 :`> "`$ FT}"`2 6''`4 nt.F`6 ).Se`8  Us`: Name`< rm1. > `> `$  `@ 7  ` R "x 4  , 0 @ &Px  " $ 8H*X*   20hp  " $8@X h x  >   <( (h      >( <h (  " 4 X`hp"(  (0@ P`hp      8 @ H P h 2             ( 0 8 "@ ` h p x     J  ( 0  8  H  0X      "    " $ 0  8  0H x      "    " $ (  0  0@ p  x    "           8Pp  & 8 X &h  > 0 ,@p x $0 >8 x D  "*8@H Pp     6  (0@] ] 0] HL----------------------------------ʽ֤------------------------------`- Selection.MoveUp Unit:=wdParagraph, Count:=1]]]On Error Resume Next%&strFldName = "_1_"==== > $ '$ == $ $*  pʾA@jd > % A@k`kXoP](]@]X]p]]1518λ֤ţ...' H > $ '$ > %$'   $ $ ' G  lʾA@jjxkp  ex $ $ ' G  lʾA@jjcumentk  ˳  Pu  Pa > 'n 1518λ֤ţ lʾA@jõd > % A@kp|hk`kXkPoH]]](]@һһ6λ...'  > $ '$ > %$ > ' $ G|j $ $*   pʾA@jd` > % A@k@7 thisdocument.FormFields(strFldName).Result = ""SendKeys ("{LEFT}") > 'n6'''' ThisDocument.FormFields(strFldName).Select" UserForm1.tmp = strFldName UserForm1.Show|Hk@ $    pʾA@jd > % A@k7 thisdocument.FormFields(strFldName).Result = ""6'''' ThisDocument.FormFields(strFldName).Select > 'n" UserForm1.tmp = strFldName UserForm1.Show|kkoX- Selection.MoveUp Unit:=wdParagraph, Count:=1]]]]@ҲӴ]@EmailеλÊ ]strSubС.ŵλ](On Error Resume Next"strFldName = "һ_" > $ '$ $ $'$ $ |dEmailַʽȷ...'  $ @'  $    pʾA@jd > % A@k > %B@H > 'n|d $  $'  .'" "  "  $ . > 'n   pʾA@j d > % A@k|kkko@֤8λʽ]]] > $ '$ > %$|PkH $ G* j $ $- $ $- $ $'( ( > 'n|*   Ҫȷ... pʾA@jdp > % A@kPoH]]  > $ '$ > %$G|j $ $ $ $'  > 'n  Ҫȷ... pʾA@jd > % A@k`kXoP8]x] > $ '$ > %$G|j $ $ $ $  > 'n  Ҫȷ·... pʾA@jd > % A@khk`oX]]]]0]H]`]x] > $ '$  Debug.Print strFldName > %$'6 6 G|j > __$`'2 2 %$   ݣ lʾA@jd0 > % A@k 2 %B@H|k > __$`'4 4 %$  ·ݣ lʾA@jdh > % A@kH 4 %B@H|(k 6 $*7 ThisDocument.FormFields(strFldName).Result = "" Hֵݣ lʾA@jd > % A@kh > %B@H|Hk@ 2 %$': 4 %$'< : < $p'8 % $ $ $ $ 8  > 'n7 ThisDocument.FormFields(strFldName).Result = "" ֻ 8 죬ȷڣ pʾA@jd( > % A@kko ַ֤ȣ25λʱʾ]]]On Error Resume Next > $ '$ $ G|j $ '@ % @   ַѳ25λ... pʾA@jd > % A@k k o Attribute VB_Name = "modVerify" Public tmpFldResult As Sng,\p*hHintMsgboxdBoolean:RedFHlag '-ʽ֤, Sub validateNumc() ' Selection.MoveUp Unit:=wdParagraph, Coun 1 Dim str u Val\ueeiI@ntegerF'On Error Next 4 '. _1_7= getCurrentFormContprol(&uIf Not Is!) Thed  Hm= Fal\se uBu"", vPbInf"aAV, "ʾ.AE "" NMExclamME@k o88nal/>.+7!aPrn=1߅5Uz7 * xit Sub+#i8e+PostCodea$n?$lһһ6λ[C;eeOp!B[[) -.pldn Dv  #O6E 0mxm ,L@+OmOm?*MOmOmE)OmY%'1tqd.[@"w'SendKeys ("{L`EFT}"W@d{A'`y.1TUserq|1.[@ p6f GShowu5`1]!%60e[r oo00THPQ)//%1 ?űm1.?T5y8SinEmailR##IUUP w'@ҲӴ3Markq"b еȻdo0 'ڐ ࡮.a9*ŜŵcY5V_~_DelChr63Gc8 @7ě=?/>/>Ÿame = st rFldN  Exit SubDElseldMid(Value, Mark + 1)RdotLInS`tr(1,p, "."HIf '<= 1 Or = LenZ.)Right,bUD ThenmPre"$qHint@MsgboxFao&B%Err, vbInformationdʾ" C # ChangOColor8isDocument.F*FieldssA[), wdRed0nd If ځ8EW  invalidDate()'8λʽ@DimH As S`tringJed@VC CW@cgetCu rrEDCont8rol EC qGetPureRes@ult(ThS)""LzHLġ&) <> 8B GoTo el3"C5= 4) & "-"@5, 27ƚ - el:E޶5d_"ҪȷCA..."aHa`` XYear()?VOYC*S$,SL}hS ;` P`Q 1000> 9?\ BsBB`B?yeB CMhD G.mD`.DoDf A<> 12?D+"_s"QC"/t0?"_Csss" 1ppy!= !p|I ")/)nm DaysqInteger p`|1q0Ox O'QDebug.Pts = ?/_ZWU|RC= Re`place8_ l"_Ũ8Hi)_2g2q2vqTuExclaO2O2O2O2O2I2v.Select KĘ#/?m"5?$_JO OOqKLO % OOOOOOﯷc__tNot IsN0ric4})c?A_".?Rg"___ֵ݌ٿbSood%\S_WI^h6sult(ThisDocument.FormFields(strFldMonthName))  Days = Last((intYear, VLXIf V al ue) @< 1 Or (> TThen6gPre~ym x ',).ReA""ZHsgbox False ?!0MsgB"ֻ" &T& "ȷڣ", vbInfation, "נʾ?E7F4ChangwColorEɂl, wdRed%End IfSub   validateInput Len() 'ַ֤ȣ25ʱ/ Dim a As StringFx lenghIn teger!'O`n Err:gme Next-= getCu,rr@Cros ""q Exit ;CC"= C> 25B Fm ARQѳĹQ...L|7 *xMEPS<S<S<S<<<<<.0{20BC4B06-3835-4D18-A5E3-275B779F637D}{25DB4657-CAA3-49F3-903F-B9F2A0F154B0} `` `x %` h` 0%`` i@B ,  )i  3) `ex, pInde%`, 6)` dex,  *`CurI`atio p%``  X``   &`! 0 (p   *x0),PX%i0x,z i  ( ~` ),8@ Tru%i0 0)@% ,0)(% 2p),%%i0H 4@ ), %i0  6 ), %i0;    ` `! < `H`!`>A@` @ i` Tei   %   %0 j " (0@H P`hpx   08@H "PX`hp x    "   6(`  2 (@Xx B   (0 @HP X hx   J@H`    * 2@ "HP`h "px  (&@ h.p   * 0  "P  "x   B   ,  H X p       "  "   "    ( 0 8 P  p               D ` h p "x    "       > 4P  R   (0 "8@$Hpx "  08 P` hx"   " 08 "@HPX`p " x  BB8@P`x " ,  0HPX " ` hx "   "   "   "  ( "08Ph "   8 XX .$0 8H "NP    "8 `x&    "  (0@]]0]p]] !z|8k0 |kA@ !! !(SekX !B@J=C !!L 'к A@ !A@ooA@ ( !X!d--X !X(dkA@VA@o]]]8]P !try=5L ' 5   7;'  FldStr = .List(CurIndex, 1) & ";" & .List(CurIndex, 2) & ";" & .List(CurIndex, 3) & "-" & .List(CurIndex, 4) & "-" & .List(CurIndex, 5) & ";" & .List(CurIndex, 6) & ";" & .List(CurIndex, 7) & ";"q@ !!L  B@oh] ! !!d ;0 .List(CurIndex, 2) = Me.txtLocation.Text !X!d-$'B B !X!d---$'Bd8 ڸʽȷڣ l A@jkk$B ;$B ;$B ; ! !d ; ! !d ;q`oX]@]X]x]  !\! !must !d (''d (ookk NewTab (X;NewTa !( !(A@d` (XrmFiel !( !! !(kDMsgBox "ɫΪʵд", vbExclamation, "ʾ"k  !\! $TextBox !d'k`kXP ` !(!k($ CurIndex = Me.ListBox1.ListIndexovince+ If CurIndex = -1 Then CheckInput = Truepe=$i !\A@ZA@o](]@]X]x !!LG|j@A@ !5C@.ListCount - 1 55L !!L ! $ ' Ʒ   A@d  Ʒ1 %!! (HA@8k0 q Ʒ !!L A@ !!LBIO_Mark !%BIO_Mark %!!'BIO_Mark %!!'   %B@; thisdocument.Bookmarks("BIO_Mark").Range.DeletekkTotal= !!L " %A@^A@ !!L !(dx !(k`A@VA@oHA@ ! ƷA@A@o](]@ !z|k  !\! $TextBox !d'kpkh`  !(8k0 |dA@ !!A@ Ʒ !!  !$$A@hA@koX' A@ro`] !!' G|j !\A@Z 5%5(d7 .txtLocation.Text = .ListBox1.List(CurIndex, 2) 5% 5% 5%- 5%- 5%5X(dk 5%5 (d 5%5 (dqoA@ ! ƷA@A@o0 !! !(kH !! !( !( !(d !!L  !(k !!  !(d !(k !! !!L  !(d@ !(k(k op !! !(d !(koA@A@&A@ !(!o ,A@,Totaohx !X!dGzjVth !X!d$ X!d- X!d-$.x1.Lisڱݣ lʾA@j !X(d !X(, X!d !X(. !XB@'zzhk`A@iP X!d- X!d-$.! X!d! X!d- X(d X!de! X!d- X(dk k o ` A@, o   A@v` {TAB}A@@xk@ A@o0 0 ,A@,o  ,A@,o @ ,A@,o  Ʒ1A@  !!L  !,kx !X!d--ٶ !X(dkH !X!d$!Z !X(k !!L'to  ]H  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE磺 : yyyy-mm-dd$ !8( : yyyy-mm-dd$ !X(d A@ " %!$'A@< .;o ` BmarkbodyֻҪ󵽵һ,recordtype=0ļ嵥1Ϊ嵥] ] ] ]  ! Ʒ '0  !% !B@J !!L ' !!L  !,p  %! >5!R >7$  > !, >q0 k( o  .A@ t !!L'vkoAttribute VB_Name = "frmBiology"D Bas0{20BC4B06-3835-4D18-A5E3-275B779F637D}{25DB4657-CAA3-49F3-903F-B9F2A0F15} dGlobaBlSpacoFalse Cre atablPr@edeclaI"dTru BEx0pose0TemplateDerivCustomizDDim BIOCount As Int@eger  cmdQuitDown Boolean P4A8 Sub AddNew_Click() [ i ) a C@ontrolEndListIDIf Me.C heckD= H The"pExit# IfInp utW&Unlo9oc")Box1.,ndex <> -1L@ FModify.En^w,ndF)ÉSItemE=Am- 1 Fill QueueHCn@+Del+Catxt`.TexR"--"O= ͍;RefreshOcxTreLEZ/r f_LmyIR[ARfldStrAing'CurIb9`WithI/C!F= bA1A`For iNCo .ColumnAD= & ( , i) &X ";)aN0i 'aFh1d bH2W3B<4W5B;"p 6W7D+@!/:.BeU3a,$' 4Hdf@DȖTmpArxrayC?(@,=!_ePartmentBe4/`ationDE:HSplit(xIl, "-"aI uUBd(%)2 uD "Mz!aE#!iMsg "ڸʽȷ!", PvbEx@m!, glbHint%15^1,c(0-f1B, .2p/eSave 0<&@ = CReguMQStr11Bq  FillFieldsInMark "" & i + 1, Str Else "For Each tmpFld In ThisDocument. Bookmls( m1").Range.@m\`W.Result = ""'NextcmdClear_ClickGoTo ci Enaf , i WithDelTableRowMe.ListBox1`Count!IDf = 1en.ExC0BIO_") QPos1OgeStar Ub@2iL1A"B(+ 3).Wet'A tdN/E nIuUpdateTotal "=’e,VHA(BKM_ Info) c:ARemoveFuY{p%# aIGIL I.OgIa  +Ixnpu+Yce ,J! աn?' ʰGBCreAReXStr() 'We egQuitX`je9 adqaTxtpae>=4 q5= :-sg 0RtPCValue/q0.txtDeNPc-= p(? B0E6^at8ion31 , 2HA` rq5OroD,g7?0 P" # 2)0"-d3?x4 % SaveID5haClassqI6-aUp-<5a,&,,C$5O"i !_Ch0 >bf-7*@8N9vt]3{vaUp}E_A?1 t>nel;^qŒ> 0jB 13 /w? q 63<~-p 0AO #1 qE4ub@,ð"Ctrl,a. =i,go g7Ե jҪdK_KeyUPp(Byh CHodeMSs@turnInR, sShiftQtMF`s݄CKwFunch D@`()ϥVU"ÞteS4Not Is0se) PjInS_`ѠtR-=Rev(yTh MsgBox "ڱXݣ", vbExclamation, "0" Me.txtDate.Text = ":SelStarB0> LenXgthC( V)1tFocus`CheckCTrueExit` Func E`nd IfInput @ Privo Sub J_KeyUp(ByVal Code As MSForms.ReturnInteger, Shift jIf InStr(1,/1-")dRevThen`ρ% 4  IW& "-qElseT7|H`'Ec@Z ^eP!ment_PressG`Ascii`ZBNlB C{ JU13 HOn Error Resum e #oSend@s ("{TAB}"-FnMJ?c'a^'ILonceer8SaveID!UUserA_A ($InitPos "1mGList1.Count > 0 I ected(0?FC |@--"  Tri\m("8 B@ackCol_= 12632319#K Record= "N.,ialize%/Dim lngDeskTopHandlbLong= FindW`ow(vbNul`ring,qCap;C' Ϊ׈ǰ$Set# ?M , HWND_TOPMOST, 0HSWP_NOMOVE Or SIZEaN!!$abel6.$"磺" & Pat(Now y-mm-ddE #GBIOGetRen(ThXisDyZ.!FieldZKM_ Info).HelpTX1w CurFr:m M|!"Nub8licy2{@() 'markbodyֻҪ󵽵һ,rB%type=0ļ嵥1x"Index{fd| Wj0'tmpBkMSt#0 i 1 To baD :yBiG0=zBook !s.Ўsts(=S),>1#eFAddItemw8 - 1):(%,AAWith #& .Rangxa1j'.cT 5 ur2, jC -Purezlt(i,j)4+qjA+Q WUo1-rǦLQueryClose(Cancel&, MJ4pNothKyk:$IW<>_WbhkRef0hTreeogV frmYouXianwXmodCheckPIDo#modInitDataUGfrmAddRecordؔ | A$xMEPS<S<S<S<` I`dnd I p8 it`;` d0x iP iR!iT i  `' ( % p 8`!` `` $ ``` $` vp0 i! zhj%   x` `Th`wTab  | P ` x ~H),%i0rks(`ian.` .Par   ``!,8 8 i  `$```>Ȩ`  i liVB@h ` 8 % h  %`8 h   " (86P    , (0HX `   ,8X,x 28P Xhpx B T40hp 0 ,phpx  J , (@ X0d8 X`lp6 " ( 0 8 @ &P x V  & , 6@ x  B 0       "   (  8  H X ` "h p x     (     . P h (     \ 8H < : H@P@ X08P "p     ( 8 X x, \ 0HX`hp "x>(Z0   " 4 H X`h ,   ,  08@Hh p  , PX`x " *,$$ HP "X2` ">   "(08@Hhp(Z  0@HP "X`h "  "  (8P`p   " (8 @PX`px " "   ( @Php x     fX "`h "   X  x& 08 B@HPX`h 60(0X06    ( 8 " @ H P  h        ] ]X]p]]ep !X!d$ݣ lʾA@j !X5LC@9,5d9.(q@|8k0 !!!Ϊգ lʾA@j|kA@ !! !(k' If YXQCount >= 8 Then' IFNewPage ' End If !C@J !!L' !!L '5L ; !!d ;0 ˴Ҫġ !X!d ; !Z!d ; !! !% ;qP ! 7; 7;' 7;' !!L   TB@\5L ;|q (!A@VA@o]x] ` %!B@f P!  !! ' $h $h Ȩ $h $h   %(dYXQ_Mark   %!B@^k P!   !! !! 7B@j P!5!R7%l!(dqd P!  %!  P!  %! %B@jk  P!  !!R'dd` P!  %! %!!R 'd P! d %%l!(dk d %!.n b n!B@^ThisDocument.Tables(NewTableID).Cell(1, 1).Range.Text = "" + Chr(10) + "" + Chr(10) + "" + Chr(10) + "(" & frmYouXian.YXQCount & ")"q P! d P!A@d A@pk P! %!! P! %!! %!rB@^ ThisDocument.Range(ThisDocument.Bookmarks("" & frmYouXian.YXQCount).Range.End, ThisDocument.Bookmarks("" & frmYouXian.YXQCount).Range.End).Paragraphs.Add d'^ P!  P! %!!  P! %!! %B@k  %!country=$  %(i]]  !2!d' HKTW;̨,HK$`' t %!ҪȨ_ !_7!!(  $7!!A@2 Zl\7!VB@X ! _7(qox8Z#recordidָǰ¼ıţ2]]  P %!! !^ T R$` (^i0 5(05X(d5Z(dqop]]] !!G|jA@ !!L! Me.cmdDel.Enabled = False !(A@k !!'   %!!'  !B@ !!L  !! !!L A@v k0 !!LUThisDocument.Bookmarks("" & Me.ListBox1.ListCount + 1).Range.Tables(1).Delete !!L  %!!B@  %!country=$  %(3ThisDocument.Range(TabStartPos, TabStartPos).Deleted !!L  %!%!!(0 !!L  %!%( !!L  %!%(k(QIf Me.ListBox1.ListCount = 8 Then ThisDocument.Bookmarks("YXQ_Mark").Range.Delete] !!LYXQ_Mark !%YXQ_Mark %!!'YXQ_Mark %!B@   %B@   %B@   %B@kk !!L'  !!L   !, Total= !!L  %A@^Vthisdocument.FormFields(BKM_YXQInfo).HelpText = "Total=" & Me.ListBox1.ListCount & ";"A@ !B@ !!L !(kA@VA@o]P]h] !! !! !!L G|jA@ !A@` !!'  !! !!  !%;  !%;  !%' A@v A@xA@o8 ] !! !!d$ѡ lʾA@j !B@| k !X!d$ݣ lʾA@j XB@|8 k0 !Z!d$дţ lʾA@j ZB@| k k !!G|jA@ !5' !!d ; !X!d ; !Z!d ; !! ;d !! !% ;k q !!A@vA@ox ]P   %!  !%7!!(0  !%7(  !%7(q o p"_һ_ܲڵضaaA@o` A@ !! !!  %!%B@Hk A@ro]0]H]` !!G|jA@ !A@` !!'  !! !!  !%;  !%;  !%' A@v A@xA@ox{TAB}A@@oxoh]8 5!' 5%5(0 5%5X(d 5%5Z(dq !B@ !! !( !( !(dx !!L  !(kH !!  !(d !(k !! !!L  !(d !(kk !(A@xoP !! !(dH !(k0o(]]0 ,G|j !X5d'   5d-'kk 5d$'kPkH 5d-9dk kq !X!d !X!d$l G벻룡 l A@jjoH 1A@  !!L  !,kH !!L'to0]]  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE !2!d' HKTW;̨,HK$`' .  $ !( !A@  %!$' G|jA@8o]X ]p ] ]   '  !% !C@J5L '  ;  %!%!!!d ;  %!%$ ;  %!%$ ;  %!%!!!0$H ;d(  %!%!!!0 ;kqk i . !!L !Total=8  %A@^kpA@ t !!L'vk@o80ZAttribute VB_Name = "frmYouXian"D Bas0{95C75170-BD19-41DC-9763-8C5318C3AC38}{F2E9BB0E-36DB-448A-B261-463496E8C94C} dGlobalSpacAoFalse CreatablPredeclaIdTru BExpose0Template DerivCu@stomizD Public YXQCount As Integer )- Sub cmdAddNew_Ck() Dim Fiel0dString CopySour-my O%e.Modify.= 8dF LPag`k &9e.@^Item' =?Ǫ-'Cur.1a/ - 1!(e, 0)5  1=A_ '˴Ҫġ 2f3SQIDT4LQtS, 13]3= "& ";" &N@B`kL.be AS@, E$Selected(";@$N`Delr`RefreshOcxTre [FLEnSubɸFhuncA `a$(!cMark', Opal!aB=)AġtmpLoɿ TwIDnThisument.Bo(okms).Range.A3`>G.89?1=0Qz7Z2(, @)-A`8Chr(1p#+ 9+ "Ȩ" )G0f1R6)G " _MgQ ]?t <= Mr3o7 1( &dQ),e).Pxast4's#k!s.c!).Cell(2=I= o t ! Eu/ [ $~@t72 + __'F1 1Re s`ID n>0#I2=sb((#?L==8a=ra@graphs1Z > Ont ļq??s0 1.0g/c!!eOOOOGcCbs("" & frmYouXian.YXQCount).Range.Start - 1).Del@ete E nd IfThisDocument.FormFields(BKM_TotalCobs).HelpText = SetFlagValueAdd(!,A, "cry =") Function Public Sub ReNameTab@leMark As String"jDim i Integero str  D= \txtr y.tRepl0ace(^HK"TW;̨,BWith +BookmYs( _Ѓ2_.InlineShapes(OLEat.Object.n"ҪȨ_Me"@*"G InitMultiColumBnz MidC998), $H/H2)PInput.EditType :=wdRegularX, Defa :="TC;@<:AeÚEĚh IIDH, Ne"wLOldJ) 'recordidָǰ¼ı ţ28WfldU  Each 9InLBLID{&sC!Mtxh=%+¨PoFsoIf qListBox1.C = -16en Exit% UnlockB%  'a(a ..EndFalsH-CModify6*f$=#% + )RemoveItem (KV&> 0". !&hi$) G4Toc/gillFajMR:iad G)(w= 8'JT' xld" "j RowszGx,6!{%qx=, +<:4e}t./P !/ ?=pResv/"V ~y0'0op s0m# _"my-ZtmptZLongs ^<7.[sts(("7)p e@a/5OD9+/m=/C , "<'p!0* sy!@Lfr?\ ^o[j[],(i, 0)`'iaM31[Upd R "b=00DԖ! Infoj'tdOBR)ac& ";$=SrFuY$ `Ġ1{1c AqwRefreshOcxTreDL%ownߕa>TSBthOrO%?Ch:$, 1 f /rS/i = Me.Li@stBox1Index - 1 To strField!(Cur, 4) & ";" J2"%3)}FillFaMingRen iNext CtrCmdLockDoc End Sub Private cmdModify_ClickB(3Dim d As Integ$er)If>= 8 ThenTrim(cobCountPry.TV)"F" Msg "ѡ", vbExclamation, "ـʾ"= %e.;SetFocusExitFA JIfG 1Not IsDM2txt1K<0.8-E^SQIBD]д],, ]\X= -@ KmU nl_Withɨr= ~bs1ToWy=!7!]3 4 W @= "hbElse_ x&, 1Hi8a0 F; (Lst"g+Range!CC CThisument.Bookmarks("_ +.(b-Bs(1).OLEFor`.Object.Value% ÃC  Result2..2).y, ɇ4!CommandBu tton1EnCob\ "_һDڵq"aaQ Quit Just Empty pboarDۖ<>{G,=&Q/q-,.'Selp b9qHadwwUp vi1*ZvQ-Str #yyˍ<= 0vSS Ch13Item,0?cT=S) i,;ߖp2VZ_, _2K> f[ On Error ;me SendKeys ("{TAB}"?4! Frame7o(d(.;%hbSMcgf"Y)Q 8d.Yt$O!tOE ?P#,oG*fgqmdDel.EnableFawy#UpA'1Down?| t >n TruM>E ވ/ L? I"B! <~":ʷ D 0? '5EAy$Gڟ/ٓ)g+%=  ? H;_KUp(By? Cod"MSsturno, sShiftHqJTxtL'SFlagAleatUn Exit S ub With Me.tx`tDate`TxtLen = (.Text)pIf >4 Or7 ThenR Z#InS@tr(1, m, "-")0QC1Flag"T ruEnd If  O_'IsIm6&v~C 7y) > 4 AQLeft(L, 4) < 190h MsgBox " A", vbExclamation, glbHint A$¥ Priv@ UserForm_ActB(InitPos "1"C3*List#1.Count@3 Selected(0ǔ%ő@RecordC=O2.ialize2Dim s@tr As ing2AlngDeskTopH andle LoE N= FindWow(vbN(ullC,A,Cap/( ' Ϊǰq$Set# A-M , HWND_TOPMOST, 0HSWP_NOMOVESIZXE # = [isDocumenftB+ryOReplace( HKH"TW;̨, $ CurhFrm@cM ab(]a(m1E.Range.InlineShapes(1).OLEAKat.Objc a2VPureResult++/#,1)20V32S"|IsL #r0gValue%?+o,df Els_Fp3 -k߀qNОa:1Fa[oy`yQueryClose(@CancelC, Mod2kH$ZNothvoy#=W< 8@UpdTotal "b=8a%YYyLockh@~<>qaF3 RefreshTreeeqSsxME , 0mm . x + i0 + :i2 `4 `6 `8 `: +< X:i0 `4 ' `2  `8  `6 +>  i@  @8XB (8HXhx(8HB PX*h@(@ (` ,@ pbx H (08@ B HPpx@((0@84x ,h b H PX`h.      (8 @P Xh p      4 P X ` B h p x  :   @ 48 p x @ 4     8   b  TX     *   .  H  X h  p                   ( 0@ HX `px D  B (0HP `]У8+,  +,  +, +, +, +, +, +,  +,  +,  +,  +,  +, +, +, +, +, +, ix 0 $*"֤зֳ֣' z`kX 0 $$ 0 $$  ֤·ݲȷ' zk 0 $$ 0 $$  ֤ڲȷ' zpdh 0 $$ 0 $$ 0 $$  0 $$  0 $$$֤·ݺڲƥ' z 0 $$ 0 $$ 0 $$e֤2·û 0 $$' zkki]8PhA@. 2 $$*֤' zHk@ 2 $$ 2 $$  ֤·ݲȷ' zk 2 $$ 2 $$ ֤  ڲȷ' zHd@ 2 $$ 2 $$ 2 $$  2 $$  2 $$$֤·ݺڲƥ' z` 2 $$ 2 $$ 2 $$e֤2·û 2 $$' zkk 2 $'4 '6 8  6 4 8 $$ 8 $,  '6 8 6 KT1': KT0': KTX': KT9': KT8': KT7': KT6': KT5': \ KT4': KT3': KT2': n : 2 $ ֤' ,βУ벻ȷ"zkiA@. ](@ 0 $*15λ֤ зֳ֣'< zk 0 $$ 0 $$ ֤  ·ݲȷ'< zk 0 $$ 0 $$ ֤  ڲȷ'< zd 0 $$ 0 $$ 0 $$  0 $$  0 $$֤ ·ݺڲƥ'< z 0 $$ 0 $$ 0 $$e ֤  2·û 0 $$'< zHk@k8 0 $19 0 $ '4 '6 8  6 4 8 $$ 8 $,  '6 8 6 KT 4 1'2 KT 4 0'2 KT 4 X'2 KT 4 9'2 KT 4 8'2 KT 4 7'2 KT 4 6'2 KT 4 5'2 KT 4 4'2 KT 4 3'2 KT 4 2'2 n 2 '< ix>֤麯,д,ڵǴַϢ,ȷ,򷵻ؿX @  @ $ '> @ e @ $ '> d֤λ'> kiAttribute VB_Name = "modCheckPID" Dim Wi(1 To 18) As In@teger 'У PrivaFunction SDetn) z)U729310 4 5 5 8 6 4 7 2 = 1 96 10 Z3 1 p1q1U r1s1:1:1;~;End sA|ublic CIDC15(ByVal St`rID15i ng If Not IsNumeric( ) Then   +֤зֳ֣"aExitX_If 12n'ݲȷ&11'> 3C@N_'l,seFUm(H= 4O= 691A@=@OAH4̓!H IA`E"!w!2 %}0aa2û" &Y & "y_ Eg'y8]j8t7',` AiWi, numA1( B0Leftd}8, `v8D$#! 9w6! +FeA= I^< B= ForA004b+P7"E A*FNextElect CaseHMod 10a1IФ1CB7H0Lp4XLO9LO8LpO7LPO6L݄ 5L4L O3L_2Pa#SeAr`<> 0Righ`_ck_.T." 'βScW7 ,+q_r²To1Krrmr,Ķpr"0w̏rv q15λ__?k iIP?l/`;s5a|Ait Co~喏t ͫ tկ ta2otϊߺOt15fXߺ?t ??&~ u1ld>ElseIf Val(Mid(StrID15, 9, 2)) = 2 And ( 1130 Or@1) Th en CIDC15To18d"֤" & vbCrLf"2·& "" hExit FunctioEIf |7ELeft$6)>19:Righ 9) AiWi0 F@or num1 To 17B%+7,, 1* Wi(!!+Next Select Case Mod 11. ?ej1 A 0 2 X 3 9 4 8 5 7 6 6 t?5 8_4 9 3 12 󁺃 Jߤ?a'e 'r,д,ڵַϢ,ȷ,򷵻ؿ co heck(s d As !ing)G 1LenCa157E@mCA 15# 88 0H Dλ8)E&k7{\xME (< <: <<  ` ` `( ַx%erFa  #) %`X` B@ NP%` ! xG|j " j B@`$ B@ h8&?  pex, k X `ָ`  N%` p  Z " H Z'n0`$  ( iݵ NN%`  * P@#i ``  N%`   " 0`$  %?    ``  N%`  hP " `$  Fx ?  8  ` , p% . i N%`  x ``  N%` `0  2  " 8  `$ X 4 i``  N %` `0  2 p  "  `$  6 x i NX %` +8   i<  ) 8 %`> `$ ``@ `+B )  %+D ` iF  iH X B (" 08@HPX`hp  "   8 HXh **@ H P ` p" Dx  "0Xp x0 (@` FF0x     " `08 @X h "x   "  (@ P "`     @Xx**      ( " D0 x           "  (  0 8 @ H ` ,x       8 X h F F     (  8  X h " p x  &         " `(       " "   (08@ "`H84  X h 8Xx  " "  "  ( 8 Hh$x  $"   (@ P "`   $B( " 08@HPX ` h*x V (  (48p  * *   0@B HPp ""     (08@HB PX `p    ^^0^HpX] `]] ]8]X]p]] N !x N!&  N!& '   countrylist  $'  ykk  G|j  ,$'  !0'$  B@8  B@J  $  $ ;$'" "   B@J " $"   !L   , " $"   !L  , kk ' $  (0B@o*8ϢصͼƬalttext,ʼʱȡ]x]]]]]]P N !  N!&  N!& ' ˬ  countrylistA@H  $' ykkxp  G|j$  ,$'   $ $ /- 1 Debug.Print l  $ #!0'$ N!  $ #B@8  $ #B@J!   $ h $ ;$'" obox "   $ #B@J " $"   $ #!L   $ #, " $"   $ #!L  $ #,kkx  Z $  $ #(0  ;o0h-TصͼƬУʽ Ҵ;,Ҵ;,Ҵ;]] N !8! N!&  N!& ' KT  countrylist 8B@countrylist###  N(& y8k0k( o]`]x]]]]]8 N !% N!&  N!& '   provincelist P  $' ;yXkPkH@  G|j  ,$' 8,  !0'$  B@8  B@J  $  $ ;$'" "   B@J " $"   !L   , " $"   !L  ,kk  $  (0oP+8ϢصͼƬalttext,ʼʱȡ]]]] ]8]p] N ! N!&  N!& '   provincelist  $' ykk  G|j  ,$'  $ $   $ #!d'$  $ #B@8  $ #B@J  $  $ ;$'" "   $ #B@J " $"   $ #!L   $ #, " $"   $ #!L  $ #,kk  $  $ #(0  o]@]X $ $  $ # $ #., , !!d $A@dk ox.TصͼƬУʽ Ҵ;,Ҵ;,Ҵ;]] N ! N!&  N!& '   provincelistprovincelist###  N(& ykkoTݵĸʽ ʡ;д;,ʡ;д;,ʡ;д;]P]h]]]]] ]@ N !/ ĵеͼκǶʽͼ N!& +ѡͼεĿѡ N!& '   citylist  $' 0 ,  '0 k@k80 0 G|j 0 $'0 0 ,$'2 2 2  p  2 2 !  $2 ;$'" "  " $"   $ ( 9 "  $"   $ ( B@ "  $"   $ (B@k  ox 'ݵĸʽ ʡ;д;,ʡ;д;,ʡ;д;,split with $$$ if the length large than 3000] ] ] ]( ]@ ]X ] ] $$$$'2 2 'Ҫ N !' N!&  N!& ' H  citylist  2  citylist### $2  N(&   'kH k@ k8 0 ThisDocument.Fields(1).SelectB@o  * xml]@ ]` N ! N!&  N!& ' Ȭ  xmltemplatexmltemplate###  N(& kP kH @ ThisDocument.Fields(1).SelectnInpo x - xml !: !d $'8 "i  ]@ ]X ]p ] ]   !0'$ < 'valueֵstrKeyPжһʡֱϽѡΪֵ򲻽кֵIJ" If strKey = Null Then Exit Sub  B@8  B@J ĵһλһհѡ     $ ! <   B@J $ !  !L   , $ !  !L  ,_k ! $  (0o  !!dGzj$ !l getCode = GetPureResult(fld)( $$'B 4special B z k !l Re !n!0_ڬ'B d'B kzki F 1KTȻ'D Ķ2KTһҵ'D 3KT л'D 4KTרԺУ'D 5KTҵλ'D ni!Attribute VB_Name = "modInitData" Public Type City provinceID As Slng:*nZE,nd^kcfLipst()TtSub Country(comb(oBox) Dim iIntegerlinsh lin@eShapealtniq1strFArrX Value -For Each KIn ThisDocument.InQsRIf.AlternativeText <> "r" enj='R In5(1, , "calj")@1Mid(E15iAExit > IfN8_C(; SubCj@ Split$","H$ e= .+aCleaAddItem\ %riLBLd(!) To U@7 (i)u 9@o;;Aa ) >= : q dby&"f - I1!G($AC 0  JmK ih1ECC !BMȔiਤ@(Paramay"J()) 'ص͠ƬXtZ,ʼaʱȡo??r?bS % ġb???A: ? _???? P? NWQM1âw@~&a/ln1-(n0)H&'P:'Debug.Print lE0T(l)Smb ooSD ``|= SA>zS7S`S/#vVT2T'!Pt”ZUlQ ,@I-1ϯUC= &'2/& set0rMVTVУ@ʽ V;, XC8UOPoOPooa9OPxt r@,OPoTh3xtPi###" &Q{R xw PxObject0_c  ()2r$0spe### #Yųr@#@R§et= 6K@3EC"0 ·+wp/[.nb.^?n)?n?n &a6Arr = Split(strCountryArr(i), ";") If UBd) >= 1 ThenXvcomb.AddItem ""FList(-  - 1, 1)L z;qM0M Ȑ&En0d IfY Ne0xt iaValue[ Sub P@ublic  initProvince(ParDamsay "()) 'ϢصͼƬ@altt;,ʼʱȡHDim i As Integer l inshlineShape StringG )pK*For 0Each@I%In@isDocum@ent.In(s"kB .AlternativerTAh<>@5=R In'( pol"CMid(16Qxit >K?͝C ""; ESuA1j@",~/ZlLCnR0 RT~oFtg 9=X0)(l).a0g$CleaRo(ij) G A @$ C We <3Ɯ(,_rr)N h< ߨMWAmҨI 1B9"lIsperTypq7tmpCobaC`oBox#lPd&OEANotbi) hIs hSet hil6!%1$, Th9(txaE bp, ~901Bzjsetj!^jahjУ ʽ 1j;,#Bi4Occceccc cOD cc y^ = " ###" & DR` !5wCity ؑ ʡdoo"a :q Q"LoLTmp,a@Ko)I;i 'ĵеͼ΀Ƕʠ<Γ  'Ŀѡַߏ-蔫M-c!O8FJ2N$=-& .O-gC-P F: , !ϩ @FReA"2) yq"@(H*3 `:2OH V EGID@(w ,O+޻nam4 +}L ؐm m 'oMoMloMoMfM,s with $$$ if the lengAlargean 3000A$oQ?PQ DW7Ig Dim strTmp As Strin CityArr ()|6Value n = S plit(, @"$$$")iLBound.For Each insh In ThisDocument.InlineSh0apesKIf-.AlternativeText <> "" enaltB1 -In(1, ec@list")!10J <= Ut/H1"8##0#" &鄚(iXi + 13End InfNRC ' cFields(1).Select A Sub Public  setxmlTemplate|) 'A {o HaR;tDCՂ?Ioa99Function gK:h :CYMid(*It@xtXml.v, 9 Z IcomboboxProvinceChange"@YgK, !C!B ox FldNh - 1)ID!F0n@Rmv ic%HG );Cod`e(fld)m[~0.RA59?Dt#g94TypewdB?@ABCDEFGHIJKNOPQRSTUVWXYZ[\]^_`cdefghijklmnopqrstuvwxyz{|}~tm>xMEPS<S<S<S< <<<<0{DEF38976-5BFE-438E-B402-79A725D39E4D}{042DED77-08DA-4813-9657-F4B62D9AD89A}hh  x% c` ` ` `CODE` 嵥_ `;) % :p0 )P%`_ b  `!  `_ҳ% 嵥%`  !`  @,4 8 #)X ` %i ''''``>`F ! H ` Lx `ļ P $i 嵥 N  JX  R i!` `@ @T % VX  X   0 ` Zp ) X%i  itB@^``7 H ih i% %0  " 8 @P Xhp x        (8@H "PX`hpx(,*HPX,p  .t0  2 *8 hpx ,   2 .  &Px  2 NP 4X  (, HPr 2 &  *(  X  ` *h         ( ( ,0 <` f   2   : L8        "  "   ( H h p " x            *(4X . (  (08@ H P p  *0 HX` h p   ( "  (08@Ph "  B 8 @P XhpN  " ( 0@HPh $p       $ ( @PX h p    $ @ HP(X ( , zh x& * $@ DH*0(P (x ,  z& * $8 D@*   (8 " @H Pp H   " (@hp0*(@H0`* "<. PX`,x0 &(P 0p ,0 ( 0 " 8  @ P >X : l pH!! !! " !!!!""0"P"p" x"" ""(" """ """# #8#0@#0p######0#0 $P$X$`$ .h$"$$$$$$$$8% 8% H% 0X% % % % % % & & 8&H&&P&x&0&&&& .&"&2'08' h'x'' ''*' ('' ( ((8( @( P(`( "h(((  J(( B $)()0)8)@) H) X)Dx) ))) )(*8*2@*<x****** * *d+Dh++ + + ++ ++ "+,,,(,"0, X,"h,",,,,,,-- "-- -0-@-"H- p-"-"----... . " (.0.8.@. H. X. h. . . ...". ."/"0/ X/`/ h/ x/ / / (/ / //0"0 @0"P0"x0 00 0 "0000011 1 81H1 P1`1"h1 11 1111 "11122 2(282 P2`2 h2x2"2 22 2222 " 22233 3 3(3@3 X3 x3 3 "3 "3 (3 4 4(4 "0484@4 "H4*P4,4 4 4 4 44444 "55(5@5X5h5p5x55 5 "R5 566 6  86 XX6 z6z07"7"7 8 8(80H8x8 8 8 8 $88 " 88899  9 (9 89 6P9 69 D9 :: : " (:0:8:@:H: h:p:x:::] ] 0]p !!*! KT ! .KT !.n 5x !( !( 55L e+ !( !(5e !( !(d !( !(kqo]]]]]0]H]h ! !d ! !dӿռ¼ lʾA@j|k ! !d$רҳΪգ lʾA@j|k ! !d$*ֵݣ lʾA@j7 ! B@A@|Hk@(=================================new0624 ! ! ! %'7 () ר ļ'  () $`'ѾӣȷҪٴ 2 l ʾ$j 4 X|PkHk@+''''''''''''''''''''''''''''''''''''''''''' ! !0100001 !!d$Ϊգ lʾA@j|k !!d$*ֵݣ lʾA@j B@rk |(k k+'''''''''''''''''''''''''''''''''''''''''''%(=================================new0624 Me.cmdModify.Enabled = TruetaA@ $(A@^ !!*! +'''''''''''''''''''''''''''''''''''''''''''$Ŀ !%Ŀ %!! Ŀ %!! %B@k.'''''''''''''''''''''''''''''''''''''''''''''' ! .; ! A@ ! !L;marks14_ļ嵥' d ļ嵥 ! !L ' kļ嵥_ļ ! !L' "ļ嵥_ļϢ_ļ ! !L _ļ' code= ! !0 ;nodepath="ļ嵥_ļϢ_ļ ! !L _;' ! !d' ļ嵥 ! !Lļ嵥_ҳ ! !L"ļ嵥_ļϢ_ļ ! !L_ҳA@ Total= ! !L;  %(  '''''''''''''''''''''''''''''''' ! !0100001 !dA@k#'''''''''''''''''''''''''''''''''''d` !. !A@ !!Lmarks15_ļ嵥' d ļ嵥 !!L ' kļ嵥_ļ !!L' ļ嵥_ļ !!L _ļ' code= ! !0 ;nodepath=ļ嵥_ļ !!L _;' ! !d' ļ嵥 !!Lļ嵥_ҳ !!Lļ嵥_ļ !!L_ҳA@ Total= !!L;  %(  'k ! ! ! % ()  () ! ! ! % ! ! ! ,kp (A@ !L , $(A@VA@ cmdModify.Enabled = Trueo]  !L   ,o]@]X]p]A@ %!5 '5rB@^q  .  7(d  . ' 7  7!B@^ί !% ļ嵥 7!%v!!!R '&d8 7!%v!!!R'&k 7!%v! &7 99 9 9^q &7 ! !dA@ &75!' 9q`qX 7(d  ' 7  7!B@^ & '& 7!%v!6 д &7 "9 $9^q &7 ! !dA@ &75!' 9q@q8ҳ 7(d    7!B@^qA@o] C@J5L '  ; ! !d ; ! !d ; ! !0 ;q0o( A@* ,A@Z !(o `] !!*! KT ! .KT !.n ! !(d` ! !d$ ! !d$ ! !d$ !(k k i ] ]8 $(A@ !!*! KT ! ! ! %A@0 ! !L (A@ !(d  (k KT !! !%A@0 !!L (A@ !(d  (kx np !!*!  ! ! ! B@ChangmyCob Me.txtFileName.Tag ! !L9 thisdocument.Bookmarks("Ŀ").Range.Delete k  ! ! ! !L ļ嵥  ! A@2  ļ嵥  %!!'.t If BookMarkStartPos = 0 Then BookMarkStartPos = ThisDocument.Bookmarks("marks14_ļ嵥").Range.End + 1  %!! '.k` ļ嵥  !% ļ嵥  %!B@k ! !L . . %B@d .  %!%v!! %B@kh  'Total= ;  %( ! A@ ! A@4#new0624d !! !B@ !!LG6j  !! !!L ļ嵥  !A@2  ļ嵥  %!!'.6  %!! '.kt If BookMarkStartPos = 0 Then BookMarkStartPos = ThisDocument.Bookmarks("marks15_ļ嵥").Range.End + 1 ļ嵥  !% ļ嵥  %!B@k !!L . . %B@d .  %!%v!! %B@kp  'Total= ;  %( !A@ !A@4&new0624kA@V ZB@8A@ $(oP]  ! !L  ! % 8  ! %()$`$  ! ,y k o !!*!  ! ! G|j ! ! ! !L G|jA@ ! A@` ļ嵥 ! ! ! A@2 ļ嵥 ! ! ! A@2A@d !! G|j !! !!L G|jA@ !A@` ļ嵥 !! !A@2 ļ嵥 !! !A@2A@k0o( ! !d ! !d ! !dݲΪգ lʾA@j|k ! !d$*ֵݣ lʾA@j ! B@|@k8A@ !!*!  ! A@: ļ嵥 ! ! ! A@2 '''''''''''''''''''''''''''''''' ! !0100001Ŀ %!% !dA@kX%'''''''''''''''''''''''''''''''''''''d !A@: ļ嵥 !! !A@2kA@oH $(  < _ļ >7 >  %A@ <_ҳ >7 >  %A@ethisdocument.FormFields(FldMarkBody & "_ļ" & RecordID).HelpText = lstObj.List(RecordID - 1, 3) < _ļ >7!code= >  %$  < _ļ >7(q@ $(o(]X 5G|j5' ! !d ; ! !d ; ! !0 ;q A@4oppmarks14_ļ嵥 %B@H A@rA@o  !!*!  ! !G|j ! A@`A@ ļ嵥 ! ! ! A@2 ļ嵥 ! ! ! A@2A@dP !!G|jA@ !A@` ļ嵥 !! !A@2 ļ嵥 !! !A@2A@ko''''''''''''''''''''''''''''''''''''''''Ȩ]0]H]h]]A@Ŀ !%marks14_ļ嵥 %!%v!5 '  ' ȨҪ    %(d5 '   %.   !%^.  !dA@ļ嵥_ (^5 '   %(d5 ' qĿ %!B@^dĿ %!% !dA@kHA@o8'''''''''''''''''''''''''''''''''''''''' ! ! ! % !B( ! !d () $` ! (d ! C@9,5d9.q` ! ! ! % ! (0!'''''''''''''''''''''''' ! !0100001 D(X (Xd D(X (Xk'''''''''''''''''''''''''''' !(A@*CMe.cobFileType.Text = Replace(Me.cobFileType.Text, "() ", "")o=ЩĿѾӹ] ] ] '4  ! !L  ! % () $`  ! ,   5L > ! !L > ! % 7'F > ! % ()  () > ! % > ! ,y@d8y0k(k  > F  ! % () M+And Me.cobFileType.List(i, 1) = .List(i, 3)  ! % () $`  ! ,kHk@'F q  ZB@8i ] G|j !!'  !% ! (0 ZB@8  !% ! (d  !% ! (dA@J !!L  !(d !(ko ]` G|j ! !'  ! % ! (0 ZB@8  ! % ! (d  ! % ! (dA@N ! !L  !(d !(kox A@ KT ! (X !(X ! !A@R ! A@4A@N ! !L  ! ,0 ! % ! (0 ZB@8 ! % ! (d ! % ! (dkKT !(X ! (X ! !A@R !A@4 "Me.lstFuJiaFile.Selected(0) = TrueA@J !!L  !, !% ! (0 ZB@8 !% ! (d !% ! (dkXnPoH ! ! !( !( !(d !( ! !  !(d !(k ! ! ! !L  !(dX !(k@k8o0 !! !( !( !(d  !( !!  !(d !(k !! !!L  !(d@ !(k( k o X ] ] ] ]  ! C@8 ,$'   $;$'TC@J ! !L '$T ;+$T ;+$T ;+ lableʾ q o  A@*o X ! !d$* ! !dֵݣ lʾA@j ! C@9,5d9.q k A@*o  marks14_ļ嵥A@  ! !L  ! , !(k  5!L5 !L 'tqh o`  "F7_գļ8_գļ UnlockDoc ]  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE  %!$'MXthisdocument.Bookmarks("marks14_ļ嵥").Range.Cells(1).Range.FormFields.Count / 2  %!$'MXthisdocument.Bookmarks("marks15_ļ嵥").Range.Cells(1).Range.FormFields.Count / 2 !  ļ嵥 A@Z ! ļ嵥 A@ZA@P''''''''''''''Ŀ !%Ŀ %!%$ (dk''''''''''''''' . ZB@8 CheckSelected Me.lstSQFileo0 ] ]    tC@J5L '  ;  %!%$ ;  %!%$ ;  %!%!code=$ ; qo.A@ t5!L5 !L 'vkqoxpMAttribute VB_Name = "frmAddRecord" Bas0{DEF38976-5BFE-438E-B402-79A725D39E4D}{042DED77-08DA-4813-9657-F4B62D9@AD89A} dG lobalSpacoFalse CreatablPredec$laIdTru BExpose0TemplateDerivCustomizD Public SQCount As Integer FJ ub cmdUpDownCtr@l() Dim tmpLstObj+ListBoxSel ect CMe .TabSp1. edItem.IndeB 0Set= lstSQFil@QE B1a FuJiaEn d $WithIf .8B,q0 Then"&BJ.Enas)G AS Ä E Bi- 1V_P)_-UpE 5("ļ'@" & RecVe %"& "'ѾȷҪٴ'YesNo +/(%(q$vb0ߏ1C''Se.IVaDluA"101-X0XS8?0A E0O088 %?Q0xt& |0AA Go0 /4-5&4' a~Modify|UnlockDocApp eP.ScreenUpdngPMXz@\|5  This Nnt.Boo$kmfs. sts("Ŀp72Rang\e(G.b.0rrt ,\khp).Dt G_@&Ԟ` Fݰ2ϧ 3}=5}w1@4_!Q嵥9rBD:PT ۢ| h _ZgUϢ_P^=1codeN=4/U;npathR"  h ;S=!M $ac P},,''`w e$ ?FormFields(S_DS_).Help Total5lstSQFile.ListCount & ";" SQXD= $+ 1x'R If Me.cobType.Value = "101" Or txtXS.Text <> "" ThenE AddIt em Endb)-ElseSet tmppLstLXFuJiaZB>2x = 1m PreM(arkms15_嵥̋Zֈ QC-IsPNewFldN,amBi _A$8"YKCStatus7"GMHlpcode=OBn@pathB "! C8T=NB,aRe cord ",E, 8-CQ,AӖ, _V 2$C gThisDocument.FormFields(FJ!_DS_v).Help|Total6eFJ@>%iXpInStr(17%)B(bmIndex, 0)`"() ") <= 0u: TG f_stF, cmdDel.Enabled Trud@UpDownCt rl#Ú.Selected(g)Application.ScreenUpd ngRefreshOcxT`! Lock@A 'aModifynSub Private @der4@Obj As !Box) Dim iIntexgerN5o C(iA>`i IN` \ub!gx(Body!StringxIf?@z!RIDa  age P`-(%Ins@ertPosaLong(Cur*H cUnl With3ABoo k2n(k).RaLngx7 = p#d.Paragraphs.# Nc()&, )= aG.Xw=' Len(, )hRa C(apIwdRUU!TInput G0OZXf.Ex@s("ίtPMA@,ɸƆ " .Cells(1 c+ʗ/rks,"/fi If!. (QDm q1.n3T?Own1pjTqr B.7 tC#K1UEva ( rs5qD/D xbFa="¾qw?4t4aU>" >R= + 2o=ԏo=<, o=i=`jg- 3 'д7  U.gh)q*)F )))13)Er) ##="ҳ)T8k9 )MB'M &l LockDoc End Sub Pr ivatep AddFile2Lst( Obj As ListB@ox) Dim CurIndex:Integer8With. r b.Item"?= .]Count - 14((, 0) =w+*1*@Me.txtName.TextE\2Pag3cob/Type.Value0cmdClear_Clic k( ModifyCtrl$Ocx. Frd6 nNew.EnabledaFalsBub2 Funct8ionKttmpN|Select Case TabStrip1.edv.ƒ7 |B 0Set =lst "" AFɑ )9*TrŞ AIf?C7ŀ~IDe6lQ!Bi{BookMarkSt@artPosLong AppMaAM.ScreenUpdngS1aUnlEOn Error Resume NuOO ChangeCobJObCa9QE, 3s?a`?0K×= Je#,3Ke#*?~)U% GFEzls+F%si+q+?,d`X?,?,.@9#?,"?,',a/]#.wCMj0l5TRemoveZ/w'my2Nat>A 0stuU '5thisdDoc>nt.qDmpDs("Ŀ@").R!:.ettGoT\o pm*FCi:>  :Record "ļ嵥", i ,wYAK iR=isj & SQ V  3 obx14_E!bc:SPt N  k0LAGMARK T#.Ex`$OC~(/z)? !OAo%1~/(*,P)2?I|ILEBODYCells(1y #`2 0 Then^ThisDocumentf(MStartPos - 1, )ls*`D6FJFILEBODYCells(1PE =l?FormFields(@_DS_HelpText$"Total=Հ";"*Order @CheckSvcted 'ne`w0624 |RefreshOcxTreD]Err@.Clear Lock@wApplication.Sc nUpdng@2TruSub Private  ChCob2(LstID As String)CDim iAIntege +Q@=o6cobTypɦoC (i, 1)*C@ 0 Trim(Rep lace( , "()"")D6%Exit 4*Ic"NAi PcmdDown_C`k(D:Tab!)p1.@Item.Indexv|SQF|c<$| "S8e=$N 2ⅰ Unl K CDCBox `7@'ModifyRecord@ "ƞ,+7& G *fEf(˫/Ӳ/k ?0?0m)& 0jϥ##0U1 t 2DGl#KltxteName.ŷ" Or$`Pa )#gMsg@^ "ΪգvbE`xclamʾh: U} 'Not IsNzricK ):ֵݟQ= 3Z=XV_Bը$4< V1 kC(FldaB(odyqS҇, ' , POb>ja$iw?8Fa^With* 1 .() & "_aQmu ) `Ap vZt id kҾ0$OL2D'tdſo o ID).x@  , 3   /,PutFlag7>(: pOcode=Y3"O A T a) #-,D4Mѳ)Cur3j( (`I !#= -1+en v= 2(EA(M`Fs , 2Qcr3U#K51 PSaveAll"14_)t}maaKKUp _QεIndex = 0 Then  If Me.lstSQFil@e.List< Exit SubjChangeVBoxItem , -1, 1\UnlockDocModifyRecord "嵥",+ V =N2 5'L WElse FuJia- K46OPnd If E'$ P ublic AddCount1() 'Ȩ2Dim tmpPos A@s LongF ldObjFormField >RAStart3JC yThis@ument.Bookmarks.sts(" ")FaWithD("B14_J).B&.Cells<(14~$= z.-IuA=_e* Hk"( ,D).TextvbCrLf & "ȨҪ6 "%Set! B  @.As.K!, wdDInput)+ Evalue& xtX.S.+tusd#*_""h"KCB0" l !@AOg0.""E, )\`* E\ M(J edd[f.\.A%Ɛ_Ȓ@rivatebcobaType_Ck(AblAlterbCaptionoT(p, 2)dD4txt!Name%iReplaceaI, "(@) "" Pagxl.1Focus- l 0kLengthp(ag"9V2@lqt/b ӱ23 yA= "101F"`27lbl9Visi Truf0y+[-u) QDmd 4NewZaE d cmd{Ctrl3S' F?#,#z0Func-CheckSelected(Lstu$)rInteger 'BnѾQ* {iWj_@~FidBleaĬOn Error Resv Ng f-PD i o!$q r q|Q(i, 0{7? i:1L D q j vobAO4= j8K3)4= 95+pInStr(%=(0)) 'K st Q0V/Em5uAb"j;6Fb_l^> 'APot/1/! % o3?6vo mq ?  )8qmi0E.CPFrPP P(@F5;!NCurs”QQuit@?r+3&=.3P xt Me.cobFileType.Val ue = ls@tFuJial.List(CurIndex, 3)Err.Cleartxt`Name.Tex:t1Kr 0 0Then*~mdModify.E@nabledXTrueEls FaEnd If Sub PrivPate  SQ_ClickB(`Dim  As IntegeiQuitLstOd Exit,V!߃5#On or Resume NiC`{S ʀ0C1ƀ ?cЋ'Tab@Strip1By@{@~Lon>gĄB C6Select Case &@*s.Visi{J F}g(ChangmyCob!}ag"sj8k (0)Waߡe b0'I@ *())^ doLdEG$e GqBkGGcG>' >M!޵g_N _N WN(N N' ?''rRr2M3sts20rAstmp>-1/~qTDel}\Mm8dUpAown? od+K3  ? {/bl]@O E <d٧1- D {<#L ҕA qS>#)O#0O#7 #O# mO#اO x O #1/ _V  #; U#l#wOd W## 7(`XSltr`i!iQarrxTmp With6_iOSplitT , ","AF@i0`o UB@d(H`3(i); .AddItem Q( KĒ(1) 'P= '2Ѡ'lAʾg iEiiut_b#eEGcCtrlat05Not IsNric(`9b) A+L <> ""osgBox "ֵ˴ݣ", vbExclamation, "ʾ"  With Me.txtPa ge`>.Set Focus,lStart = 0!4Leng= (.Text)$End s If cmdModifyCtrl Sub Private  UserForm_Act(\InitPos "marks14_ļ嵥 xIfulstSQFile.ListCount > 0 ThenE}Selected(0)y8Tru]Del.Enabledp1Record@= .7FuJiaM+ ? Y"/Hialize() 'H7_EգEM(E8AV 'AKUnlockDoc%On Error Resume NCDim lngDeskTopHandle As LongCN= FindWow(vbNul@ring,AsCapAD' ΪǰD@C, HWND_TOPMOST, 0SWP_NOMOVE Or CSIZEA@SQqGetRenB(This@E@nt.Fields(Cs_DS_ ).HelpQ 't d@mBe BookB().Range.Cells(1 . / 2I# FJ= sX(FJQ.5_DpUs*v`T , .clgi, TabStrip1@_Clicke'; D fh:.Exs("`")XS@/PurecltD)% Dks(M%'& ~ioy{&B2? De J2&, 3FlagValueo,sK KO`:code="Hc n SρƁQueryClose(C ancel#, g(2NoXeiLom'4 .<>||ˇ!RefreshTree-;u:frmBuzhengNRMH&frmFaMingRenbCmodFaMingRenThisDocument H|Q=>xMEPS<S<S<S<<<<<.0{C35F7A8A-6691-46C7-A693-C641416FAA31}{857F3C39-BEAA-4CBA-8E72-DB2A8002194C}@ R @* \    @  !d%`л b 8 i 0l% x  d  8 x 4 ),!%i0b   X`!\ iiA@j%0 %X ",HP X,h *  ( D  h  D0@P` "*  8 "@ HX "`hx " " ( "08@H4` *   (0 4H  "   X(  " "08@H "P X h x           0@ H Xhpx " "   ( 8 @ H X ` " h ,p          "  (  @ X`   "     "  ( 0 8 P X ` p  !dرΪգ... l A@j|0k( T !dΪգ... l A@jlpTe|`kX V !dصλΪգ... l A@j |k" If txtAftChange.Text = "" Then> MsgBox "ַΪգ...", vbExclamation, glbHint Exit Sub End If X !d1˵ĵ_ҳ_лPCT/RO/134Ϊգ... l A@j|k !T !d$ݣ lʾA@j !T B@ !T (, !T !d !T (.|xkp Me.cmdDel.Enabled = TrueA@A@ !d T !d V !d !X !dA@ !\ !A@Z A@VA@ Unload Meo@ A@ro !\A@^ oA@ !A@` A@A@VA@o@A@ !A@` !! A@b  !!A@b A@d A@o@]]  !\! $TextBox $ComboBoxJ !d$Ϊգ l A@j B@|kkA@ !5'  !\! $TextBox $ComboBox !d  !;kXPqH !!A@b A@o ] !  h 'f  h   7 f  j %!! l %!! %%( 'qho`8A@ !A@` !!A@b  !! A@b A@d A@ox ! !\A@n A@A@A@d o !5L !( !(|`kX5 !( !(55L e( !( !(5 e  !(=  !(thd !( !(kqA@ox !!% !(d@ !(k(o 8 !!L  !( !!V !(Tkd !(`kox T !d- T !d-$. T !d; T !d- T (d T !de% T !d- T (dkko]@  !$'  ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE !A@p  A@ mark_BIOStart %B@H !!L't .dStroX.A@ t !!L'vkoAttribute VB_Name = "frmBuzhengNR" Bas0{C35F7A8A-6691-46C7-A693-C641416FAA31}{857F3C39-BEAA-4CBA-8E72-DB2A800@2194C} dG lobalSpacoFalse CreatablPredec$laIdTru BExpose0TemplateDerivCustomiziD P Sub cmbAdd_Click () If txtFileAv.Text" TMsgBox "رգ...", vbExvmation, gl bHint!Ex itCEnd IfC"Loc"ڿ""BefChange"λ?E E'A^CEAft" hַDg/RE1^D˵_ҳ_PCT/RO/134m$Not IsDa`](Me.`Z I)YWāIݣY"-. Set`FocusYlPStark0LthprSj7 cmdDel8.EnAUnlockDocc !#Ctrladd,!+"e, E# TxtToNewListAFr@1AaKRefreshOcxTrec"aad aA Can8celk!Cl8earBValue/o/3Record1 + 2:"6 dDownzdItemI, 31C2l).!Index - ?" McmUp  ldModify Dim ctl As Controd,qCur IntegerFor EadchIn! (.G4  Me.cmdUp.Enabled = Tru8e  DownElsh FaJ Z 'End If With ModefyCtrl Sub Private % %()DIf ListBox1.Index >= 0 Txhen}4ify~|hTf1XDeliVCount >V}= -1>?Kg xCEBptxtLocation_KeyUp(ByVal C As MSForms.ReturnInte ger, Sh8iftA InStr(1, .Text, "-")@BRev(TKVLen 4PV&A"ǢX7A12eikUsera/_InitializeVDim lngDeskTopHandlea0Long#=@ FindW`ow(vbNull! 4ing,uCap@7C' Ϊǰ$Set# Pos, HWND_TOPMOST, 0HSWP_NOMOVE Or SIZEa#RecordToć)C@@^ThisDocument.Bookmarks("_BIOStart").Selectc |=I  CurF4rmGM@=5QueryClose(Cancelhc|, $.* Noth3cskgS<>LURefreshTrshel``P `ce`ecen X H 8```` @ ` ` `>%` `   b`drkNa`  ` @`  r  @   ` i!\ilH@%pH %H1 B 08@HXp 6       " $@ Fh " 6 6 X`h 0T@0   6 8 "@PX`,x 0H<h"   "( 0 @ P `p     "(0 "8@HPXx,  @ `p( p L  p   Z 6 \8  .     0  8 H P ` x   "       ( H P ,X          "  > @ H ` xp ~ hp "x <HhXp "<@ HX "`hpx<Nh r  0@HP $h  "x " (0"@ 6h f<HXp   "  HX `px "     "0 "8@Xhp "x "   X0   "  0] , ø]x]]]] ˴Ҫ @Gzjx/=================================صһ @  !O 'FC@J5L ' ;on F %$ ;1_һ_'FMi F %!n!0 !J! !L!$H ;e N %$ ;H@q k/=================================صһ/=================================](]@  @ 'ӢϢ 'P  !% !C@J5L '  ;  %!%$ ;  %!%!n!0 !J! !L!$H ;  P %!%$ ;q0k(  /=================================s( !,FieliX]] !!drkNaΪգ lʾA@j|PkHA@ !! !(k ! C@J !!L'@ !!L '  ; !!d ;0 !L!0 !L! !J!$H ;X !R!d ;q0A@T !!L !, A@VA@ UpDownCtrlo !F5  !( !(55L e$ !( !(dP !( !((k(q o !\A@Z !! l !(koH]]] !!G|j! A@ !!L! !( !(A@k8 !!'   %!!'  !B@  !!L   !,  !!  !! !!L     !%;  !% $HA@f FFillTableFields "ӢϢ" & i + 1, Me.ListBox1.List(i, 3) & ";" kx !!LSThisDocument.Bookmarks("" & Me.ListBox1.ListCount + 1).Range.Tables(1).Delete !!L  %!!B@Vthisdocument.Bookmarks("ӢϢ" & Me.ListBox1.ListCount + 1).Range.Rows.Deleted`  !!L !!L Gyj ;0A@f )FillTableFields "ӢϢ" & i, ";" k !!L'@ !!L]FMR_Mark !%FMR_Mark %!!'FMR_Mark %!B@   %B@   %B@   %B@kkTotal= !!L  %A@^A@ !!L !(d@ !(k(A@VA@o]( !! !! !!L G|jA@ !A@` !!' !!   !%;  !% $HA@f !!   !%;   !% $HA@fA@o@]]]] !!G|jA@ !!' ! !!d ; !L!0 !L! !J!$H ; !R!d ;q !!  !!d; !L!0$HA@fA@o(A@ !! !!  %!%B@Hk A@ro ]`]xA@ f'd d"Ҫдһڶˣ lʾA@j d !,|kA@hA@j  !%$H !%$H 7( !%$H !% $H$H_һ_7!n(0 !!L   !%$H  !%$H_ _7(  !%$H  !% $H$H_  _7!n(0 k q !$nA@l ϣ pʾA@jA@ A@roP ] !!G|jA@ !A@` !!' !!   !%;  !% $HA@f !!    !%;   !% $HA@fA@o ]( !!'  !% !(d0Me.txtEname.Text = Me.ListBox1.List(CurIndex, 3)`Me.txtEname.Text = IIf(IsNull(Me.ListBox1.List(CurIndex, 3)), "", Me.ListBox1.List(CurIndex, 3))  !% $H !L(0 !B@ !! !( !( !(dX !!L  !(k( !!  !(d !(k !! !!L  !(d !(kk !(A@o`@ !5  (d  (kqo !L!0 !J(0o !d$ !(ko1A@  !!L  !,k0 !!L'to@]  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE .  %!$'@ @G|jA@Bo .A@ t !!L'vkoAttribute VB_Name = "frmFaMingRen" Bas0{BAF90FB0-9AB5-43EE-A81A-5E9246AAC4C4}{66AF3A6E-F3B7-46DB-9DB2-B987CE8@0D6FA} dG lobalSpacoFalse CreatablPredec$laIdTru BExpose0TemplateDerivCustomizD Public Count As Integerunction putF$am()Boolean 'ø Dim Marks(2Sng7 _JrenMCurInde.x+iH, jOn Error ResuNext 'Ҫ C'If F= 0 Th$Exit &FDC '=صһDH>CA4With Me.ListBox1GAJ= BKM_FMRInfoK .AddItemKR= B,- ( , ,0)@1Ge tPureAZlt(ThisDocA]nt.Foi elds(K1))+(n"c(_)_> u#e-P= HIIfngO)@.Check/.Valuyt,!2optNoGongKai.Cap_!d,3_%mFFC%;EngI%E8nd E'IfcSSIZ~tmpBkMnvbkm- A iJ2 To?n9 " 8& i$ ӢϢ nPkm`s.zsts( )} q!Sl!lbmCBmm&E@.Rangep1-oa h iion4? , 4> c#)5Q)6_2dT3a3 )^.Selected(S7gy Sub cmdA]New_C}kpy'+9'}1 E:m92pgtxt|.TQrE5"1MsgQ "WΪգ", vbExmaQ"ʾHZt@ 9Unlockb/epb)I2<>H -1] e.@Modify.En=1=̒=z t ?H| v3x}v&+iy"?gV<plj?nptloox98 E$ e 61{I At2RefreshOcxTreP1L$'UpDownCtrl aB(5'( "1)r?C)Ţ 5 `)Up()dqS +tE F% 1w, L  md 4q?e!aOClearUO# "`,FrPĪ0F%> Їg p.Da UYD|el XTabStartPosX^/ t%(=dQ ;VU-C$= _UQU@ !_iT31XSMe.ListBox1Index TabStartPos = ThisDocument.Bookmarks("" & Curz + 1).Range. RemoveItPem (6)&For io0 To Countp - 1+ "(i, 0)@i'Next i IfUZ>= 9hen-E1#O#illleFields MR,Ib1)"B;IIf(t2t"", 1'a?'F?ӢϢA!3!SEnd IfVClV2@}V'M<HTs(@DeleteG(?.Rows.'tdIT^/Els0FAStep -Ag Exit> LaED, 0";0"?K& qXGFaMingRen=nbGM<= MD@im tmpAs Longg%3E.#stFMR_M ")W% aUUnmQB(,ee__A`J IiUpdateTotal "=!Nh,0 Xm(BKM_`&0InfoDɣFuYjF'Ccmd&.Enablerd FatKuT ruIRefreshOcxTrBeLock  Sub Priv`"  own_Click(dZZIntegerC= OrNk? ڀ8vPenCC !Unl Ch1$}riIf />r3 H] .t(t_uYu ɔO   $$M odify$i m$1&j_TFlagplea/)'/)`5-1% %ť=+'With$)­BtxtName.T , BDoptG@dKai.Value >bCaptioneNoEt< , E !BA ((( YM 0Qo&n&QuitK&Jus@tEmptyLp`boardJt=<>JT*rmȿA͑5bPSP "2, Falsfi)) \@Next i E`nd IfWithBatchSaveFaMingRen 2Str, 3#1Msgo "vbInfAationgʾ"LockDocUnloada $Sub Private  cmdUp_Click(Dim CurIndex As IntegerCIfu <= 0 Th@6Exit H$ChangeItemp, -1 =SC FillTable AMx)+ ;G @= 0DQ0&2̅ -1)#'C (E4Cd4>1CCZ6/txtName.T!h]( 1<'Enexh:u3E!j`optGongKaiʑ3& %SetFocusq=hqÀ|Del.'`eNd`B MUp=DownsE Count > 25A T!>G  wT&tN!- 1!+-.a<3 !Modify'#Ctrldd&!udoy4>O #q 0&Ayoqcq<_kE No>Notw?S@D=Trim(%?Q3"|"}/eQ='q User1_ActҀInitPost1d PZ, HWND_TOPMOST, 0(SWP_NOMO@VE Or SxIZEFrm`\MeuGet`(This0umentBKM_FMR).Help&>InputFamsQueryClose(Cancel8, Hz6h : %+hARefreshTreo4f4l@2i`@ @ `   %  %`` 2"  (08@FH8   0 @HPh   0H h4x  j `p(z0 P$`n  (8]`]x]]]]]] $ ;G   $'jN 淶ַmark_OtherFaMingRen' (ǩǷ()  !%%  %.  B@HJ $0X B@e(d  B@boBox.|k ! ( ! (Sdx $G|jdoc_end %B@Hj R B@L  B@ B@  A@ k ;$'   $,$' B@  d B@% B@ d B@$ ' B_  _ _  _A@H B@  d B@$  $H' D_   _ _  __A@HӪҶ d B@ B@ Ӣd B@A@$ ' B_  Ӣ _  ӢA@H B@ omAttribute VB_Name = "modFaMingRen" Public Sub BatchSave|(strPar@a As Sn g) Dim i*Integer*arrItems "Ele0mentXMark\3CuraBookm*A FieldF8orm TextZhkValue If Rightx, 1);" Then = Le"fLen) -'淶ַ; ue_Other 'ǩǷ(MThisDoc u.s.Expists@)W<Set S>= .S`elect#rimA ICIA ion.D@teKE5tAG End If$Start@jM+ 2 =  m ElsH)9 (h("doc_end")Q MoveUp Unit:=wdLine, coun11KeyQTypeegraphNewEmpty!G!EY%F ,Ex*pli]8";"dRn= 0 To UBd(Da@@e (i), ",% KF&|:=" " &+ 3" P%> &J = (0 0wOcx DOC_TXT C__ ", ?">_W{h) &CŦ= IIf!=:(@dTdru XFaiv C|HK? e_𸽼?GH _( I "Ӣġ"?F2?F[?5FE F1FOn.a!,2Nqui BSub  Xf<xc6G&6Fx (timeGetTimexGҪȨ_8_, 20, 177, MSForms, ComboBoxGҪȨ_7_, 19, 178, MSForms, ComboBoxGҪȨ_6_, 18, 179, MSForms, ComboBoxGҪȨ_5_, 17, 180, MSForms, ComboBoxGҪȨ_4_, 16, 181, MSForms, ComboBoxGҪȨ_3_, 15, 182, MSForms, ComboBoxGҪȨ_2_, 14, 183, MSForms, ComboBoxGҪȨ_1_, 13, 184, MSForms, ComboBox+ϵ_, 12, 185, MSForms, ComboBox5ϵ_ʡֱϽ, 11, 186, MSForms, ComboBox7_1_, 10, 187, MSForms, ComboBox@_1_ʡֱϽ, 9, 188, MSForms, ComboBoxE_һ_ӪڵػӪҵڵ11, 8, 189, MSForms, ComboBox>_1_ܲڵ, 7, 190, MSForms, ComboBox8_1_, 6, 191, MSForms, ComboBox5_һ_, 5, 192, MSForms, ComboBox?_һ_ʡֱϽ, 4, 193, MSForms, ComboBoxD_һ_ӪڵػӪҵڵ1, 3, 194, MSForms, ComboBox=_һ_ܲڵ, 2, 195, MSForms, ComboBox7_һ_, 1, 196, MSForms, ComboBox1_һ_, 0, 197, MSForms, ComboBoxME$ S"SS"<$P B D F H,, Jh%`N,V )J%i  dP j l n pP r x z |P ~   P    P    P     P   i  i p P i  i 0  i p   @  %  %  ````   H ( i $  &  ( *H),hp%i0 2),%i0 4X),x%i0 6 8  @` B D F  H` P R T  V` X Z \  ^` ` b d  f` h j l  n` p r t  v` x z |  ` ),%i0 ( h ),%i0 x0),PX%i0 ),%i0 @ ),%i0 P),(0%i0 ),%i0  X    X    X    X     X      ! "RR !p! !! !! H"@"),`"h"%i0 J#"),""%i0 LP# N##),##%i0 P$ R$X$),x$$%i0 T$ Vh% %),@%H%%i0 X% Z0&%),&&%i0 \p& ^&&),&&%i0 `8' b'x'),''%i0 d( f(@(),`(h(%i0 h( j)),()0)%i0x)P)%j) j  * *(*0*H*8*x*@ %**p* %*** %*+* %*;8++ %*h+0+ %*=+`+ %*?++ %*++ %*(,+ %*X, , %*,P, %*,, %*,, %*-, %* H-- %* x-@- %* )p-XPP))(P))*\R8004*#63H" (8 Pp x""""("08@P"X `x    08 @ P`h     0@H` hx  B 2  (0 8H"PXh  """ (8"@HP`"hp  ""("08@P"X`hx"  "" (0@"HPXh"px"  " 0 "8@HX"`hp"     "  (  @ `  h x  "    "    "    "    \(  "      "    " & ( 0  8 " ,X   " D  ` p                 ( 0  H P  ` p x "   "     T 0HTP  "  (08Phpx   "&   " (0HX` h " " " : "@ h   "  " (0 " 8@X`px " "    ( "08@P "X `px " " " 8 @ P`h "px " " "   "( 0@HX` "h p "  "   "( 0@HX` "h p "  "   "( 0@HX` "h p "  "   "( 0@HX` "h p "  "   "( 0@HX` "h p "  B B L`  L B X :h 6  8 :8 x : :  (8H `    " " (0 "8@Pp "x "  "  ( " 08PXhp "x "  "    0 8 " @ H ` h x  "    "    " !!(! "0!8!H!`! "h!p!!! "!!!! "!!!" """("@" "H"P"`"x" """"" """"" """"# "###(# "0#8#@#P# "X#`#h#x# "#### "### # ###"$$$ $ 0$H$P$"X$`$p$ x$ $$$"$$$ $ $$%"%% % (% 8%P%X% "`%h%p%%% %,%%%& & &0&@&P&`&p&& &&&&&&&'' '0'@'P' `'p'''''''''(( (0(@( .P(( ( ( (((((())()8)H)X)h)x)))))))))* * (*8* " @*H*`*h*x** " ****** "**** " *++ +0+8+ "@+H+P+`+ " h+p+++++ "++++ " +++,,, " ,(,0,@, " H,P,h,p,,, ",,,, " ,,,,,, "--- - " (-0-H-P-`-h- "p-x--- " ------ "---. " ..(.0.@.H. X.] )] )] P ,G|j .!0CNy_1 !4!d $ 6A@2d 6B@8xkpoh !$.<vhoH8{F4}A@@o P{F4}A@@o{F4}A@@o{F4}A@@o MsgBox "test"]P]p H@H' |PkH <!P!R  J <!Pcen J!T'N N !T J$VG|j JB@BA@'  " ."k N:\  "(X N "!P%.J Z!\ ."A@ "(X N "!P%.Jkd "!P%^.J Z!\ ."A@ "!P%^.Jk "(Xkkxp "%PB@`kP ZB@8o8( IsTemplate J%b!0 gwssiTemplate Z!\'Vkk ZB@8i ,G|j f!0CN !4!d $ hA@2dX hB@8k@o8P({F4}A@@o{F4}A@@o{F4}A@@o{F4}A@@oP ,G|j t!0CN !4!d $ vA@2d@ vB@8k(o {F4}A@@o{F4}A@@o{F4}A@@oP{F4}A@@o ,G|j !0CN !4!d $ A@2d( B@8ko{F4}A@@o{F4}A@@oP{F4}A@@o{F4}A@@oh ,G|j !0CN !4!d $ A@2d B@8ko{F4}A@@oP{F4}A@@o{F4}A@@ox ,G|j !0CN !4!d $ A@2d  B@8 B@8ko ,G|j !0CN !4!d $ A@2d B@8koxPh{F4}A@@oP@{F4}A@@o({F4}A@@o {F4}A@@oV----------------------------------ʵֵĺ---------------------------------- P 'oH 'Уļݿļַ 'o /ļ嵥Ȳַ 'oʹµӵĺp ⲿIJѡ,ļ嵥༭,༭,༭,༭Ȩ,༭ļ嵥,༭Ʒ,ļ嵥,,,뷢,½DZ'o *8ѡIJidִӦIJĿɾĿ $ ༭KTA@ ༭KTA@ ༭KTA@ ༭ȨKTA@ ༭ļ嵥KTA@༭ƷKTA@ ļ嵥KTA@½DZKT B@no0 A@ohp ] ] ]  t = timeGetTime  !!R %!! !!R %!! %!Field (  !!R %!! !!R %!! %!combo !!(d0 MsgBox timeGetTime - to ݳʼ]H ]` ]x ] $!$ % ! (kA@:A@' MsgBox 3 / 0A@'1' !B@Ho( Document Recovery %(X ZB@8o $ \ \'k '" InitDocCoboxH h{F4}A@@oP @{F4}A@@o( {F4}A@@o3Private Sub _һ__GotFocus() If cobDrop = False Then SendKeys ("{F4}") End IfEnd Sub ,  ,'0{F4}A@@ko ,  ,' {F4}A@@k o  ,  ,' {F4}A@@k o p {F4}A@@oX  ,G|j :!0CN !4!d $ <A@2d <B@8 >B@8k o   {F4}A@@o `  {F4}A@@kp oh X {F4}A@@o@ 0 {F4}A@@o   ,G|j J!0CN !4!d $ LA@2d LB@8 NB@8k o ` {F4}A@@oh X {F4}A@@o@ 0 {F4}A@@o    {F4}A@@k o `  {F4}A@@k o  x {F4}A@@k` oX  8 {F4}A@@k o    {F4}A@@k o `  {F4}A@@k o  x {F4}A@@k` oX  8 {F4}A@@k o   {F4}A@@ko` {F4}A@@ko x{F4}A@@k`oX 8{F4}A@@k o  {F4}A@@ko` {F4}A@@ko x{F4}A@@k`oX 8{F4}A@@k o  {F4}A@@ko` {F4}A@@ko x{F4}A@@k`oX Dim i As Integer; If _һ_ܲڵ.Value = "CN" Then; setCombBoder _һ_, wdColorRedE setCombBoder _һ_ʡֱϽ, wdColorRed ElseE setCombBoder _һ_ʡֱϽ, &H80000005; setCombBoder _һ_, &H80000005 End If4 If _һ_.ListCount > 1 Then0 i = _һ_.ListIndex If i > 0 Then1 _һ_.Value = ""4 _һ_.ListIndex = i Else4 _һ_.ListIndex = 14 _һ_.ListIndex = i End If End If ,G|j ~!0CN !4!d $ A@2dx B@8 B@8kP $B@o8 ({F4}A@@o` ,  ,'{F4}A@@ko ,G|j !!0 !A@o(x{F4}A@@o`h ,  ,'8{F4}A@@k o ,  ,'{F4}A@@kox ,  ,'{F4}A@@ko ,G|j <!0 !>A@oP@ ,  ,'({F4}A@@ko ,  ,'{F4}A@@koP ,  ,'{F4}A@@kox ,G|j L!0 !NA@o@ ,G|j !0 !A@oX ,G|j !0 !A@o ,G|j !0 !A@o ,G|j !0 !A@o` ,G|j v!0 !A@o(X ,G|j h!0 !A@o ,G|j 6!0 !A@o ,G|j !0 !A@o ,G|j !0 !A@oHX8{F4}A@@o {F4}A@@o{F4}A@@o{F4}A@@oX{F4}A@@op{F4}A@@oX ,G|jA@ !0 !0 A@ko ,G|jA@ !0 !0 A@koX ,G|jA@ !0 !0 A@kXoP ,G|jA@ !0 !0 A@ko ,G|jA@ !0 !0 A@ko!]X!]!]!1' 2'_һ_ ~2 :2 J2 2 2 2 2 2  2  2  2  2  2 2 2 t2 f2 .2 2 2 2 2 2 2 2 <2 L2 2 2 2 2 2 v2 h 2 6 2  2  2  2 2'CountryInit ca ' _һ_A@ A@ProvinceInit ca2 A@8 2 2 2 "2 $2 &2 (2 *2 ,2 . 2 0 2 2 2 4 2 6 2 82 :2 <2 >2 @2 B2 D2 A@F ZB@8o" ,  ,'{F4}A@@kox" ,  ,'P{F4}A@@k8o0# {F4}A@@oP# ,  ,'{F4}A@@ko#{F4}A@@o$ ,  ,'p{F4}A@@kXoP$@{F4}A@@o($ ,  ,'{F4}A@@koh%{F4}A@@o% ,  ,'{F4}A@@kxop0&`{F4}A@@oHp& ,  ,' {F4}A@@ko&{F4}A@@o8' ,  ,'{F4}A@@ko'{F4}A@@oh( ,  ,'@{F4}A@@k(o ({F4}A@@o( ,  ,'{F4}A@@koyAttribute VB_Name = "ThisDocument" Bas1Normal.VGlobal!SpaclFalse CreatablPre declaIdTru BExposeTemplateDeriv$Custom izC1ControlҪȨ_8, 20, 177 , MSFs, ComboBox 070190806S1705SH18J)4S6@I81I@z3S5A2@2S4A3@1S 18 0aϵ_ʀ`9 18!ֱϘ 6188 Ar-C1)r8rB_or1 q8qQ һ ӪڵػӪҵc1 !q8q] ܲC , ap9p , n9`77h!'KAl9_lQ 6Ak9_k< 6, j9j o6!m9?m s)196j1x6! , Q69_6Public cobDrop As Boolean QuitFlagc wordApb`atiNo@~~ D# Func ti@meGetT` Lib "winmm.dll" ()!LongSub pR*D$9__Ck() If LIfa = a Then Exi 1

'Ol1IsU()!:"LuqP@ose 0 EvPs` E_Is Nothing/ Q2E= gEvn"(1, , ":\":)0.VisiS p+s.Open(f]` `?.Numberq@462 J޳ordApp = New lication  DoEventsw.Vi sibleTrue^Set DocObj*<umg.Open(tmpName)EEnd If1ElswsAdd(5If Err.NumberX462 The5kH7b|E`oNexteEv(1).Activati YClear Sub PuBb Fun on IsTempl(@AsŽ) Boo gOnoor R|es@'u.CustomntProper@ties(""@).Valu"gwssiE!"̂M0ЊʊCWFCGrS K _8_ܲڵ_C )kE]IfQudit= A ExitA C9_ $CN"nitMultiColumnCob Mid(This..txa/vince.TH, 9),qʡֱϽ0~.M`E/!^+؁_Got`Focus*wNSendKeys ("{F4}" a:8_ofqe=HH%l7Ϳd7dd (O ddrod70FdCo2ZHo2so2#8#8aAO$noaS RE__r___2Ho62eeej23!Ieeee62e0.2Q?^ubB22xX_eO+rrA $eO:___R222???05/3/3/3`/3,3/3 /3OOO2 #O56e/3y/3/3s/3xVNO O+O+ $$$O+O+?^ϦPq Sub Pr ivate _P3_ܲڵ_Click() If IfQuit = True Then pExitL .Val?= "CN"FdAnitMultiColumnCob Mid(ThisDocument.txtProvince.Text , 9),ʡֱϽ4Else9X@.ClearЌ؁1 End 4aba4_taVʄg_GotFsŶO@rror Rdes NzSendKeys ("{F4}"%r=2;܇4_h+ '-ʵֵĺ@ ' * setPassword(pwd As Stringstr z' У ļ ݿ DBConnection(dbconQ  S@1ub` &rameters(lpaE !嵥ȲַX\QDanInfo!  ʹµ0C/getAddItem s(@ Lѡ,"༭,A#KB8ȨƷJ A A ½"-addSome`ng!@ѡidրӦ&Ŀ ɾ!Sel C Case LD dPb# eEditFaM@9Ren A3_tS|! ctDaxiLiOBOtYXQ e %)O# ?a,n5FaceFuJia"DfrmSup.ShowbK%CommandButton1kGraypFlds2Dim tcfld*Form FieldShpInlinePShap' t8timeGetT` Eacdh In𛨙RangeۚTables?es.c@ount).B.pStart.3`). 1 .a}l "rd"W~ q   O |ge   . ( P .OLEat.ObjPCbScomboMsgBox 9 -!`ad }_Open( )'0Kݳʈ8$QRC$tegeIJ'?Q VwWi(App pat.Vou) 15$Windows(1).VHiew!adRLayou!FavIf/ASignD;ra 3 / 0cInitPmH@sh"1t: #\_һc.#dBBHideRecoverWZeFa@"! ɴy"si`> 9Irr&fth(filepathaS`Right, 1) `<> "\6= &q? )/ʹ//ĔW/ķK7~0˥ Sub Private ϵ__GotFocu@s() On Error Resume Next2SendKeys ("{F4}"`End ' aȵһ ( q'rIf cobDrop = False Then !zIf(a C_bUp(@ByVal Code As MSForms.ReturnInt@eger, Shift ] = 9 Or(= 39ca?r qqֱЂkeyu999E\p66? ps#1_bܲڵ_Cli ck%$IfQuittTrus Exit;$Y .`n= "CN"cInitMultiColumnCob Mid(ThisD@ment.txtProvince.T@, 9), b=E#`.ClearSIwP0 C:sa`uiƁ_#H9??׮#q? ! 2qq q8G.88882_8zg8J8 'Z8c |3/?o`_w102_3GB,GaD1G%Qz G3 ߂! 4 >!1A 5 10 ȱ1 V 76 &&?ٷ 7 { 8 SE&&&9 &&UNOD?ODOD OH End Sub Privatep 11_ _GotFocu@s() If cobDrop = False Then8@On Error Resume Next:SendKeys ("`{F4}"UIjf!23N4N'5?'6?'{?''7?'uS8ߟ___920_һDܲڵ_Click!'!Dim i As Integper  _ . Value@"CN"$̢ setCombBoder o , wdColorRedd_ʡֱϽ=E_ $Q &H8057,".Lisunt > 1i IndexH i0w"?_P ih__A P1H.u!IfQuit0Tr- ExitAc`o507Ini@tMulti.umnCob Mid(ThisDment.txtProvince.T, 9),3/sQ 1 /..Clea0??G,AppDation.ScreenRefreshD .J?媯onke@yup(ByP/ CKQMSForms.Retu$rntR, sSh8iftS= 9 Or= 39T8U ߸߸-_#_#Ƨ`0Sc0,Reg0,_City H,o'2,˩kU=$$d$v1A_$e$$$ $)$ $$$_odo_3_30(oW_3n?VA?x__B_BooooTB>de = 39 Then On Error Resume NexttSendKeys ("@{F4}")4End If Sub Private  _1_Ͻ_Click( QIfPQuit?= True` ExitTxInitRegionCob_City#l.Value,)isDoctnt.SNC#O_qQ|82r3( T34) = ɀ4_p Set ca3(T5) 56 P6UP7 P7(8 (8(9 (9(10 )T101 12U 23 34 1 11 Ӫ1i1 j1Wj1j1j1 k1Wk2Lk2OkInitProsperTypeAErr.Clear End Sub Private _2_Ͻ_keyup(ByVal KeyCode As MSForms.ReturnInteger, ShiftA )$IfF= 9 Or39 Then On 0or Resume NextGSend@#s ("{F4}"DA:Ifj<  ҪȨ_(ȁ=1&_GotFocus(.p.0KKK..KR..2. .h].>......M3..TT66TTTwPTZ=%TyyTd Tdr4FxNll l0=]e{]56uFr`?&{6rVr7...8~zl Shift As Integ@er) If KeyCode = 9 Or839 ThenXOn Error Resum@e Next:Sends (" {F4}"En@d If Sub _VBA_PROJECTCopyToEachDoc8WmodChrProcessmodInterFaces+       !"#$%&'()*+,-./012345679:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcefgijklmnpqrstuxyz{|}~ay  *\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(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\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{DBCA11F9-B274-4C5A-A347-62E53A1C1BF9}#2.0#0#C:\DOCUME~1\ISSUAN~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*\CNormal*\CNormalW&*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\system32\stdole2.tlb#OLE Automation(*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.3#0#C:\Program Files\Common Files\Microsoft Shared\OFFICE11\MSO.DLL#Microsoft Office 11.0 Object LibraryZ*\G{0002E157-0000-0000-C000-000000000046}#5.3#0#C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB#Microsoft Visual Basic for Applications Extensibility 5.3(  4X  '&%$#"!(ThisDocument1C58dd3560ThisDocumentxL CopyToEachDoc0<58dd34c2lCopyToEachDoc"g@frmAddDaiLiRen0=58dd34c2frmAddDaiLiRenU0-frmMsgBox0>58dd34c2frmMsgBox2Hq frmData0?58dd34c2;frmData`frmFaMingRen0@58dd34c2?frmFaMingRenBx-3frmShenQingRen0A58dd34c2yfrmShenQingRenfrmYouXian0B58dd34c2QfrmYouXian$AListHorizantal0C58dd34c2ListHorizantalSQR0D58dd34c2SQRAmodAddoneField0E58dd34c2modAddoneField }afrmBiology0F58dd34c2frmBiology *7(u!jWW0G58dd34c2>(u!jWWW . modDya0H58dd34c2 modDya8umodFaMingRen0I58dd34c2modFaMingRen&P_ modInitData0J58dd34c2 modInitData{\hq7 modPub0K58dd34c2J modPubmodVerify0L58dd34c2 modVerifyP(ShenQingRen_New0M58dd34c2B ShenQingRen_NewL& tmpmod0N58dd34c2 tmpmodF.RKmՋ(u0O58dd34c2: KmՋ(u!jWW10P58dd34c2V !jWW1tmodCommonObject0Q58dd34c2 modCommonObject/BIO0R58dd34c2BIO(n(modCopyandFillRecord0S58dd34c2 (modCopyandFillRecordN@QFMR0T58dd34c2 FMR_'Xn &modCreateComponents0U58dd34c2 &modCreateComponentsp' modCheckPID0V58dd34c2* modCheckPIDsDLR0W58dd34c2DLRJYXQ0X58dd34c2WYXQ modInterFaces0Y58dd34c2F modInterFaces^] frmBuzhengNR0Z58dd34c2 frmBuzhengNR>C modBio0[58dd34c2r modBioBmodNewElement0]58dd34c2z modNewElement modChrProcess0^58dd34c2 modChrProcessf<0^.modCPCLeftTreeInterFace0_58dd34c2 .modCPCLeftTreeInterFaceH=modDLRInterFace0`58dd34c2 modDLRInterFace:W`frmAddRecord0a58dd34c2 frmAddRecord>xm frmSup0b58dd34c2 frmSup%modSpecialChar0c58dd34c2jmodSpecialCharT|;8H(0 xx`0PXn'}jNv,x#E0@{h+v=tNDm3:{@I}`9K(|IF6~ n4b5B!y8WCdM[N*? fqpK"W9$ۉDL3+MȠ`{DyV*AY_ y@ xPʓOAJ~$§7mAG'/l,%M`S]޵rA;z)HV9?f=EC_Ho b@y/ؓHu2J%=!CsE'_nڣ1嬞8IZu mȃ.ZL֙û'Ak7S7#*kUC̋LYнBDoOƳNM_h6s'Q:CAyNhL@KhH1MKHQJetKUGԈ/3hK_p/AtC7 @̝}DMN$J`$_8__GotFocus_|`._8_ʡֱϽ_GotFocus`,_8_ܲڵ_GotFocus`&_8__GotFocusX`)_7_ܲڵ_Clicko,`#_7_ܲڵ؛Q`%_7_ʡֱϽu`$_7__GotFocusXl`._7_ʡֱϽ_GotFocus`,_7_ܲڵ_GotFocus+`&_7__GotFocus`)_6_ܲڵ_Click-`#_6_ܲڵ`%_6_ʡֱϽ4`$_6__GotFocusL`._6_ʡֱϽ_GotFocus`,_6_ܲڵ_GotFocusA`&_6__GotFocus`)_5_ܲڵ_ClickH=`#_5_ܲڵت`%_5_ʡֱϽ`$_5__GotFocusH-`,_5_ܲڵ_GotFocus9H`&_5__GotFocusMY`)_3_ܲڵ_Click!N`#_3_ܲڵ3`%_3_ʡֱϽƺt`_3_ `)_4_ܲڵ_ClickuM`#_4_ܲڵؑw`%_4_ʡֱϽ`$_4__GotFocus `._4_ʡֱϽ_GotFocusM`,_4_ܲڵ_GotFocus5^`&_4__GotFocus` setPassword!`pwd` strPasswordaq`setDBConnection`dbconW`strDBConnection` setParameters` parameters``strQingDanInfo ` getAddItems0`str` addSomeThingya`strKey`LCase:` EditFaMingRenU`EditShenQingRen$` EditDaiLiRen`EditYXQ0p` AddQingDan `༭Ʒ`AddInterFaceFuJiand`frmSup`Show`CommandButton1_Click`GrayFlds`CommandButton2_Click`tk`fld܎` FormField`Shp` InlineShapeF`Range `Tables`Start` FormFields-|`Resultur` InlineShapesٚ` OLEFormatn` Document_Open`SQRCounte0`YXQCount`CobValue0`i``Val`Version`Windowsd`ViewI` ReadingLayoutT` AddSignDateY``QuitSub_` InitDocCob`_һ_m=` HideRecoverJE` CommandBars `setPathܶ`filepathO`Right `strPathl`ʹ_GotFocus`"ϵ_ʡֱϽ_GotFocus`ϵ__GotFocus+#`_һ__KeyUp}`KeyCode` ReturnInteger`Shift`ϵ_ʡֱϽ_keyup`ϵ__KeyUp|`#_һ__GotFocus:D`)_1_ܲڵ_Click{n`#_1_ܲڵ`%_1_ʡֱϽƫ`_1_`,_1_ܲڵ_GotFocus`&_1__GotFocus`._1_ʡֱϽ_GotFocus`$_1__GotFocusg`)_2_ܲڵ_ClickN^`#_2_ܲڵؠ`%_2_ʡֱϽƓ4`_2_v`,_2_ܲڵ_GotFocusz`,_3_ܲڵ_GotFocus1t`-_10_ܲڵ_GotFocusN`&_2__GotFocusB2`3__GotFocus``4__GotFocus`5__GotFocusp`6__GotFocusk`7__GotFocus5`8__GotFocus`9__GotFocusv` 10__GotFocus/a` 11__GotFocus` 12__GotFocus%` 13__GotFocus:` 14__GotFocus` 15__GotFocusL` 16__GotFocusE` 17__GotFocust` 18__GotFocuss` 19__GotFocusP` 20__GotFocus$`(_һ_ܲڵ_Click`"_һ_ܲڵ}`$_һ_ʡֱϽƑ`_һ_'l` ScreenRefreshA `+_һ_ܲڵ_GotFocus_`(_һ_ܲڵ_keyupk`*_һ_ʡֱϽ_Click~`InitRegionCob_City`-_һ_ʡֱϽ_GotFocus:`*_һ_ʡֱϽ_keyupa` _һ__keyup`)_1_ܲڵ_keyup`+_1_ʡֱϽ_ClickA#`+_1_ʡֱϽ_keyup`!_1__keyup`)_2_ܲڵ_KeyUp`+_2_ʡֱϽ_Click,`+_3_ʡֱϽ_ClickW`+_4_ʡֱϽ_Click>`_4_Ƣ`+_5_ʡֱϽ_Click`_5_8`+_6_ʡֱϽ_Click`_6_`+_7_ʡֱϽ_ClickX`_7_d`+_8_ʡֱϽ_Clickq`_8_`+_9_ʡֱϽ_Clickۺ`_9_Ɛ`,_10_ʡֱϽ_ClickvC`&_10_ʡֱϽa`_10_ƫ`ϵ_ʡֱϽ_Clickup`ϵ_ʡֱϽ`ϵ_Ƭ=`._2_ʡֱϽ_GotFocus`._3_ʡֱϽ_GotFocus`._5_ʡֱϽ_GotFocus`$_2__GotFocus`$_3__GotFocusw`&_3__GotFocus`,_11_ʡֱϽ_Click` initCityList`&_11_ʡֱϽƈ`comboboxProvinceChanged`_11_A`,_12_ʡֱϽ_Click`&_12_ʡֱϽp7`_12_ `,_13_ʡֱϽ_Click8^`&_13_ʡֱϽƗw`_13_m`,_14_ʡֱϽ_Clickc`&_14_ʡֱϽƾ`_14_`,_15_ʡֱϽ_ClickN`&_15_ʡֱϽ`_15_`init\[`ca\`ca2(}`ca3)}`_һ_(`+ҪȨ_1_"`+ҪȨ_2_b`+ҪȨ_3_`+ҪȨ_4_`+ҪȨ_5_}2`+ҪȨ_6_r`+ҪȨ_7_˲`+ҪȨ_8_`$_10_ܲڵv^`$_11_ܲڵ`$_12_ܲڵئ`$_13_ܲڵ؀8`$_14_ܲڵ|`$_15_ܲڵذ` initCountryw` initProvincev`_1_b`_2_2`3_`4_+3`5_`6_$`7_m`8_`9_Y`10_`11_z`12_`13_j`14_`15_[`16_A`17_L`18_-`19_=`20_m`InitProsperType`+_2_ʡֱϽ_keyupTF`!_2__keyupM `4ҪȨ_1__GotFocusG`1ҪȨ_1__keyupT`4ҪȨ_2__GotFocus/`1ҪȨ_2__keyup`4ҪȨ_3__GotFocus`1ҪȨ_3__keyup+7`4ҪȨ_4__GotFocus`1ҪȨ_4__keyup`4ҪȨ_5__GotFocus`1ҪȨ_5__keyup¨`4ҪȨ_6__GotFocusL`1ҪȨ_6__keyupQ`4ҪȨ_7__GotFocus4`1ҪȨ_7__keyup `4ҪȨ_8__GotFocus`1ҪȨ_8__keyup` CopyToEachDoc/` PreFldName`LastDay7`testYearaU` testMonth`Day` DateSerialU` CheckDatei`DateStrϘ`tmpYearK`tmpMonthɢ`tmpDay`IsDate2`Year6n`Month`FillSQRContent`InitNewComponentPara"` BaseCount#` FirstCellTxt8` NewComponent`UpdateCobCounts`ReNameFileldsInMark4`SourceComPonentID`ReNameCobsInMark`GetSQRCobMarkStr` tmpDataSource$`FillFieldsInMarkI`FillCobsInMark` InitRegionCob=1`txtProsperType` CreateSQREngT`BKM_SQRInfoEng`DeleteFaMingRen`DelTableRowsInMark͉`tmpStr` CountryCountt` GetFlagValueU`modAddoneField` AddOneFieldD` CurFieldID-@` FieldMarkBodyi` FieldText`FieldStatusTextAu` FieldHelpTextuj` CurFieldName"`wdFieldFormTextInputk\`MoveLeftv` wdCharacter` EntryMacroA(`OwnHelp` OwnStatus.` EnterTextG` TextContentF` frmBiologyz`BIOCount` cmdQuitDownٿ`aX`Control` EndListID` CheckInput`FillLista` QueueListĐ` AddNewBIO|`myBioe`BIOy` CreateBIO` txtDePartment/` txtSaveID` txtClassNamey`ctl`tmpBoolo`ControlsK` BackColorރ` cmdAddNew`TypeName`tmpFld`tmpPos1I`tmpPos2J`CreateRegularListStr1N` BKM_BIOInfo`CreateRegularListStr`FillTxt4`ListBox1_Change `txtClassName_KeyUpR+` FocusNext`InStrRevĈ`txtDePartment_KeyPress`txtDePartment_KeyUp `txtLocation_KeyUp`txtSaveID_KeyUp`Label6,`Now%`InputBIO `ͨģ`DOC_COBJ`DOC_TXTS?`DOC_CHKP` CurTableIndexף` NewDocOcx`OcxTypeR` FieldName`cobList~` arrCobList^`wdFieldFormCheckBox`wdFieldFormDropDownt`DropDown` ListEntries-`ListObj'`FixCount`cobNamex`cobTextu`InitModeQ`InitCob1 `arrLista`DelTail` FormatParaStrW`ParaStrK`EndFlagv` MergRange`aDoc`myRange-`Cells`Mergeq_` NewFaMingRen."` InitCityCobK`PrvcIDQ` cobDataSourceT`modDya`addShenQingRenm`inshCt`inshPe`inshCi`initBeforAddorDely`ProtectionType`wdNoProtection` Unprotect?`MoveUp` TypeParagraph ` addTextInput-`addDropdownInput``addOLEInlineShape` MoveRight`DefaultSortingz`wdSortByLocationP` ShowHiddenqs`Protectf`wdAllowOnlyFormFields!`Password`noresetg` addDaiLiRen` addFamingrenZ`addTextCheckBoxK`addYouxianquanSHM`sign8` delDaiLiRen]` delFamingren`delYouxianquanSHMX`FJFile_DS_CountŽ`SQFile_DS_Count` addFuJiaQD/` strfileNamee`arr_FileNameInfo`arr_NameInputTemp` arr_NameInput9L` QingDanItem'`itemNum`itemCode&`itemName[`pageNum` appendInfoJ` addShenQingQDK3`md` addBuzhengNR,`filenamej`locationInFile!%` beforeChange` afterChange`Pages`fldfn~`fldlo`fldbcI~`fldac$~`flddc~` InsertRows`Collapseu` Direction&`wdCollapseStart|` modFaMingRen?`strPara`arrItemsX}` arrElements/` strMarkName``CurMark7`BookmarkC`CurField`ChkValueE`NewEmptyBookMarkS` modInitData`CityName|` provinceID]`ID]`cityList5` CountryInitY`combD`lc`altStrN` strCountryArr@`strArr@`strValueK`AlternativeTextb`setInitCountryListJ` ProvinceInit'`tmpCobO~`setInitProvinceList``strTmpJ` strCityArr}` setCityList`setxmlTemplate`getxmlTemplate`txtXmlI`strPro56` strFldName` strCountry]`getCode` getNameByCode`Code` FldStatusText`modPubn` lpClassName` lpWindowName` SetWindowPosN`hWndInsertAfter`cx\`cy\`wFlags܋` HWND_TOPMOST` SWP_NOSIZE_` SWP_NOMOVEH` ForAppObj*` ShenQingRen@`strNameZ`strTelI`strTypeAh`strCity?` strPostCode`strAddress_Pro~R`strAddress_City`strAddress_Street~P`XMLFlag]`typeShenQingRen` XML_OBJ_NAME@!`SHUNXV`FontType`Supsc`Subsc` oriFldName`fldName$`isExistFormfield`setFormFieldSame]H`iC]`Mark-` AddOLEControlh` ClassType`AutoSize!`DropButtonStyleu` SpecialEffectN`SelectionMarginO` BoundColumn?`Height|`ShowDropButtonWhen {`sj`desFld`oriFldR` createFormXML;` wordFileName`nodLst`nod`cNod7`rootName`xmlobj` CreateObject`loadXMLD`SelectSingleNodeW`createChildNodeb`formatNodeIndex`Save`nodeNamer`sValue$`rootT` IXMLDOMNode5`tmpNode`newNodC`curNode`newNode``sPath`curPathX`curName` parentPath_`vbBinaryCompare̝` ChildNodes5`NodeType` NODE_ELEMENTM`baseNameq` appendChildb` createNode1@`UCase5 `createNameNode`getCurrentFormControl`setFormFieldValueBt`getIndex,`nodName˷`indexNum6`iLenP`testxml` DOMDocument40wg`nlg^`IXMLDOMNodeList^` Index2Name`nd_^`attrNodo` nodeValue<` Attributes` setNamedItem `AddAllChildrenz` ParentNode` InsertBefore.` RemoveChild` HasChildNodes">` getAttrib4`desNod`oriNod`attrNamez` getNamedItemU` SaveXmlFileg` xmlFileName;`createFormXMLTemplatee`GetPages` Information`wdNumberOfPagesInDocument >`errMsg`VerDateK`validateOnParseO`resolveExternals?`vbYesNo`vbNo%` vbCritical+}` FormatDateQ` DelSomeNodet` RefreshFM` ChangeWord5`UpdateSpecialData` tmpNodeTxth` GetInvName`GetMixFldResult` strFieldNameV`tmpRngf`RngStartF`RngEnds` Charactersrg` Superscript` SubscriptV` UpdateFieldK` DeepSetFontp`strBeginCa`strEnd` tmpRngStart` tmpRngEnd` SetSupFont{ `RngObj-`sTypeYq` mySQCount` myFJCount` loadXmlData։`LoadUnSuccessedg` GetPropertym` synchrXmlDoc)/`setValueByXmlData`SetPropertyValuex` PropertyName` PropertyValue@` ShouldLockj$`GetYXQCobMarkStr͘`childNum)` CommonCmpParay`ECmpPara+` SelectNodesg`LengthY`UpdateCobCountsSQR0`SourceComPonentMark-`UpdateCobCountsYXQ`itemz`AddNewSQFileElementn` ItemCountU` AddItemCount'}` SQFLAGMARK`AddNewFJFileElement\`ZWTSBH`AddZWTSM` FJFLAGMARKX`BackBH .`AddBackS`sResult `warMsg'`cl\` CollectionW` selectFlagG`Removeϱ` BorderColor`vbCrLf` wdColorRose\` setFieldBoderB` colorBoder `BordersC"` LineStylew`wdLineStyleSingle` LineWidth/U`wdLineWidth075pt$`Color2F` setCombBoderIY` frmBuzhengNR` IfRefreshTree` ReturnValue`CtrlFormVisiblel`FormObj7`hide9z` Description `vbYesa?`FormHideOrShow=P` GetWordObj.`OcxObjz` CloseDocument`Savedd`wdDoNotSaveChangesԇ`Quit9` fldYearNameA,` fldMonthName=` fldDateNamek`iL]`tmpArrt` strFormFieldr` strFormatV`sAlert2`IsFullwidthNumberL`vbOKOnly` sFieldValue{`sTmp4` CharacterLenc`s_str`i_num`i_index`i_len `Asc!u` modVerify`validateNumeric` validatePID)`strErr` fldResult75` CheckCIDC15#O` CheckCIDC18&O`validatePostCode` prifldname1` invalidEmailA`strSubF`dot` invalidDate/`strVale4`dateV1`el]` invalidYearb` invalidMonth` invalidDayt+`strFldYearName) `strFldMonthNameU` strFldResultD`Days=;`intYear`intMonth=`validateInputLen!`lenghB`ShenQingRen_NewF`CellPoss`Row`ColH`CurRowkg`StartRow`TotalShenQingRen/S`CurPos\`InsertRowsBelowE` SplitCell{` FillFields`CellRowl~`CellCol+.` CellWidth1~` SplitCount`NumRows` NumColumns}`MergeBeforeSplitA` HideMidLinee` AdjustWidth`CellBottomAlignER` wdBorderLeft `wdLineWidth050pt `wdColorAutomatic` wdBorderRight` wdBorderTopm`wdBorderBottom`wdBorderVertical:` wdColorWhite`wdBorderDiagonalDown^`wdLineStyleNone`wdBorderDiagonalUpj`Shadow`Options`DefaultBorderLineStyle`DefaultBorderLineWidtho`DefaultBorderColor`PreferredWidthType`wdPreferredWidthPointsl`PreferredWidth'`CentimetersToPoints` SelectCellU`ParagraphFormat` AlignmentI`wdAlignParagraphJustify`VerticalAlignmentʡ`wdCellAlignVerticalBottom`Test0c`HomeKey`StartPosG`wdEndOfRangeRowNumber?`wdEndOfRangeColumnNumberxO`tmpmod˳`PCTFileB`FileCodet` Alterable`arrPCTsX` ReadTagStr` ContentHead`Part~`strTempM`GetPCTv"`Modev` arrPCTFileݩ`CptStr1`arrTmp1 `AddPCTName2Cob̠` ParaArray` InitialData` frmAddRecordk_` cobFileTypeaJ`NewFieldg`tmpField*` GetMarkPos9` GoToCurPos`DefaultMarkName`MoveDown̝`TailV`SelectionStarte|` AddNewFields` CursorPosK`wdWordm` txtFileNamed`txtPage ` GetCurFieldIDl0`NodeB<` bookmarkID(`idPosH` DelRecord8` DefaultMarkכ`DelMark1` AddShenQing.` InsertPosMark`MarkBody`PageText`FieldStatusText2`FieldHelpText2d` AddNewRecord+` RecordType` FieldText1w`FieldHelpText1c` FieldText2w` MkLineMark6` DeleteRecordH` DelRecordTypeC`DelShenqingQingdanKQ`DelFujiaWenjianQingdan` GetNumber\`ChrA`Tmp1j` AddFuJian` RemoveDocTextn` tmpMarkBodyG` InputQingDan` MarkBaseBody1e` tmpMarkfName5X` tmpMarkfPage`ListBox2` ChangeStep` StartColumn`BatchSaveDailiRen` Fill2DailiM` strFillText7` BookMarkName'`áe` OpenClipboard`CloseClipboardby`EmptyClipboardZ` ExecuteLine`sCode /` fCheckOnly` EbExecuteLine6`StrPtr6`ttt` wdDateText`fdsjp` findBookMark{ ` findStatus`ģ1c` UpdateRecordl)`shpFlagr2`NewValue`tmpShapx`iStart`iEnd+`StrBodyg`` ValueFlaga` ReadValueA` UpdateCob `totalsqr_`DelLine`wdBorderHorizontal`Macro59 `Fill,`msoFalseF.`Solidc` Transparency`Weight1`LockAspectRatioc`msoTrue ` PictureFormat` Brightness``Contrast` ColorTypeف`msoPictureAutomatic`CropLeft3` CropRight`CropTopw|` CropBottom`Macro60&`tmpTxt` ChangeSQR`modCommonObject`NewElement_FormField` ElementIDN`DSTxtObj2`TextBoxQ` strResults` arrFormField`arrAll(` arrFldResult`TailFlag` DeepDelTail+` TailLength`NewElement_Combobox ` AddSQREngK`BIOMark5`modCopyandFillRecord`AddedRecordTitleK`AddedTitleMark|`CompnentMarkBody͠`glbErr` ComponentIDܵ` DocEndPos` AutoSizeTable5i`ChangeFirstCellTxt0`TableObj/`Table`wdPreferredWidthPercent/`CellTextx` CobMarksStrt` arrCobMarks` arrCobStr` FlagLength8` PutFlagValue>Q`AddSteps` FlagValue` NewCountStr"&`CobCountdZ` TotalCountry6M` TotalProvince` TotalCity` TotalTypet` ʹw`Columnsp9`GetCityDataSources` InitCobType'` CityCobDSI$` OcxContainerLW`MoveStepK` ComPonentBodyͽ`Lfor`fStart`fEnd ` CopMarkNamekF`Lstart@`CheckMustInContainer`CheckOcxNamesStr`arrChilOcxDictPV` OcxTypeNamee`CtrlFieldShade` FieldVisible`Shaded`FMR`CreateFaMingRen`CreateFaMingRenEngEy` FaMingRenMark`DeleteFaMingRenEng7n`modCreateComponents`myFMR {` NewFMR_IDm|`CreateFMREngInfoJ`CreateSQREngInfo7` NewSQR_ID"` modCheckPID"`Wi_`SetWi`StrID15`StrID18`StrID17`AiWi`num`A18,p` CIDC15To18oi`CIDCheckY`strIdJ`` SourceFieldID`DLRMarkb;` modInterFaces` TreeInterFaceQ{`SQQDStrd-`FJQDStri`BIOStr.`tmpCount` cmbAdd_Click` txtLocationi` txtBefChangeVl`TextBox1S` TxtToNewListrg`cmbCancel_Click;` ClearTxtValueE` DelRecord1|` FillRecord.b` CtrlcmUpDown8` CurFldIndex}B`SingleRecordFormFieldCountI`RecordStarkMarkY` RecordEndMarkI` ListToText`RecordToListBox`modBio `GetRecordCountc` DelFirstRow` FirstFldIDw` modNewElement-`SQFileRecordID` RecordCode\`PreMark8` NewFldNameG` NewFldStatusQ` NewFldHlp` AddaRecord`FJFileRecordID` modChrProcess`modCPCLeftTreeInterFaces` ExistSQCodesW` ExistFJCodes` TotalSQItems ` TotalFJItemsw `CurTotalFieldName;` SQFILEBODY` FJFILEBODY91` SQFLDNAMEϋ` SQFLDSTATUSYd` SQFLDHELP&` SQFLDPAGENAME`SQFLDPAGESTATUS` FJFLDNAMECR` FJFLDSTATUS` FJFLDHELP` FJFLDPAGENAMEe`FJFLDPAGESTATUS_` QuitLstClickQ`InitPara` GetExistItemQ` ReturnPara`TypeCode`Para1`Para2` tmpArray0` tmpArray1` RangeMarkName+z` tmpCodesStrF` tmpCellName` vbQuestion` ClearQDRng%`ReturnDestinateMark[H`lblInfo`CoverExistItem` AddANewItem,L`BkmName` RangeStart;`RangeEndG1` RangeName`InRange` NewItemRangec`AddQingDanItemFrameރ`FillQingDanItemFrameЂ` ItemInRangeX`tmpTotal` FldStartPos`RID` tmpFldStatus` tmpFldHelp`modDLRInterFace.l`InputDLR `ArrInfo)`InputSQRh`strFile X`InputFMR"` ComponentMarkr`SQCount`FJCount` cmdUpDownCtrl%` tmpLstObjX` TabStrip1z`Index` lstSQFile ` lstFuJiaFile` NewFldTxt`tmpLst` CurCobItemTxt `txtXS` AddFile2Lst` AddItemCount1`` OrderList` FldHlpTxtB` FldStatus`PageNameJ` PageStatus-`CurFldIDM`NewFldStartPos` cmdModifyCtrl`Frame6`BookMarkStartPosS` ChangeCobList$` ModifyRecordF` CheckSelected;`d[`LstID` ModifyItemo` FldMarkBodys`RecordID`cobFileType_Clickk` lblAlterble`lblXS^`Findedq`lstFuJiaFile_Click6`Check1`lstSQFile_Click`Check0`TabStrip1_Click` ChangmyCob'^`arrLstd`txtFileName_Change1`txtPage_Changef`InitList` cmdAdd_ClickFv`suFlagw`FlagStr`Len0|`Len1|` GetNodeText`strMixNodeText\` ReplaceSubSup6{`strtext`InsertExceptionp` InsertStrx` RangeStartPos`PicName`getstr4`ChangeSpecialItem7/`strnum+` SpecialData`xmlname`xmlSp`kb` tempCount`strPic4` SpecialSCXML ` SpecialCS `*_һ_ӪڵػӪҵڵ11`)_һ_ӪڵػӪҵڵ1A,`d "b #]k'UyC  Q W! ? ; * # ,8 1W E $6+ F /mB  %G Q&$7 3K G H Q %C R;I?T Ss a{ !Y X  f|@"gxME P<<<<<<:<<hnVM|+pXirxith+z@ i|{F4}`~`@` i@Hi!Pi!P % %`@ @ ` % `i i i@i+ i (%+  i@B@8i xCN% ){F4} %i{F4}i0{F4}i{F4}``!0`!4 2%  @ `|j` `  `B@8`  x8i"Xi$ 2  4!4% 2 #i68)8X%@< ``>`@@B `D`F N H iPh iR iT bH iP iR( iT d iP iR iT  % f H ih i`@h + i6`p`r`t`v`x+z` i| i~ i``  +  )% X@ x%` @) %i  + @ ` %k B "8 B @`hpx  "  (08HPXp  $   ( 8@$H p   "  B D"X B  B D(("Px "    8H h$p   " 4( @Xh4    8H "P X4h8 ( 0 H 6h    "        " @  P p x            <  F`         "  \ X ` 0h   B  4     " ( 0 8 H P X ` h         FX` h x &  "  H Xh p  B ( L>HXN dNXNNH B P LXNJJH NNN8 NJJ(x B 0  & @ `px B &* 8PX p   B   0H@2 B   0H` hx "     B  (08@Xh "  " B (08 @`hp       @0P ]  r t $x$v'p"i@8TrueΪϸ]]]( |$zpdh |$'~ |$'  Gzj |$v'  ~$p{F4}'zkki@]]] ]8P]h] ;$' ;$' $(D  7!.  ! !7!  $A@  ''  J $(|k  ! !7! N $ !!(0  '%XqP $( .o8 $'  $'.Jo`]   %!!  %!! %!^  $$;'x< MarkName = Replace(MarkName, "", "ӢϢ") ReadFieldsInMark = ReadFieldsInMark & DelChr63(thisdocument.Bookmarks(MarkName).Range.FormFields(1).Range.Text) & ";" & DelChr63(thisdocument.Bookmarks(MarkName).Range.FormFields(2).Range.Text) & ";"   $'i0]`   %!!  %!! %!  !!!d$;'  !!!0;'   $'iX]X]p]] !'   ! P   %!%5lF   %$9d   %$5!(0k`qX o@ $( !! !! %B@H l B@ l B@  !! ( !(  !! ( !! !! %B@H  !! ( !( B@ҳ B@  !! (1  %( $(o $( !! !! %B@H ! !  %B@Bk(  !! !l  !! !l   !! (lk  !! (   B@$йҽ׶d B@  !! ( $(o0@]]]]] $(   %!0G|j 5%  %!$'k 5%  %!$' kP 5%  %!$' k 5%  %!$'k         doc_end %!! !! %B@0  %(A@k0q( $(o " ThisDocument $!&!(%*!,%.~жϹǷ|d $ ThisDocument $!&!(%*!,B@0k`oXx] !! !! %.4  %!0A@ki]`]x]]]] 8!0$H 8!0'Fkh 6,$'< <$<;$'B B'@k @ 8! ?MsgBox "бԴάȲһ£", vbCritical, "ʾ"|k 8B@8  < Debug.Print UBound(cobListArray) $<;$'B 8B@J 8!L 'D > B >$B D @ > 8, >  F 8(0 ZB@8oh ˴Ҫ޷⡣EThisDocument.Tables(TableID).Range.FormFields(1).Range.FormFields.AddB@8 Zl\ P %!%!VB@X_ R_ P %!%( P %!%!^ T R$` P %!%(^4}]ThisDocument.Tables(TableID).Range.FormFields(2).TextInput.EditType Type:=wdFieldFormCheckBox = F P %!%!G P %!%!!B@^_ R _ P %!%( P %!%!^ T R$` P %!%(^ i  EThisDocument.Tables(TableID).Range.FormFields(1).Range.FormFields.AddX  P %!%!F P %!%!!B@^ר_ R_ P %!%({F4}ר_ R_ P %!%(^h  P %!%!F P %!%!!B@^ר_ R _֤ P %!%(ר_ R _֤ P %!%(^4} P %!%!F P %!%!!B@^4}ר_ R_绰 P %!%( ר_ R_绰 P %!%(^i H Z#recordidָǰ¼ıţ2]  P %!!On Error Resume Next Zl\ !VB@X ! T R$` ( !^ T R$` (^ Err.Clear i  I] ] ;$'h h  %!!!R ַ lʾA@j{F4}zk  %!$h7(7!lG$h7!n(0{F4}dh$h7(kH ZB@88q0i( ?ȡ˵] ]0 ]H ]` ]x Total='r;'t 6'p9thisdocument.FormFields("һ_").HelpText p r'v` v p t'x p v r x v r $$' i ]0 H 4}  |a  '  ~ ' Gxj   'kx 'z '|i`` n n !% n %B@Hһ'n|kk ! (o ](]`]  !olorRe @ $ +  'h 'iX  !!!(  G'jo@18msA@  !(A@o]]] t = timeGetTime() A@  5!R_ 7un5.Selecti '5'5!d'+ .Result 5 $B@ TA@kqq MsgBox timeGetTime - t ˶ɫ lʾA@j''khi`XAttribute VB_Name = "CopyToEachDoc" Public PreFldAs Sng = 12! s3= @A<=NM7Fg}_>uIfxzSub FillSQRCent(Field@y]ing, cobL Mark #DN|fldFormC"AShpAInlineShapdiCG arr, @CobTextG8EngK!fRangeAMSpli;, "|;"1 C@ Apcaax.ScreenUpd$ngFaMWi$thBisum ,A8SetcH= .jkm*s(+).H!a* ,In c(.Start) ~mp.@?). 1s Evalf{/y#1, #NeStr~Opa[al c  7BD=sInrX?@yb "S!;aij By@0 K)?'a3DjThukJg:et:7B=`9+M%DelChr63(&pturnMixResult( )) &1M;''ePReplace(%M"ӢϢQ  tdocO.Q5s(15^D 0! (2p#lweft^, Len^) - 1*/*, 62E0W/-ЕM,uF-O:)Ma(o*o*geO-nte%B-OTg'ad& V#@ ߿V C-A=v|& _[1 Lߵ W 7 o ZList2Table(LstcaABox, a!(!2}Col v#N4) 'xcߖQCurIndexh'0ETxtP)ba;S4.?)q To .@ umnCount 62#A Δ(F(D .Typ70a0rT0Trim$2 ( , iADEƕ,~t^17 '^ iS:t AddFuYe(@K?CCFP,sq).S wd!Noneen.s(2)0.CloEAAIf A yNIbalOr _ OutlidneTh+PrintA0 e^e@ Key Unit:=wd`e, Exten~d#eaR:="ҽ׶ݠ_f>A^%^Removej!^Dim ,FMRCount As Intege&rSQDLYXQ BIOZrWith*?c^v_"0f"l@ita .Bookmarks.ExistMRInfo)aI,= GetRenM ! = 04Q(0)`;e*= dUi :tE 'Msgp "бԴάһ£", vbCri tl ʾĨ! @H lea`[ io%'Debug.yayq,(i AdPdItem CurCobL@ist = HObj.4Coun t - 1FoHr jUB6d(TmpArray) To 0 Step -\(, arrDemensio2ndj)VO(j)sNext j  i On ErrResume rValueUtmp 3.Clear End Sub Public FunctHReNameFMRFields(TableID As IntePger,8wOldbT '˴Ҫ޷ ⡣V'T@hisDocon t.BE).RaPnge.mR1a .Add%.%T^Input.EditType :=wdRegularA, Default:="", A#atn]m"_" &\& "_ "St0atus/Replace(GG<, ~D}n2).$[wVCheckBoxq>MC ?iL, 7$}_<@="_໹=sa=_j).=!e׈DL߈ Ԉ?J}DP)?G G0 W.%GרR_߃e_s(@F"_ 'ihdrn#+ؓer9W/j 4q^?q=q3o@uU on绰?OOo2 NeQtoLߐmeB?܏cL) 'recordidָǰ¼ıţ2SDim fldorA EachIn_He?or4#偩'oxty0m%σ0H'!!FillMarkStrin>g@A7iW?@C@Split(, ";"ԔIf 4) >Bookm a ?.cr0Then3MsgP "ַvbEpxcla00 ʾ$:ExitCqIfWith  KAIxPl(0,, b=P U.%918Else .^ 0uL,a۩GetRen(DataSource) (,)d*'ȡcH -PHelpRMFlag1w2m posN2Pos= "TotXal='Q2Qt;Y = 'td䏴t.FormFields("һ_").HelpText  pos1 = InStr(1 , tmp@, @Flag1)PPos2PjV2+GetRenCount2Val(0Mid( Zw+ Len(e, aT- -)UEnd Function P`ublicN (N Asteger, By=` str1 piTng 2 )InwDim i , po Until= Nzp + 1 p,HIf0= 0 Then Exit Do   i5i 5JIf LoopCN&#i USub test(t@PreFldName <> "")/ThisDocument.Bookmarks.2sts(})HH .Selec 6""#Q2GF.StarG IBReadInRange(SouxrceBStrUarrpTmp(H+fldFCG C @ Each Ic(RightZ, 1d))63(SL,en 0WDoc(yLefP-/ ,!VLoop [ 2ZI[oU;` EnddO|GetPureResult(FldObjzForm FieldN~Wi8th  JX.TypA7nGx )Range@.Text) EO=ElseLv1B[.?@ABCDEFGHIJKLMNOPQRSTUVWYZ[\]^_`abcdefghijklmnopqrstuvxyz{|}~ME+H @i `J `L `N ID`P  8 B  (08 LP "   t p L "   J0 x]`]x]]  Ʒ'N E tmpCount = GetRenCount(.FormFields(SQFile_DS_Count).HelpText) If tmpCount = 0 Then= ļ嵥'J boo Elsem SQQDStr = "ļ嵥;ļ嵥#" & GetRenCount(.FormFields(SQFile_DS_Count).HelpText) & ","  End IfE tmpCount = GetRenCount(.FormFields(FJFile_DS_Count).HelpText)  If tmpCount = 0 Then ļ嵥'L ElseC FJQDStr = "ļ嵥;ļ嵥#" & tmpCount & "," End If< "13579;JLNPTX;# 7!$,;# 7!$,ϵ,ר;# 7!$, ǰ, ǰ, , N б,ҪȨ;# 7!$, Ԯ˵,ɥʧӱԿ, , J , L ,ȫ˻רǩ'H qp, H $h'H {\ $H H ' k8i0(ʲAttribute VB_Name = "modInterFaces" Option Explicit Pub, FunBc6Treef(`al ByRef ReturnValue AsD Sng)  Dim SQQDFJBIO4tmpC0ountPgerlWith ThisDocum|enjA&hƷ'*= GetRen1(.FormFields(SQFile_DS_ ).HelpTe xt) #If %0GenO4Fļ 嵥 FElse);!0#" &^ ",nd If G$`   P+` `7 %`$` 8 3`8``` l`  ``>'` `, i  X  ` 0 p    H ` ii8%  %H  "Nhpx HLXH  "  0 @P Xhpx "* 08 @ `px <8"x" H L  Hp2hx"  "  ( H X08X "`h p   " ( @ P X ` ,p   (  T  XP  T    60 h Bp F B H P 0X "     0 8 2H   (   (0@HP "X`h " 0PpxNRN(x B   (    08@ "HPX<p  " " ("8"`" 08P`hx" " "   "(08 "@H`x "   X  @Pp " ]  '''''''''BmarkbodyֻҪ󵽵һ,recordtype=0ļ嵥1Ϊ嵥]X]p]]   '  !% !O C@J5L '  ;ר_ _ %$ ;ר_  _֤ %$ ;7ר_ _绰 %$ ;qk o !5  !(d !(kqo]8 !!d`д lʾA@j| kA@ !! !(k A@2kOn Error Resume Next !C@J !!L' !!L '5L ; !!d ;( !!d ; !!d ; q !!L @ !!d; !!d; !!d'CN2 A@ !!L A@d0  !!dר_ !!L_7( !!dר_ !!L _֤7( !!dר_ !!L_绰7(q@k8Total= !!L;  %( !  ! %!!  ! %!! %B@k !!L !, ( A@o8P]]]] !x5L ' 5   7;'  FldStr = .List(CurIndex, 1) & ";" & .List(CurIndex, 2) & ";" & .List(CurIndex, 3) & "-" & .List(CurIndex, 4) & "-" & .List(CurIndex, 5) & ";" & .List(CurIndex, 6) & ";" & .List(CurIndex, 7) & ";"q !!L  B@o 5(d5(d5(dqXA@oH8]x]] !!G|jA@ !!L! Me.cmdDel.Enabled = False !(A@k !!'   %!!'  !B@ !!L  !! !!L  !%ר_  _ %(  !%ר_   _֤ %(  !%ר_  _绰 %( k !!L !!L  %!!B@dר_  _ %(ר_   _֤ %(ר_  _绰 %(k] !!LDLR_Mark !%DLR_Mark %!!'DLR_Mark %!B@   %B@   %B@   %B@k !!L'Total= !!L;  %(A@ !!LG|j  !! !!L   !,  !!L !(d !(kA@oA@ !A@A@A@o`]X]p]] !!G|jA@ !!' ! !!d ; !!d ; !!d ;q  !!dר_ !! _7( !!dר_ !!  _֤7( !!dר_ !! _绰7(qA@op !5 !!d !!d' !(d !(kd !(kqiA@ !! !!  %!%B@HkH A@ro0XA@ !A@A@A@o ] !!'  !% !(d  !% !(d  !% !(d !B@ !! !( !( !( !!L e !(k !!  !(d !(k !! !!L  !(d@ !(k( A@A@o A@o 0 B@o pA@o 1A@  !!L  !,kh o` ]0  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE .  %!$' G|jA@oh H. !!L Total=2;  %(k A@A@o FAttribute VB_Name = "frmAddDaiLi@Ren" Bas0{8BBCF128-98F7-4D99-9602-00604702C9A0}{630654CA-6A18 -4FF0^0-C7B0EA9C 50A7} dGlobalSpacoFalse CreatablPredeclaIdTru BExpose0Templat@eDerivCustomizD Public Count As Integ`er 'SDubput() 'markbodyֻҪ󵽵һ,recordtype=0ļ1Ϊ Dim CurIndeVxDiRjRtmpBkMSngFor iZ1 To>AD " & iIf ThisDocument.BookA@s.ExiPsts()@ en AWith Me.L Bo,x1OA .ItemSI= n,- ( , 0)@@H4 1 GetPureResult(J?TmFields("רL`_NO"_"))+;L(2i֤?N, 3?& " _绰End @'!!IfpNextMam  jocmdDelCtrl($)ITӂ9i> @^h RPqC .EnǐAE⚥q aG!Eriv  ]New_:CkKStrx@txtA,.TA&u",nMsgl "д!P", vbEx mation, "ʾfxit2aE4Unloc~kCXyH.<> -.'Modxifyr. >H= 2IF 'Pag !'On ErrvJ7F= J"P"H’ 2I GDID"3g?TelqS,q/t >&,*+PB;e QKX[U "CV2-JFill, k@"$i`W! .OaLa@_"[b.fj>Xg_a" nst!a&GwwBKM_DLRInfo).HelpQTotalv=o h ;$O -.aj$ > 3GRangev()'?R3).R.Start Ќ,}kDž)r.setR9"Selected(## 1ӺtLban|ooϰYo_pmy`p@ s0fld?r Xiq < G5(\TsM0'=7.Columnoa =&H_i)O'@F p`5RO_cPP-Q14x, 5t  6d7 A .Be&&, $ՓClear˓q.g4M U"xk[Jh{ /efya /Q7//* +TabStartPos As Integer Dim iTIf Me.Li@stBox1 Index = -1 Then Exit SubUnlockDoc~Count?> '}hcmdDel.E@nabled$F0alseJ"Mo0dify%EClear_Click=End IfCurbn =uisjument.Bookmarks("" & *+ 1).Rapnge.'4RemoveItehm ()> 0Fore=To - 1Th6@mField672_:i @8<"_ ":esultMS(i,B1B褺]2R67P绰]3HNext i; u= 2LuJcMYuAHRows.eztE ==="~"g; :? S"_7 i3tmpDLongcv6A6.A 5.stADLR_M`") < W'Y(D/I@(, H # 2aiLiRen?[C5* BKM_"Info)@.HelpTs= "Total=Ási& ";D[CFuYDiB?0)ߠ"c Iv ?5/'"" Or*ptS5checkEmptyPTGq @=/™Ma,} i#u B KQuitKJust0pbo8ardS/2 <>gt 6ϴSeleD 2 TruIE`nd IfOt>| 0*b)(x?<v- LZFuCtrlJModefy1Sub Private  @ID_Change(f #ǖ#TelnUserForm_ActB0,InitPos "1"VPSelected(0)Ljf[TRF'A#ializT'Dim lngDeskTopHandle As Long*N= FindW`ow(vbNullString,!MCaptionC' Ϊǰ$# $M , HWND_TOPMOST, 0HSWP_NOMOVE Or SIZEH Frm %MvDaiLiRenc-= Get(ThisDA ment.a9Fields(BKM_DLRInfo).HelpTxext~M 7 0ExitXInHput% 4QueryClose(Cancel!2Integer|, AYNxoth2$ <n!!+"Total=2;d[0Lock*cJu@stEmpt@i@pboardH! (timeGetTimexMEPS<S<S<S<< <<@<.0{0ABD644F-9475-43DB-BB34-5C1D35F4C585}{5506D22C-320B-4F12-93AC-3AB9FFEF68C9}+& hzh|h~ x X C` `; Pһ%` `~!`H` `; `i`"!`$! &i`!` `һ`!`~`|`!`!  , i  ` :`!0` X@ @ !`!   i'i  ``` `;`   P b$`@ 0@ `  @ $`  $i'` X   `` 0  )( X==% p   ) %    X i  ``@ @ $ @  )8 _cli%  ) !%  `& Me  U`!d@ @      i(!i0Hih i; ) % X0)P!% )%  h@)` % ) %  8)0B@8% "x)h% $)% &``( 0)d%   x``5 8 i  5``5``5R`@ @  Err,: i<i A@ > %,B`iL*%) % N% i0ixP% %H 1PN H & "H P ` p      " 08@<H* ,(08@Xh p   4  (8@ P ` xH ( |8"Px"""(P HX  &    (@H Ph " " <*PB* D *`  : *  ^ @ "  h B` "  f H " P X ` h p x   & <  H8( (|` "@H "` " "H  ,h$  (8 "@HX `h p Bh8 "@H P ` p          0 @PX "`h p(0(8<`*0P(` P < >`:: 8Ph "   0 Ppx ,  "t(&&P(x@ P0@H  B  , <( Bh ">08@`Xf (08@ "H"Px "  0 8 `P   "   < (! 0!@! "H!P!X!`!h!p!x!!!!!!!! "! "("@" `" h" 6"  """ " "# #20# h# x#$# ## "####$#$$&8$`$>x$,$$%%40%:h%,%(%&& "&& &  (& H& X&h& " "p&&&F&D&&8' P`''0''P(P(@`((6( @(F()8p)4))) 4) (* "H* :p* ** "* + , + 2P+ + + + "+++ , , 0,H, `, x,, ,,,,, , - -0-P- p- -$---- .8.@.`. "h.p.x.......`.lH////// " / //000 " 0(000H0 `0&0000 00 000(0 101 81 H1 X1 h1x1 11 " 1 11111 "1112 2882p222 2222 22 B22222233(3832P3 3 3 3 3 34 4 (484 " @4 H4X4`4p4x4 " 4 44444 "44 4*4 5Z055 "555555 55555566 6&(6&P6 x6$6&66$7 (7 H70h7 7 7 7 78$08$X88 48$8 8"9 09 P9 p9 9$9$9: 4:P: X: h:x::: 4: :;;;(;8; P; `;p;x;;;;;;;; ;<< (<8< @<P<"X< << <<<<< "<<<<=== "  =(=0= " 8= @=P=X=h=p= " x= ===== " = ===== "= >>>(>0> " 8> @>P>X>h>p> " x> >>>>> " > >>>>> " > ???(?0? " 8? @?P?X?h?p? "x??????2?@ @4@P@`@@@@ " @ @@@@@ "@ @"@ A8APAhAAAAAAAAA "ABB B  8B XXB  BBBBBCC BCC C(C0C8C@CHCPC hC C C C &C C D D "D <8D xD D D D 4D  E(E 0E@E B HEPEXEPhE G8G B @@GGGG ,G 4GH HhHHJHHH@H8IPI6XI IIII " II IIIIIJJ] @] X] p Public SQRMoveSteps() As Integer !5 !( !(55L e !( !(d0 !( !(kqo t = timeGetTime]] ]8 !!d !!d !!dΪգ lʾA@j !B@en|0k(]X !!dΪգ lʾA@j|kA@ !! !(k On Error Resume Next !C@J !!L һд !(d- Me.txtPID.Text = "һд" !( !(k | '| ! !!L ' !!d' /7?GO !!d; !!d; !!d; !!dһд !!d;$H !!d; !!d; !!d; !R!d; !!d' " !!0; !!0; !!0; !!0; !!0']p !! !! !%'~k !! !! !%'k8 !! !! !%'k !! !! !%'k !!0; ~; ; ; '5L ; !!L ;  ;V  ;  ;  ;qq Err.Clear !!L   B@ CreateSQREngInfo !!L !,A@A@XA@VA@o]0]H_ __GotFocus()'" :!!d "$`'$ " $A@ _ _ܲڵ_GotFocus()'" :!!d "$`'$ " $A@ _ _ʡֱϽ_GotFocus()'" :!!d "$`'$ " $A@ _ __GotFocus()'" :!!d "$`'$ " $A@ X====================================================================GotFocus¼_ _ܲڵ_Click()'" :!!d $`'$ " $A@ b====================================================================combobox_click¼϶_ _ʡֱϽ_Click()'" :!!d $`'$ " $A@ `====================================================================ʡcombobox_click¼o`]]]]On Error Resume Next ! ' .List(CurIndex, 0) = .ListCount 5.List(CurIndex, 1) = "" & Me.ListBox1.ListCount !!d'  ' < D L T \ !!d; !!d; !!dһд !!d;$H !!dһд !!d;$H !!d; !!d; !!d; !R!d; !!d'   " !!d; !!d; !!d; !!d; !!d'] 8Ph !! !! !%'~k !! !! !%'kp !! !! !%'k( !! !! !%'k !!0; ~; ; ; '& .List(CurIndex, 0) = .ListCount   ;  ;  ;  ;  ;q ZB@8o !!LKTA@S !!L A@nho`0 4<DLT\dlt !!d; !!dһд !!d$H; !!dһд !!d$H; !!d; !!d; !!d; !!d; !!0; !!d; !!d; !R!d; !!d'i   5(d5(d5(05(d !!5(d5(dk0 5(05(05(05(05(d5(d5R(d5(dq o `] On Error Resume Next !!G|jA@ !!L !( !(1A@A@ !B@| k !! !!L  !%'*Ҫдһ˽ij ;$z'  $;  $'  !,k !! !B@ !A@#Ҫ !!L'|  !! !!L  !%;  !%  A@  !!L !!L A@  %!country=$  %(  %! province=$  %(  %!city=$  %(  %!type=$  %( !!Le2A@ !!Le1A@kx] !!LSQR_Mark !%SQR_Mark %!!'SQR_Mark %!B@   %B@   %B@   %B@kk ZB@8Total= !!L  %A@^A@ !!L !(d !(kA@VA@ohɾǵһˣҪϢַԭǵһҪݺ˵IJһ¡]](]@ !! G|j !%;$' !%;$'$;$;$; !,   !% $; !, $;$;$;; !,   !% $; !, o`X]] '  %!!B@& SQRMark = "ӢϢ" & SQRID5 thisdocument.Bookmarks(SQRMark).Range.Rows.Delete;ThisDocument.Range(rEnd - rStart - 1, rEnd - rStart).SelectiH ]`]x !! !! !!L G|jA@ !!A@k !A@` !! !% !! !% !! A@ !!  !% !!  !% !!A@A@A@XA@A@o !! !!L  !( !( !!e !( !(d( !( !(ko !!G|jA@ !!A@ !! !% !! !% !! A@A@o@A@ !! !!  %!%B@Hk A@roP]] &'A@ &'A@ &' !!L1A@2A@3A@kdebug.Print timeGetTime - t &' !!L  !!L &'A@ 0debug.Print "˺ʱ" & timeGetTime - t k0A@ȱһϢٱϢA@ !(XTotal= !!L;  %( |A@A@ ϣ pʾA@j A@ro8]]  !% 7( !% 7( !%;$'$ !(d$%һ_֤Ż֯7($һ_7($5~(d$5(d$5(d$һ_ֵƺ7($!һ_ӪڵػӪҵڵ7($һ_7( $һ_绰7(qo0]p]  !!L A@ o5д˵(new)]    !%  _7(  !%  _û7(  !%;$'J.FormFields("" & i & "_").Result = arrFirstProposer(0)$'  _ A@$'_ _ܲڵ A@O Ҫֵ$'_ _ʡֱϽ A@$'_  _ A@$ _ֵƺ7($ _ӪڵػӪҵڵ7($  _7( $ _绰7(qo-Private Sub ClearSQR(ComponentMark As String) Dim fld As FormField Dim insh As InlineShape4 With ThisDocument.Bookmarks(ComponentMark).Range# For Each fld In .FormFields fld.Result = "" Next& For Each insh In .InlineShapes, insh.OLEFormat.Object.Value = "" Next End WithEnd Sub !!L !!L1A@2A@3A@ !!Le2A@3A@ !!Le3A@k8k0 '| |G|j | ˲ %B@H !B@3 %B@H3 %B@ ˲ !B@^ | eOtherShenQingRen %B@H !B@3 %B@H3 %B@ ˲ !B@^kTotal=3;  %(oX ] ] !!G|jA@ !!A@k0 !A@` !! !% !! !% !! A@ !!  !% !!  !% !! A@A@A@XA@A@o   {tab}A@@ko0  !! !!d  !!L  !% !!d  !(y@k8 d |kk !! !%CN A@d B@8 (d B@8 (dk ZB@8ohp  H{tab}A@@k0o(  !! !!d  !!L  !% !! !%  !(yx kp kX kP A@ ZB@8o0  ]x ] ] ]  !,$' !B@8 !B@J   $ !! !% $;$' !B@J !!L '$  !,$  !,k  ZB@8i    {tab}A@@k o @  ` {tab}A@@kH o@  ]  !!L   !%#&#'  !%#&# !%#&#   %(oh  ]@ ]X ]p ''  ~| d '~k !(XA@ !!'  !%;$'  !%;$' $ !(d"$ !(d&û$  !(d$ !!$ !(d%֤$ !(d'$  !(d'$  !(0+arrField(5) 'Ӫҵ$  !(d$ʡݬ$  !(d$ج$ !(d(ֵ$ !(d)ʱ$ !(d$ !R(d'Ӣ$ !(d'Ӣĵַdx.========================================100202$ !(d%֤$  !(d'$  !(0,Ӫҵ$  !(d$ʡݬ$  !(d$ج$ !(d(ֵ$ !(d)ʱ$ !R(d'Ӣ$ !(d'Ӣĵַ$ !(d.========================================100202k ZB@8  !( !( !!- Me.txtPID.Text = "һд"һд !(dkd !( !( !! !(d !(dkk !B@ !! !( !( !(d  !!L  !(k !!  !(d !(k !! !!L  !(dh !(kPkHA@o8 !!  !(d !(ko '~o  {tab}A@@ko  h{tab}A@@kPoHX  ({tab}A@@ko  {tab}A@@ko  {tab}A@@koh  h{tab}A@@kPoH  ({tab}A@@ko8  {tab}A@@ko  {tab}A@@ko]H  ֳȵ6'(kH $* ( ( Ϊ$H'(k? ( (Ϣ lʾA@j !(, !!d !(. !B@kh?o`?`  @?{tab}A@@k(?o ? ( !2!d $ !( !A@ !A@ !! !( !A@A@A@1A@  !!L  !,k > !!L'to>"Թ]H]`  !$' ΪǰQSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE . !4!d !('~ 6'| |G|jA@8o<x]]]] ]8]P]h  |  !% !B@J !!L '   !,   !,'''    A@  ; $   !,    !,    !,    !, . Me.ListBox1.Selected(0) = Truek:k: i:] <$B'>$#4EV : < _$D;;; >!F; >!H; >!J; <_ֵƺ %!!d; <_ӪڵػӪҵڵ %!!d; < _ %!!d; <_绰 %!!d':ȱӢϢfieldi8 J3Ż˵Ϣȡ(ڳʼݶ뵽listbox)] N ! N!!lW &Debug.Print insh.OLEFormat.Object.name N!!!$H N!!!d$H N!!!_ L_ܲڵ N!!!d B(Fkx7 N!!!_ L_ʡֱϽ N!!!d B(Hk7 N!!!_ L _ N!!!d B(Jk6 B!J B!F B!HGyjkh6k`6X6iP6. (A@ t !!L'vk6o558Attribute VB_Name = "frmShenQing@Ren" Bas0{0ABD644F-9475-43DB-BB34-5C1D35F4C585}{5506D22C-320B-4F12-93AAB9FFE@F68C9} dG lobalSpacoFalse CreatablPredec$laIdTru BExpose0TemplateDerivCustomiz1D P DA Function timeGetT Lib "winmm.dll" () As Long @ublic HelpTextSݓCounInteger$ExtLstC*k Boolea n 'PDQRMoveSteps"F3Sub UpDownCtrl() With Me.ListBoxF1CAIf BIndex@a0 T@cmdUp.EnAQcAC A uE@ BD- 1cKA?I6 Enpd If[ f Ac KgRAddNew_zh:'(t@_ȞCDim strFieldJdCob1mySQR @ /A%ob".ry.U" ACcPrvcCit)+EMsg@K "Ϊ", vbEx }mal, "ʾaSetF0ocusExit ).!ValueSoctxt!@8 UnlockDoc%qo<> - `"mdModifyjLAOBHOn Error RetsuN.QItem%  s>s`+Email+һд?< a PIDE = o% c= C+ )B Cur%p(`'-B`sS"Tf@=\@ & ";"P_,CUserCodeBIIf(?0@)_ XPt1"U!_>A/r(2!Tg}3 ⧯45b?up.CQ ҭ."e aAoG !EngInfocSelected% | Delq׳wRefreshO`cxTreQL#SubSub AddSQRCode(pID As Integer)  Dim Pr@ocNametS tringlVBA| 4d= "_" & & "__GotFoc`us()"a]= Replace(frmData.txtCobTypeEvents.Text, "<>",Q, 8[ܲڵ^ԟʡֱϽ/_/-'=?=¼걂ϿClickfӀCountryiIDiuheC ?"?&=kcombobox_c#،^#fPrvc"d""=ʡ!"End Private BuildPara(Lst`Index!OCurC:strFieldd1@G'On Error ResuNqc With Me.Lis`tBox1 m = '(, 0) = [1֡qE= gO f&n"; _`@ UserC UIIf(P ID# һд"`;")pEmail?>7_1 eet#S YouBianRTe$ XEv?ErRq-cobat@ CTEonCityonActq es3K d:1G:, )2534IfAX:C<> -1 Then@ }18Q,epx, 1g!qMIfb2&+ 3W%%*p4Dd  1Valuev1c8B2834" 'Q0rW(]sf}\vo+ eM2_T]-, 3A p_T4T?4~57r.!prr.Clear f }ub}M@odifyS6Q!Ren(d3Select Case:"t2p2xvSaveFirst0pohqEls!1FHillxCont & -=r  ?c Function Txt20d() I(lCFZvs K"sxuRsJd?sxtxs`@E^RKQf4b Street.Text & ";"P_ Me.cobActAddress.ValuetxtYouBianBTel:EName End Function Private Sub cmdClear_Click()With lMe .q= "" UserxCodHtxype v IfC.ListBox1Index = 0 ThegOSPID$Emaig Ifk[CountryZzPrvcCit[StG@ ȇQ?r?}ËDel Dim i As Integ er 'ZOn Error Resume N@CVt-1Bt Ex it UnlockDoci2O !md,.Enabled0FalsMo0difyW SQR "<1_gVRemoveItem (0$l O^Aybc > m strFielAM(1, 3) 'Ҫд һij In |tPos (In@SN(2,: ,(LeXft()Mid)D=C)(/ U pd Sequ0enceI$cS QingR|enO- a=Fai`' ToΜ1 - 1gill@QComnt,(i:,5)ǀ5= 2C,ad(! C0This@z@nt .@#mTs(BKM_TotalCobs).Help= SetFlag"ꠗ(?*`cc=", -n2e tprovi&^1eor@h`De0<PEZ_(tS(=N}Z2tZoe^0EqotmpPopLong?3c<8= 3<3 Z,Bookmarks.asts(("5_M "))@==4f.Range.Start 1/!r.tets"(C , E)zf! _1_rr.2s`r; "b=R;oM,LInfo=#RFuY4--"U.W"ruЃeRefphOcxTLՖ!Ulub1 Bx) 'ɀAϢַQԭҪݺjIJһ0¡ Q7arrFld0 dr1#tS<4AzSplit.m(f0QvK;"1D@PQf3%1G%2$(= 4UBod( B=r`iɂ>ӥ= 1 1( 1( ;[ So Is _t&F / A<@veSQR(0ID As Integer) !Dim hMarkpStringhrStartl, rEnd V= "@" &ID>ThisDocument.Bookmpsy).Range.Rows.Delete 'WӢϢk_(t`d+`/'K LB(p- }- 1y ).SQct Function Private Sub cmdDown_Click(FlagPosList If Me.Box1Index = -1 Or@Count 4 Then Exit+hUnlock@i0 AQModify'EIfChv.Item +, 1!C FillzCo7@(-( ?, 3),> 5 R +:$AV)% !&ReckCmdCUpCtrliAelLEs1Sub-TCh S>O%HAe.^.Enabled@TpFalsygUp(TruE@O"g    ^.@##e{uBuildParaNadlYg, X lS%QuitK%JustEmptypboarDaV(<>!a(Şyad 2oSaveAllk.i t`jtimeGetTWruS`_QpeR^ekT8t?= _Clear[Yu1"2Ru3GoTo cs9'debug.Pv b`T# > 3lFor i4 OO?s 1AddFrame ' "WʱюpNex8t i&FirstProposer#'ȱҀ ١3 Other%`lblAlarm.VisiP`/8W7m4BKM_$Info).HelpT Total=1/!& ";#MergeCells + c:#GMsg "aϣ", vb1rmaq, "ʾ4=uarr _? With *s.Resuls?(0M _FuYe0+edPN?c128 Split(d #&_(c`. (0)"h֤Ż֯";1R_6( .3 Y` ܲԘڵؿ;(3 ʡֱϽƟ4  5(ֵl/6ӪӪҵoh7on R (8绰9DaY=Uen/DSA/DQ> ڵ For i = 1 To Me.ListBox1@Count - 1  FillShenQingRenCPonteFiBNext End Sub @Public v(rID As ILger) 'д˵@(new)cD@im tmp/S trWith ThisDoc\um.mFields("Y" & =& "_").Result V, 1G'0û "/2/arrFirstProposerKSplit(N3), ";"!'iB"_E ((0a= EnValueCobT_,woT3"M_zڵ" 'Ҫֵ 48 ʡֱϽc=59'?e!eֵƺE6 ! Ӫ2pӪҵD4r.N7 }q 8 :!9D !A h'PrivateClearSQR(Compon MarkǞ 'fld朄 FinshaInlineShape..Bohokm sk /anga Each In ; a""aF a (sC a.OLEmat.Object." g.'.)i.De(d5If4< 3@enhqV= 0Le< z"#1$e23Else !!) G"= 2 Ifщ= Gets qrencs$ Exitq6Q4L 2?Sel(aion.Rows.@&et41_"8T3P g?ks.Add< ( s #> OkOther Ԝo L ?r)HDBKM_[Info) .Help= "Total=3;`:HR_cmdUhp_C kG^F@lagPos\te@1 ?tIndex 1 YouBianb ʱtTe6nt%ld(7'&^8淓{='=100202 $d~ $[""@">!%O!CO! O!O!O!x6tO!qd(1$O!xtO!\-O!tE6`P*E""'d(5'  _QI]`H״ Me.txtPID.Enabled = True EmailFalsHIf List Box1.Index <> 0 Then 'wTextt"һд".0End If@E uv!vZungm+Name.SetFocusR0= -1(cm8dDexUp×CDownKb'Count > 2L'A)J( e IA ? 7 L$D>r`)))  ')xt)))VI y440 p" y44{T StreetO O /@ O ×O /@ /@q5_ Tel /K/K j UserCodeO O O O O O O V@!u@ YouBian_Afte0rUpdw@Dim msgInfro2htri3`xLen()16 = "ȵ6L`Not IsN dricC&WIIf(8", "u& "Ϊtt|<> "b"< Msg@" &&ϢvbExclamationʾlSttarQ0I>`gthp~! 66u _X_M_MBB?Q 17Q? : ;61_e+ThisD`ment.cobDropP`ry.TagMid(, 9InitCobPQtypК11$, '&e agobwWg _cPPrvc)A Po`c1T)P7 B1ySelected(0)SEnd If  RecordCount = Me.ListBox1 \ Sub Private  UserForm_Initialize() 'ԹDim i As Integer*zlngDeskTopHandle(Long%= FindWow(vbNullString,Capt0ion)<' ΪDǰSet$Pos 5, HWND_TOPMO ST, 0SWP_NOMOVE Or SIZEl, Cur8Frm7cobCity.Tag ThisDocument.txtCextExtLstClickrue ShenQzRenGetTotal If 0 T ExitAr nputDHata |ub pFuncWqD (Yq@6aocA`Field@ A-WfbL&8{%= !NQueryClose(CancelG`ModbDJѐ=h@ *b!*Drop,FalsCLockBmѱRefreshxTreMeqSax$SendMessageAxME@+@ i`iii@L!+ i !H$ B ( 0 &@ h &x "  "    ( 8    ]D$$ ΪListBoxӺ$ $ ɹTrue򷵻ʧ$$ lstDest:ListBox! !  !A@'z'iɱAttribute VB_Name = "ListHorizantal" PrivaDeclare Function SendMessage Lib "user32" _  Alias "\A" (ByVal hwnd As Lon g, 8"wMsg"Param8lAny)&Const LB_SETHORIZONTALE XTENT&H194ublicytBoxenScroll(lstDe(e@Object:B@oolean$'`$܃$Ӻ؈ɹ Trueʧ)G:4On Error GoToProc  wD.k,M, E Width, j|0& RO\5I ExitF] *(:#False E t{[ }modAddoneFieldw` modSpecialCharTPmodCommonObject (modDLRInterFace 8%xME` @ i`iiii`; 8 iB  j :* h"p <8HPX`hpx ,  B   ]dCursorPos = GoToCurPos("marks14_ļ嵥", FieldMarkBody & "_Child", thisdocument) 'λ  B@3Selection.TypeText Text:=CurFieldID & "." 'ǰк=  ! l !B@^a==================================궨λ(2Ϊãܻиֱӵİ취ʵ) R  B@ R B@6==================================궨λ % _Child 9;"Text1"'ǩƶ9999 99 9^5V Zl \C@XJļ$(9q8q0  B@ i d B@iAttribute VB_Name = "modAddoneField" Public Fun@ction tO!t(CurLID As Inte ger, &Ma@rkBody2S ng0Text(StatusHelp ) Dim i'sorPosGoTo# ("ms14_Ā嵥" [& "_Chi, thisdocument) 'λ 5Sele.EndKey Unit:=wdLineFaTypeh:=K:." 'ǰк! .Forms.Add Range:=,, /0:= _wd9Input '==(2Ϊãܻиӵİ`ʵk)MoveLeftHCharactAcounM1, ExtendPCC+kz8Withf G`(16W.nCYA" @'@Hz'"b1"'ǩBEntryMacroAACxitnabled TruDqB Own=u`ruw'''.,NBEditAUUwdR@egular, DefaulAׂ*c/a@"`dw0 Wibd 6= 0@r !#G;w% 5e(Co nn_!2 := m ! x      !"#$%&')*+,-./012345679:;<=>?@ABCDEFGHIJMNOPQRSTUVWXYZ[\]^_`abcdefhijklopqrstuvwxyz{|}~v;TxME P<<< << <<<  p hlHhnHhpHhrHɞ.}ht v)il(ix(```z |`%@~  %+h%` ` g`% H%`  ~   )ļ%i0 6 ix  Np %`   )N %ix+`)%@ ````+F @)`h%i@ ```+( id Hi``+(i@ `+h i`  ii``@ `++@ i i8  > 0 ` B  ` ``` @ p i`  Si i H % h % %``>````8 `$ ``` `` B   (  x( `0HX " 0`   L 08@ >X *    @X0p(BH P `4h  4 B (0 8H `     "08 " @PX0` " 208 @ P`hp xB *.0 HZX  "   0  P ` h p x B         Z X h p  x    "     ( 8 @ H B P X ` h      B      ( *@  p   @     B     @ `    "        &J@  Bh B p x     "8`  "(4@0x  0  &( PX`h p"   (& "(P(X  . *     " (08@HPX`hpx  " 84P0     (08@Xx6 0T@> (8@PX `*p 4(08@X`h px  "L "  (8 VPx]$1]$ SpecialChar]$ 0]$#$#H] `xFʽpic=000009.gif,000010.gif;]]]0]H]h] l "1SetPatḥַָԴļ· lʾA@j!|k l$ ;$밴չ淶ʽύ 6 ʾA@j Ϊ l pʾA@jӿ|0k( lpic=$'z .| |$Nothing |! %!lF z,$'~  ~ " n\ $~'R& ".gif" $~ !! !! %.   xA@dļ' 'ڣ޷أ 6 ʾA@jk dַ lʾA@j|XkPdHַ lʾA@jkko]]]]0]P !'   ! !   !   !' esum  $ $ %.嵥z0k(k kih !!R %(ko$]X]x   !%.N N xA@ʾ N!!'   %B@Ho0^ x x űֻܽ0-100% 6 ʾA@jd N5 x9 5 x9 !qkoͼƬת* ]]]]жResult""ַĸ ]жResultInlineShapeĸ $' $'% !!!R'  ====' !('У,ݣд 6 ʾA@jŶ#Error'!z0k(   $'   ReturnMixFldResult = ReturnMixFldResult & arrTmp(i - 1) & ";" & "AdditionInfo=" &' fld.Range.InlineShapes(i).LinkFormat.SourceName & ";"   $*'   $' ;;;$`' e 'ki½űͼƬת*]]]] $' !!!R'  ' !('У,ݣд 6 ʾA@j#Error'F zk  $'   F  $*'F  F $'F F ;;;$`'F e 'F ki]h]  d Gzj d ' d $`'d d '    'i ]] ;$'  Gzj   $ AdditionInfo=  $'dp tPos= $; $; r'tk(  r t$h'ti(] ' $`' $`' $`' $`' 'iH] ]8]P]h  r$'    $X Pos=$X '   % "\ $X AdditionInfo=$A@ oXM,1;һ_,1;һ_,1;_1_,  %!$ ;1_,  %!$ 'i $KT'һ_KT һ'һ_KTһ˻''&_1_KT˻_ 8 '"91_KT! _ 8 'nXiP ͼƬת*@ ] ] ] ] ] ] A@ 'A@ ;$'B  B $B $B,$. $'  $B $B,$. $'  ; 1 $`' A@Z % $D $F  %(d %$ %(k o *תͼƬ0 !] A@ '  !T'$k0  \$. $' '"  \uncommon.xml$~  \uncommon.xml A@ d  \$. $'  \uncommon'" \uncommon\uncommon.xml$~ \uncommon\uncommon.xml A@ d A@V k k A@o  ]0 ]P ]p ] ] ] ] ] ] ] ]8 ]P ]h ] ] ] x $ . (. Ch (0 e.txtF  B@  //uncommonword % . thisdo ;$'BĿ  B $B $B,$. $' $B $B,$. $'   $'. 1 $`' $D 'ThA@ = Th''8 '$ > $ .Ran  $*'  !  `  % .  % !d  % !d 8  % !d' yk       $;AdditionInfo= ;   $'hd`   $;AdditionInfo= ;' k >  $   'd  'k 8  '8 d  'k $ !L % $A@ cȥ*A@2 A@V % ½ű޸k( t A@ t %!! A@hͼƬ If'tkd = ThA@V kkkx p ZB@8 oX  xmlBC:\Documents and Settings\Administrator\\spz\110101\110101.xmlA@" o( A@ t A@v A@) ԻԭxmlPloadXmlData "C:\Documents and Settings\Administrator\\spz\110101\110101.xml"taoPHAttribute VB_Name = "modSpecialChar" Option Explicit Pub$ Const DocPassword As Sng1t RFolder ^ t 9Repla@ceFlag 3<>klit .#$#(Pos  lSub InsertPic (Para, al Ra2ingl1) 'ʽpic=09.gif,10; Dim iInteger filen vF s9CurFlFor@mFielda rr tmpRpangeAIf =<> "" Then.strPathyMAMsgBox "ȀSet ָ̣Դ·", vbExclamAVn, "ʾ@nExit j%End IfA)Rightp, f3;,밴չ淶AtύAD)Critical((EAΪ" &EV:Infj>:F= GetɠValue>"A,")Fc = get`rentFa-=TypeN(#) (Noth`^Q)Ahis Tum . s$.[). H70KE-R-3=Eacdh In.sQ@7`C1 <= p!>[mA =!RJD%1P? m%Uűֻܽ0-100%^Og&:n 7Q3.Wi,dt*_s .HeѨ/n-?!9q'@Ƭת*\Re#nMix2oAa7]SpTmp.!aC8CPunt0x 'жS""QĸPCa@11®P 3e/0sHChrIn(= `Z$09BK pM0atd%'#lddУ|,Ցaд) @"#Erro) 1` %4f If Count0 > 0 ThenarrTmp = Split(tmpResult, "")N For iL1 To UBd(vH'ReturnMixFlNd5& >(i - 1) & ";"AdditionInfo=_ `k fld.Range.InlineShapes(i).Link^mat.SourceName7o$\*"%Next i.+$place(;;"ArElsze=4E0nd IFu ncjhűͼƬת* Public  Ge t (l As AfField, String)CDimči IntegerGD1N D D= AChrBInn"1S.cA݃$]<>C@JMsgBox "' AnD'У,ځдB|vbCrc al?ʾ(TL1"#ErrorhExit7C%?ae__P e-Yr  qoRe#q,ppiO p@onYByVal @ZBody'a`@ m, Flag BpLong@pLen0bjD = "p" Or! M = (@Ve-$,  -As" (0@/ NodeT`(str ,)-g)# ?# K-U <^O W}}7 O1,z)0;z) }p,V=`:i1Pos0B SubSup( ~PW9M{= DelTail(|, ?!o+ pt?i0 5i 57# A= P1Kda'AU! Q l/3b}S51  Inser@tExcep(#CISStr, ҞStartG#qCcB6wJ!"'Picrc ( , p59n0@Pep -1 Af + C "-H[ue(CP-8@=")csub4 ThisDocumpent.Rt `, Path2\`5od\@ U45Sub Rget(0 Ps",1;һ_T1 Ren (s(BK M_FMRq).Help\);qbstSQ p  ChB!peci@alItem4Ke{numA0ESelect Case LQ$H#%Y31geS' w/k  $˻^~_-# 7_ߡ `w=Ɏ#??5 #' ؉lic Sub ChangeWord() Dim str As StringXTmpArr0ay()thFormField>num2IntegerXitUnlockDoc:= getL  = @Split(&,0 ";"V i0 To UBound(Ck= Mi(i), 1, IbnRev ",") - 1%"!+ !ZtZ~1ZM'}UWReplace~c1", tH&AIfA~F "" 0Then  Thiscument .s ).Resul,GetMixFldC(, InvNa mK1)/Else}(Return/)A"nd If#NXextCCESub '*תͼƬ PubUpdateSpecialData(Optional ByV@filepath@jŵT? = "L>H6ullA3(ρf+f"\e@[rPA= E# Dir( & "\uncommo n.xml<> @)& ,!`DI cwk! ,"BB (iRH)>iFb]j\[6n{YbkZ @Sp!New DOM40Ca nodLsMSXML2.I`NodeLisq$a  SjkAtempC@γ. bue '`y!VtU{P/1-9 t߂Set = CreNObject(p_OBJ_NA MEDr.vali1QOnPars2eNFa9#resolveExterRs?p.L8oad& On Error Go@lC D$= 0.Sel $s("//GweW 5q7aq_ 4 %=I@.|-ϊldϊ=CHoB@VcU:= 1S" 0o:=}S1!j#œLen2  _qt 5DPh)P"*oBpA<} Ck`/.0 gpP?S2p$:iQk ` (.Atbutes(0).T 0 wJ01 )/$el2c Exit ?3nWǞ&7Q& g'< !r$`k#wa;AddiAInfo=" ;'kBm_o R o o ?i {= j +-9>@iI a? /pQʫw unt = tempCo+ 1 End If `Next LIf strVa@lue <>Field Then VsetFo rm&7ThisDocument2.s(X ), GetNodeTg) '*jC" "PSUpdatee '½ű<5xCPoPsStr"< Unlock4)InsertExceptio4n /,j .Range.Start 3 'ͼƬa0= ""S @Else f*"д',GCl:CErr.Clear  Sub   SpecialSCXML(){S xmlcre T@l "C:\s a(Settings\Admini@ator\\spz\110@.bS$CS()LPropGyoFlag, Fa$5LOd'ԭ'loadXmlData/ (timeGetTimexME(< << <+&@  ,i %) %ib;b;i @ @ @ ``6`+hi id   X i x!& id $`  ^  i ) 08%i@ @ ``6`  i`0ib``dxtH " & 0PX`hpx  Nh p x" 0 Hhx    (8@ Hh B px B   (0 " &8`hpx   NH PhxJ  " 8@H`pD84 X|`8 ( 8H PP @p   x @ H X @velementid:ԪصIDš t = timeGetTime]] ]8]P]h] !d'6; 6A@h 6;$' ; A@h ;$'   % 5!!R ^ ǩ' %'ڵԪظʼݸһ£ lʾA@j d  $ '& , A@h $ ,$' 0  5% Zl\5VB@X$  $`9 Z!\$  $`9^ $ 9d5 5!B@^  5%$  $`9$  $`9^ $ 9qkq  ZB@8kq MsgBox timeGetTime - to d $   d d   $'d %kH d 'hi8] '  d $   d d  $'d  d ' i_elementid:ԪصIDš]X]p]]] !d'6; 6A@h 6;$'   % 5!!R ǩ' %'ڵԪظʼݸһ£ lʾA@jd  $ ', A@h ,$' $  $`   %!%!!( kqoMӷ˵ӢϢ]P]h ` %!B@f x!| !! 'ӢϢ $h $h   %(d SQReng_Mark   %!B@^k x!| !! !! %B@jdӢϢ x!|  %! ӢϢ x!|  %! %B@jk !! !! %!rB@^  x!| !!R'ddӢϢ x!|  %! %!!R 'dkX d %!.n b n!B@^ThisDocument.Range(ThisDocument.Tables(ThisDocument.Tables.Count).Range.Start, ThisDocument.Tables(ThisDocument.Tables.Count).Range.End).DeleteӢϢ x!| d %%l!(dqH x!| ӢϢ x!| %!! ӢϢ x!| %!! %B@koKAttribute VB_Name = "modCommonObject" PrivaDeclare Function ti@meGetT Lib "winmm.dll" () As Long ublic Sub NewElement_FormField(ID4Integer, DSTxtTextBox, TableMarkSng, strResults) 'ehid:ԪصIDš ' Mtxb  Dim arrN Allld< iAb DataSourceQXtmp =.elTail ";"_AllnSplit(>,) P=FF6 With ThisDocuAv.Bookmhs(kXIf UBound()) <> .Range.F]s.ct - r1enC%Msg@ " '" && @"'ڵā{ʀһ£!@MvbExmaÁ@4ʾElseOn Error |NN@K/ iK0x ToL9 A}=j(iHHE Dx,@+@ @PLiUs@4,"BlN\(i + 1"OInput.EditType :=w `gu@aS@Qefa q:="s`aataO nÎReplace#B(0) &`J 3.@NumberI-2147467259Gae.Stpatus (21?) Y 3hR<M ..cAdde, wdB&!"4s-a ?)j._5w_5) .(.J./GEnd !#s&IfoA i!SClear?  d- t  &䄁ilFlagg, ByRef Body)GS 4Right(A, Len))fTh Y=f)p\C1 N= #En Deepsiq4D~! gthZ{  While <G 'ahend8 4P/ bobox_Xn n5p+FţQ3s;5tABdkA05\InlineShape5&&npuerr/x X ="Trfp ?0 Bs.OLEsa#""Chr(13)0+_Q16).%.p "eng_q %lon<(/.D ).PasttCpell(@m҂A.TextLoCCAC`>.U})_W,l-  b8c1!#!USub ':WxME (<< <<  @il``>  BY  (@9il@ ר@  %`|`  `'``  8h5il``@ @ ne%`R=`,2` , xi !  % N % 8 b " px"  0 ,@ ,p 4 4 8H 4 4 8( 4`"    8 H` (h" (Hh p    ^    r( ^ $( 0 r@ ^   8 H P X ` h p x "                 ( H  (P x   "    0 P  X x       8 @  H FX    "        ( 0 8 " @ H P X p        L P  Pp x\룬ƣ1绰֤ţ2绰֤ţ]`]x]] l :$+  l1:$+  l2:$+  $ ,$'BH B ר_7$BA@ר_7$BA@˻ǩ_ǩ7$BA@Hk $ ,$'B Bר_1_7$BA@ר_1_֤7$BA@ר_1_绰7$BA@Pk@$ ,$'B Bר_2_7$BA@0ר_2_֤7$BA@ר_2_绰7$BA@k`qXoP]`]x]]]]]] A@ ɾ 6'|  |   A@d  %!!B@kh`SQR_Mark !%SQR_Mark %!!'SQR_Mark %!B@   %B@   %B@   %B@kTotal=2  %A@^A@ l,$'   $;$' $ ;$ ;$ ;$ ; $ ; $ ; $ ' $ ;$ ;$ ;$ ;$ ' 1A@d  $ ;$ ;$ ; $ ; $ ; $ ' $ ;$ ;$ ;$ ;$ '   A@d $($ ;$ ;$ ; $ ; $ ; $ ' $ ;$ ;$ ;$ ;$ '   B@ $(kk A@VA@o(]]]]]]]  ɾ (A@  %!$'R  R  ;0A@fd  %!!B@kxFMR_Mark !%FMR_Mark %!!'FMR_Mark %!B@   %B@   %B@   %B@kTotal=2  %A@^A@ ӷ l,$'   $;$' $  !(0_һ_֤ %$ A@d   $ ;$ $HA@fdX $($ ;$ '  B@  $(kk A@VA@o8]] %! 5 (h N5 N!!(08q0F ComponentMark = Replace(ComponentMark, "", "ӢϢ")I ThisDocument.Bookmarks(ComponentMark).Range.FormFields(1).Result = ""I ThisDocument.Bookmarks(ComponentMark).Range.FormFields(2).Result = ""o80Attribute VB_Name = "modDLRInterFace" Option Explicit ' ƣ:1(<2< Publ Sub Input(ParaStr As ing)) D0im ige rjArrInfo(2)%Tmpay(0)GetFlagValu"eL, ":"{N1P=" 42With ThisD@ocumen hZSt(d @,,E*A If U@Bound( ) > 0enH EvA>FormField .s("רEB_"), E(0F1˻E&ǩ_End If>0NR17"^R= 2|R_,wTa!A s 2+?o>#aJ 6+uTk+Ta2+__ģ@_C +`a +dW!-  !Sub b SQRsttemaA my`!New @ShenQRenC t! FileCobtmpPosLong Orror GoTo lUnlock0ɾ .TotalHB@= 1 "7i < 3m{Cleara$"" & ipElsee`).Bookmarkj().Range.Rows.Dpelet:NexC .Exists(("`_Mp")) 4>=`ey T Star9ghrk"[ (, D + 1)ogeooo@Updater# "b=2"pnXqpBKM_`sURemoveFuYp'P!2&fTP%)@yoz;Zi:p(i-i;F~*=/} b9= 1(5)*";B+0(67891`& 1{?345 lCopnt,@19k:<_| re 8\M)ApQa.Screenb3bP*Fa[P_( J&_'! R/o' Br.CreB'd6% /(Tru9f_ H3`l:`RefreshOcxTLUqFM֐4֐ |my |c/^dt"V'A~/X =(Js[ [.HelpTv$5YbB30#C1ITables " b5I;0H ~5?}(#s#A NextIf ThisDocument.Bookmarks.Exists("FMR_MD")enltmpPos = r.Range.Starw@x7DeleteyK 8Z(, + 1).w6End IfXUpdateTotal B"=2", FormField@s(BKM_Info) Rem@oveFuY'ӷDstrSplit(ParaStr, ",&". i0 To UBound( DbiteFm@(i);jhcC&_һ.Value@(0 EvBG"֤"-1ElsHA2< 32 FillTabled " &0 i, /";aIIf(7True, 1, ' 8O!=Apmcation.ScreenBingFa. @h(R#O"C my.CreFaM Ren Pz?o+` l:RefreshOcxT !cLock` Sub P@ublic  ClearSQR(Compon! As Str@Dim fldL !inshAInlineShapFWithD )C AA EachIn .s.Result>""$ b CL A.OLEAat.Objectos + ' )= Repla ce@ˀ"#ӢϢ! F˒'H$(`" $?;1i 2` ,IShenQingRen_New L5modCreateComponents( modCopyandFillRecord*ncnmodCPCLeftTreeInterFace0T&L (timeGetTimexME( 'n ! ( !vB@x ` b d !vB@" B@  !v( Q @$  !v( o(SPublic Sub FillShenQingRenInfo(strShenQingInfo As String, ShenQingRenID As Integer) Dim tmpArray֤- tmpArray = Split(strshenqingreninfo, ";")$  With thisdocument End WithGEnd SubFԪ  7%lB@H B@ B < __ < _A@H 7%lB@Hû B@ B < _û_ < _ûA@H 7%lB@H B@ < _A@  7%lB@Hxܲڵ B@  7%lB@H$ B@ $ $ ! ( !v( R  B@ p !vB@x_ <_ܲڵA@T ˺ʹܹ֮ԡ  7%lB@H$ ʡֱϽ B@  7%lB@H B@ ! ( !v( R  B@ !vB@x_ <_ʡֱϽA@V ˺ʹܹ֮ԡ  7%lB@H4  B@  7%lB@Hݣ B@ ʾ ! ( !v( R  B@ !vB@x_ < _A@L ˺ʹܹ֮ԡ  7%lB@H2.IX R  B@LDOMNo !vB@x磩ֵƺ B@On B <_ֵƺ_ <_ֵƺA@H  7%lB@H ػӪҵڵ B@ B <_ӪڵػӪҵڵ_ <_ӪڵػӪҵڵA@H  7%lB@H  B@ B < __ < _A@H//  7%lB@H绰 B@de B <_绰_ <_绰A@Hxml"q o X$ȡǰԪкźк.I %&  P (F %&  P (H i` Sub test()+ Selection.TypeText ""Onn NewDocOcx DOC_TXT, "" & 4 - 1 & "_", , "_" & 4 - 1 & "_"End Sub1ȡ˵ B@]]]](]@Total='r;'t/$`  %!'p  p r'v  v p t'x' p v r x v $$'6 i DAttribute VB_Name = "ShenQingRen_New" PrivaDeclare Function ti@meGetT Lib "winmm.dll" () As Longublic Type CellPos Row%IntegerCol End9 HAddFrwQ '²е,˵ı'˹ҪġC㡯ODim Cur] StartTotalX~t8= frm#.Count + 1hisDocument.Bookmarks("l").S elect If TR .ExistOther")@ enu\("J.@z ElseG0 Z> 4(6=Cb3")0IfƖ=A@.z׹ī >`y.InseWsBelr6 = -LfLB6LC CTables(1).(+ 6, `1 'a.g MoveUp wdLine,aTru@! s.MergC?g 2 b85, '=`λcB`Ԫ&B, 7B# _^$Text ? (" & & ")a' 3FormFields(BKM_SQRInfo).Help Ԃ = ; 'debug.A@"Сܺʱh - Spl4it8 '+@=1.58, 3%oa@.48243XRan|geg@4).B.@U:5`# 'ǰIJrcB¡ ڿؼFill DA*}~t5 F(Kv,˃3WidtTh1vS`lCOpalsEB=p4 '7ֳмķָ߲໿ɼCE(M? E”Os.!" Num s:=1,P umn' , rMBeforeb:=FafpHideMiQ ;LLeft Unit:=wdCharacter, c:=23AdjustOveRigh_^O5+W09an , Extend1 ] Q! _BottomA(lig'Uʹ0 '3Sub (TzWit~hpLЖrders(wdB^oAH~.lStyll*0050pKaorb Auatica O A _ ne_ e_ %_ h_ ._ om_ _ Top? ? p? ? @? ? ? s*o o o eo o olor" "A o VPical -# SWhitĝO !DiagonalDown)",eNonX?4UpT@ɀad= ZK RjD .DefaultD)_ 7O rAGW\idth050pt .DefaultBorderColor = wd$WhiteEnd @With Sub Pr@ivate  AdjustW()fSelection.Range.Cells(1).Pref erred.Ty pes Poin ts*IECentimetersToB(1.58JBottomAlign^c FParagraphFormatz. m@gJ1ify !+s.Vertical S Test0[MoveRight Unit:=h,cF, coun3, Exte(Ks@qreni@`, ";" thisdocuAT '@ :C{'A Jm{Fields(Star0tPos 'ԪCG"T D&a.TableB2, 3|).JcLText ""New@ Ocx DOC_TXT$@" &0& "_ , c_'4û_XD@$"_l, 5!+addOLEInlineSha@"/ + KKڵ5; ;X]g[_nSKdftPDayfmn.e>Ce]e s.xcO"C76V) '˺ʹܹ֮xԡg?$O+6 0 ?" WHʡֱϽ_"GU_"Q _"2 ?_"_"2E!k_"_"_"d n_"A_"o]`]ʡrb""% """"j?Do0D0!!}ç Ӫe??5/__QB` Selection.TypeText ""  NewDocOcx DOC_TXT, "" & ShenQingRen$ID"_, ;ZR_&h{ .Tables(1).Cell(StartPos + 5, 5).0ݵ绰<!j9End With Sub Publ@ic Fun Curk() A s tq'ǰкpźx.@Row = |I@nforma(wd:OfRangeNumber)Col xumnF3/A4'@6 test('d@fF 4 - 1Hf '/cGetTotalHCfInt`eger Bf TDim tmpHelprStrȇ`Flag1y2pos G = "0=˄A2y";@= This}u@ment.F`GFields(BK M_SQRI).= In(1,, Lp2d.Val(Mid( h, + Len( , " -") SME(< << <H T  X%`" o` $   %`" ` &   x%`( `  %`" =`boo&" (&8` x "( " (08.H x  ".*(Xp]@]`]x >!!L'" >!!d; >!J!0'W "  B@ CreateFMREngInfo'oh]]] >!!L'" >!!L  >!%' "  B@ o ]`]] x!!L'( x!R!d; x!!d;'( Debug.Print NewSQR_ID Debug.Print FldStr (  B@$o(]]]('"  frmFaMingRen.ListBox1.ListCount 999;False;'˴ֵַ "  B@ oձAttribute VB_Name = "modCreateComponents" Publi@c Sub tFMR() ' Dim my, As New 2 _ID:Integer:fldString3= frmFaMRen.ListBox1Count0F -txt.Text & ";" OoptNoGongKai.Value'g.w>me, 8'EngInfo End _SQ ](c - 1, 3)Q@?RLSQRLC G. ShennQ ER Addr 'ebug.PrintJC%FC=my D@X@AÇXBIO(6?zMR+5z1 'z z"999;False@x'ֵַE svs(H  @ }P"p R KQ_H$0TextBox1(2<Label1x1P4 HoptSupx1suflag=0;le4 HoptSubx1suflag=1;le$4cmdAddx1 $4cmdQuit1[ , 1XCheckBox1le \j~QNxME P<< <<<:<<<hHhH $hNH #hHhHh"HhH hHhHkhH ^ hH`` ` ` ` ``HLH L+8,)X`%i ` `d`  0) (%  pii  pi 'iT0$hiR$h h % `ii `@h 7 8 %@ piiTiRi   N8!  %`%@ `ii%`@ 3 N8 > C %@ +( i6) iPos)`v En`x` +  h i6ii\ `v`x` + P  i6p i i `v`x` ` + X x i6% ^8 i  ) %`v`  x i  6` `~` ` ` ` ``  H )8 %`6``+ i6 )8 %`+ (i6Hi~@< ``>+h i~)80%` `6 Z i  % h( )H%` @)%i i `` +$ )%``+ x )8@%i` 0)%I ` `   pi ` +  i i ` X%@ `   i   &( H"h&    ( H h *p,"8 X&x . B H XP $ J( 8x   ( 0HP hx :0"H*p $ .    : ^X 0  " $ HPX " `h.  "     0 H  `  p x   "           L0 4 2 &  8 @  P `  x "         "        8 P X p           (  0 8 @ H " P X ` h p           N X x   B Zpx  ( B (8@H P`xv B .@HPX `p8vP B X J` (&( "Hp "  B ( "0PX`hpx& @* P hFB(F0x  >, @rPL @NP  @<(@h  lH  h p<  "    ( B $0X` x    B (@ &` " B   (08XpB   "   0@H " Ppx   & $ @ H `   &  B " ( 0 8 P X  p     B "     ! 0!@!P!X! " `!h!p!x! !!!!! ! ! !" " ("0" &8" `"p"x"" " """"" B 0"### # (#H#`# x# ## # # ## # #0#$ $ " ($0$@$P$]$2 ȫ]$һ_]$һ_Ӣ0]$һ_H]$ר_1_`]$BIOx]$1_]$7_]$8_]$һ_û]$һ_Ӣ$ Total As Integer 'Ԫصĵǰ`^ Ԫصı(۳)^8Ԫ¼ı^PԪ¼Mark$ ^hԪصMarkBody!\^" ԴMark CmpPara.BaseCount + 1 ThenW tmpPos = .Bookmarks(CmpPara.CompnentMarkBody & ComponentID).Range.Start - 1) .Range(tmpPos, tmpPos).Delete End Ifqi 9 6= wdPreferredWidthAuto_9 qo0 G|j  %!%%l 5(dq8o0]P  % 5!  Z5VB@X5 T R$`95^ T R$`9^ ZB@8qqxopp]]] ; A@h ;$'h  %! h5!R 5!R @hXF MsgBox "ַ", vbExclamation, "ʾ"- Debug.Print .FormFields.Count - 1+ Debug.Print UBound(arrFieldStr) Debug.Print FieldStr Exit Subk 5 !lG $h !n(0dFld.Result = arrFieldStr(i)  $hX A@k8  ' qo`] ]@]X ; $h' ;$' k  %! N5 N5l5!!'   $'  T R$`5!(  $ 5!B@^  'kkqqop]]] ; A@h ;$'   %! N5 N!l  'k  H MsgBox "Ͽ", vbExclamation, "ʾ" Exit Sub  @ Xkh' N5 N!l $  N!!(0  'kqo`NMһflagȡӦֵdatasourceʽFormField ("_һ")]]] '  6 'v v v 6;'x 6 v x v $'ki(dһflagӦֵ]]] ' PosMar 6 'v v 6;'x 6 v  $ \  6 x$' ^<Mid(DataSource, pos1 + FlagLength, Pos2 - pos1 - FlagLength)i qһflagӦֵ] ] ] ] ' ָǬ 6 'vFi v 6;'x 6 v  x v  $$ ' 6 v  $  6 x$'b<Mid(DataSource, pos1 + FlagLength, Pos2 - pos1 - FlagLength)rki  C InitNewComponentPara.Total = GetFlagValue(DataSource, "Total=")ļ 6 basecount=$ ( 6addedrecordtitle=$ ( 6addedtitlemark=$ ( 6componentmarkbody=$ ( 6 sourcemark=$ ( A@ 6oldid=$ (KTih  ] ]  5;'v 5 v$' 9q o 8  %!!B@ļi  ʼȫcombobox] ] ] ] ]8 ]P ]h ] !2!d' HKTW;̨,HK$`'A@ $( InternationalLangualeLanguage7b!0 $5 A@2 7!country=$$'   !country_ 5%^  '    country_ 7!! !R  $country_ 7!%!!A@ d 52!d $country_ 7!%!!A@k kx  7!country= $$$  7( 7! province=$$'  嵥 province_ 5%  '  province_ 7!%!!!0must province_ 7!!%@ 54!d $ province_ 7!%!!$'~kcity_ 5%  ' 54!d $ ~$ city_ 7!%!!A@kXkP G 7! province= $$$  7( 7!city= $$$  7( 7!type=$$'  !type_ 5%(  ' eInitCob1 .Bookmarks("type_" & i).Range.InlineShapes(1).OLEFormat.Object, Mid(.txtProsperType.Text, 9)  !!d $type_ 7!%!!A@k  7!type= $$$  7(q8 $('" o  ] ] ]0  8!0' ZB@8oH SرʼValue] 8!0$HdyֻҪ 8!0',rdp 8!d'kX 6 8A@2@  8(0 ' ZB@8& i ]h]] 6,$'<'*  <6 $<$ ~.Boo $<$,' kp   $ ,;,  $' !Vki]8]P 8B@8 ~zk !4!d $'6& 6 ~$ ' '* 8A@ixh]  !  ! (0J k( i]P  5L  ; .ListIqohZƴ-1ƴ1 C]](  '5G|j 7' d@555L G|j' 5 k  A@`/ 5 5  hs(3' >5   >7;' >   $'aĸ   A@=; xqo@Bɵַһ]] 5Gzj5' 5 $  7;'$ ; $A@hqHi@Xɵַһ]`  5   7;'  ; A@hqix]] !5 ' 5 ' qH   $ 7(d Z!\ $ ( ZB@8kd .Range(fStart, fEnd).Text = " " (kqox0]  %!!'   %B@Ho(e#ĹĬ2бɫɫdzɫ](]@]`]x;  $h;$'   $  %5d9' dX9k@q8   ɫΪʵд l A@jki  !( oAttribute VB_Name = "modCopyandFillRecord" Public Const BKM_TotalCobs As Sng" '  FMRInfBo >һB_|7Eo y:Ӣ >SQv;aZDLר _1_BIO{ uYXQIU1_ SQe_DS_Count74FJ 8FuYeAddedx[û?jyyDjjTypemponentParap ' A"Integer 'Ԫصĵǰ aA BaseLL A (۳p)CB:T0itle=B ıH a Mark A  Comp6ABodyM AA Sourc@4mPC Դ ID!(OldID)ID First@CellTxM'A$,{ԪD2 A% End : GlobalglbHi`[FHMErr$&EFunction New&(CmpFۆ,J)!`' J`¼!ͬ,ͬĴ1A0@"ģڶ@һñȻҲɲ@ iֱӦÃ3Dim D$oc(PoLo ngGTabl6et!IF!PageWith This umni.Bookm[s+.0R).Range.gIfJ.- d".gt= 1eng= $ aH-'λ#!a#(,&).Te[= Chr(13) +#0"F.- 1Len& a1),F$F If<<  G+Ot!8, s).Past#QEls;#@"P&l"@a` ge(q0_(@_(\(x5@"6s.coxg [b1(@!. +=!&U Set Cur  ( :g* )+Tk 4t13a T4oragraphsqp v] 5E iAutoSize JO(9M 1ChQOsg8* '>Ѯt2== 9 A`rks"T]_|^.р(2,  $U97H!!*" >_a1. V%Oi Start pdQ1/(v).DeleqNV 1Sub &("$Obj$ a .PreferredWidth!/wdkPe`'= 95 p \ .(M R&.qv6 !*c* Exit 38*O*B*UI* **d1 ReA ldsIng, Ra,1kflFormFieldW- Each In .Range.FormFields Wit`h fld TOn Error Resume NHextJ.T,Input.EditType wdRegular6)dnaN=Wpl ace(., @OldID,fwID)5StatusR ;Af@.Clear .End t Sub P@ublic  FillInMPark(NoAs Stringn, oDim i IntegeK arr+K  elTail "<;"5 "LSplit(, !€ThisDoc@znt.Bookm3s4).‘If UBound() <> Ț.c@t - 1 ThenG AReA5Preserve ( @+' MsgBox "@CvbExclamation<" DebPug.P@kt /C?/ @X u ExitGIf!} Eac In) Fe.8= 7]aCheck (.Value D)0idCa0Else+ 'Fld.ltbv W, C`\IH(i)Mti!A i i + 1gvvReAtCobsv‘ @vs$*Op!Kal ` !~s` \insh#line0Shap)tmpC!2% ;sI m"",kh`$D(HH, ( RmeX"XIn&"1C>we %\5+= .OLENat.ObjectB Left(A, Lend)?' 0ReC |a _=jCᇷ.Add5?5 I 1!9 Q>Suu 9tcob23tg40 9tc2= C21?1t?1 ]?1pe<1@!Q/@=0QTWl |i{Zkwxx"x#pqc (" 88 ,0cq_G_Gq1~aR^Et X qAka 4S:3FuncAh GetFlag"(DataSourcehС) ' һfȡӦֵ(ds0ʽT ("_еһ"4q60pos1qPo 0c 1;t$Mid(, "+ , --D9q%VPu__gNews) µS4ʢ * 1#`bc/YY9r}!~ && ) '.BS(=|_=?PE Step As Integer = 1)xString 'һflagӦֵ  Dim po s10Pos20FLengthEnd Function PublicXitNewComponentPara.lÏ 'InO.TotaZl@BGFJD"B=gBaseCountb@ cA @fedRecordTitle@addedr t Mark݂m [ndBodycp b{ Ci P>NsBo IDo0ldidTSub Update=E("UB@R'S, fldForm`Fieldd~ڙtmpcyWi [.HelpText,  = zh &$#!aD !SubqwDelTableRowsIna8(xNamb྄ ThisDocumAJ.Booka9s).Range.A . eteCp† Cob(@ʼPbobo~x0@cx'ӇPrvc`D@'=9rya; ProvincO!CDitTypsiqrstriA= +txt.DCReplace(GHK"TW;̨0, 5Ap pa.Screen`= Fals3HV1UMultiC`olumn"f.Custom perties("ArnBalL!!ualesge").j, 9), .ʹ7Sv_.9s(BKM_$bs)1"\ryPA  i 21 To '5Wf w-.E0xist _" & i)pePp9pE&k'+ 1{If (i >= 4 bAui "" _l4 &>mpM")TrTh>" Dg1}it5-[-66!C -Lplu(!oeLo=0*CW&,3q`I?04 o|s(_H_H_ ?xt?44P!?/8h/?E":?oDG= =q? ThisDocument#,REnd If rN iXPu4, Trim6(i)E&WithC#ApplicatK.Scr@eenUpdngAxrue  Sub Pub@ @ DwcF(Zj As@m boBoxeDim DataSourceStringAiIntegerC On Err@or Ress UC=A@#.C@.Clea4FuncA55(/,DA'Co;6 'رʼ#Y=rNot IsNull* rEls6bOgd"U!:MultiColumg00HC! Gt"6$4%3OÆ5City6@PrvcIDg4)G2cobLArrayPa^jJSSjt,"b0UBd("%@f Left(i), 6) O"o&)B 8) ","c eřIURight0, 1 1";,, n ) -@ CECEN_~( C|{ @[DS1IQ@AcĐ$(ContarAPǰ~ctlqArol3EacDh In I.s.Tag <>! }2"/"Cf%pQueueC(Ls~t q {pDQx #G A.a.G (i, 06|i JY: S|XularUpDown/ , MoveStepq C4OAmPonBodyo) 'ƴ-1p‘As)&*je;6A*j{aa`C1FillsI|nM*2, 5 '|33Mreate4Q04xp2ɵַһ31CQCurC-2thD_+h) g,E& Cfr0$otrІ*(,& "I" !DelTailAHO% tr1'|st oodo ڳ With LstObj For i = 1 To .ColumnCount - 1CreateRegularLis`tStr1t.& .F(Index, i) & ";"UNext iDelTail$, V+HEnd  Function Public Sub EvaluemField(Fld| As , f@ldTxt)+Dim fStartLong 4 On ErrResume f7.Range /= .3+ 132 ?(-Th isDoc:nt Ifg <> "" The:;C#(!?).Ta= Trim(CE :.Number0 ,A).Selec. Chec@kMustI{ntainer(OcxCoa^d`os@a$A 7n 'ĹĬ2бɫɫdzɫ,akiaIn0tege>ctFlrola@rrChilDia9Type 0K PSplhit(Ċ(`O)>,8 \o UBd( OBq&(nt`sl(i)A@jnua.Back = &HC0C0FFe:boufiA 805 JdceMsgBox "DΪд", vbExclama, glxbHi%e4CtrlbShade(BVisib|le!OYD4m&s:.bd +Sub DM=xME(< << < ` ` h*` ` ` p`z` h H_h Hh Hh H` H` H` H` H` H` H` H` H` H` Hh xĵh h 5Lh     P i i 0i ( 8_@ 't@ '`!L` ` ` `   xi ` % %` `   `i ` % %` `   Hi `L `N  %  i ` H% h%` `   p) %il==` ` @B 0001+ i 0007``  + ` @  i   il @B  ʽ%  8 ) X ` %I KT+ Ui  %`  !%` ingD` )`   3%` ` All"` ` ODY`   p  ( 08@ H h&<R "x8&.D0"x* D"HP`p.x. "   (0 "8@HPX`hp x"N (0$H>p       ( 0PNpR@ HhR   8"X  "     ( 8 P `  n      0 @ X p   D      V P &h ( 0 0 , H P  X `  h           "      (  0 $P  x    .         &  H X x(."  (08 @$`   0      "0 X 6h (.  " (08@H P` x     "  ($H p  0      8 H hx&, D" 8@H`h $" @P X `px B ,  00` hx B    D"  (0&Hp " "08 B @HPX`hpx  " (08@H P Xhx"  (0@`0x       (0@`0p      08@P2h $ $(x]]] 0]H]`]x]]]$marks14_ļ嵥]$marks15_ļ嵥]$ ļ嵥]$ ļ嵥]Dļ嵥_ļ ]D/ļ嵥_ļϢ_ļ_ļ8]DEcode=;nodepath=ļ嵥_ļϢ_ļ_;P]Dļ嵥_ҳh]D+ļ嵥_ļϢ_ļ_ҳ]Dļ嵥_ļ]D"ļ嵥_ļ_ļ]D8code=;nodepath=ļ嵥_ļ_;]Dļ嵥_ҳ`]Dļ嵥_ļ_ҳ] ] (new _ļ] @] X=嵥0,1,2,3ļ,4ҳ,5Ϣ _p$ ' Ӭ$ '   7!%v!!!R'  7!%v!!!R' taq o . ' ' d ' ' koP]]]]]]]  On Error Resume Next ;$`$ 嵥Ϊ" "  6 ʾA@j|kA@' A@ ʼ $ $Ƿµ嵥ݣ 2 ʾ$j  A@ Total=0  %A@^ A@ Total=0  %A@^' ' kk; $h;$' Ŀ !%Ŀ %!! Ŀ %!! %B@k8ί !%ί %!! ί %!! %B@k===============new100203 !% %!!  %!! %B@k  $ ,$' ===============new ItemCount = 0 $ 100001  $ $' kPkH $ 100007  $ ' kk===============new$ X ' A@  $ '  $  "Ŀ'$ 'Ѿ дڡ ѡӦĴʽ ! ( B@d .msgCoverKTmsgCover'* msgAddNewKT msgAddNew'*msgQuitKTyxnp= thisdocument.Bookmarks("Ȩ").Range.Deletek  *msgCoverKT %!%v! $ X A@ rstrQingDanInfo 'иǡ(1) msgAddNewKT $ X A@ 3strQingDanInfo" Case "msgCoverAll") ClearQDRng SQFILEBODY) ClearQDRng FJFILEBODY& AddInterFaceFuJianKTynd $ X A@ kx  A@  A@  A@ ' A@'"'.o8&ί]]]]]ί !% %!%v!5 '  ' ί(    %(d5 '   %.   !%^.  A@ļ嵥_ί (^5 ')   %(d5 ' qpί %!B@^d@ί %!% A@ko &]]]]] !% %!%v!5 '  ' ֤ļ   %(d5 '   %.   !%^.һ  A@ļ嵥_ (^'5 '6 / ThisDocument.Range(tmpPos, tmpPos).Text = ")"5 ' qH %!B@^d %!% A@ko]h]] 5$( 7!. 6 !'L Fi %v!! 'N L N  v L N 7B@ k(5$( qo]]0]P]p]Ŀ !%gL %!%v!itNe5 '.T  ' Va ȨҪ    %(d5 '   %.   !%^.dtit  A@ ļ嵥_ (^od5 '    %(d(5 ' q Ŀ %!B@^dP Ŀ %!% A@$k o =嵥0,1,2,3ļ,4ҳ,5Ϣ](]@(2) ]X l,$'BP $B'  5!R 7A@5 5code=$BX $ 9b$B95$B  %($y(3)k q counq o p= 0Ϊļ嵥1Ϊļ嵥]]  $ '  7!%v! 5!R  7! 7!code=$;' k q qx ip  KT ' KT ' n8 i0 =嵥0,1,2,3ļ,4ҳ,5Ϣ ` ] ] l,$'B$BX$ . >AddFrame! BA@ ox  %7 %$ A@5$ $`9_ q %$ %$ A@qo ] ] ] ]8 ]P ]h ] ] ]   A@   KT  ' d ' k 7!%v!. $ ' ' ' ' ' ' KT ' ' d ' kp 7!%v!. eIn ' ' ' ' ' ' n 7!! 'ext,5rB@^!q  ' ty .  7(d!  . ' 7  7!%^.   $`9 $(9  $`9^ 9  $`9ZB@89q !!'  7(d  '  7  7!%^. KT ' ' KT ' ' n    $`99  $`9^ 9q !!' ҳ 7(d    7!%^!.  qX KTTotal=   %A@^!VKTTotal=   %A@^B@8nijAttribute VB_Name = "modCPCLeftTreeInterFace" Option Explicit DimistSQCodes AHs Sng6F"J6Pub SelectedItem :Tota8lSQVgefrWFJP@reMark RCurRange(ieldcUConst SQFLAGMARK!6s14_ļǘ嵥FJ5_ӕ;ILEBODY;73rivaA8DNAME_)9STATUS-ϢMHELPc=;npath=E ;PAGEBҳABN&Ah uhQ%J{2b 2b2 0 0 0o%/Quit0LstC BBoolean {Count!SĔ 'new&ZW0TSBHWBack 'A0,1$,2$,3p,4,5a![ qSub InitPara() $ Ex(= Get"(0i %l1dWith ThisDocumen a⨑= .`%km(G)..Ce lls(1FormF!s.c)/ 2 F$ a0 Or %Th,P("ǷµqRYesNo + vbQues9vb0LqClearQDRnga,1Upd2I "b=0PK.gG!Jile_DS_\;3%`{`1 r(`M(*aaStart - 1,? f7@0).y et.Y11- rks ί? y?  7_ rq"> 1 '= 100203;ัůo c 7??.32 i*0ro UB0d(&,951oc-V(ia,,e,==ray5#In0f((101>|f 1) > 4|2= Val1(5)(ۡ U> ? 2 70 > 0 Then If UBound(tmpArray1)0 > 4jZWTSBH = Z(5) End LIf& '= new,TypeCodeaCStr(0)gReturnPara m1,:s7 e@llName]RangeMark 1#Destinat ('64InF12(2)ChkAll7FalsefrmMsgBox.lblInfo.Caption"Ŀ'H" &3)"'Ѿ Cx дڡ" + vbCrLf@_BȀ"ѡӦĴʽ" *ShoHo E8O Sele`ct Ca?BOptA"msgCover edItemAH AddNew+ FQuitExit For=ȃ3 '7thisdocument.Bookms("").´.DWtH a 0cC(91Sb st0TDn%aUs(1D, }0(ij'strQingDanb 'ЀиǡX6A@@P2+#Y>6-ClearQDRng SQFILEBODY lFJ| InterFaceFuJial !m"QsQPAay'2ONext ic`vC`t"LAGMARK ! @ BackanLstCli= # Lock@Q cA$Bub Pub Sub C@(BkmA s R) '׀ί DimAPos !LongFl0dObjmFieldcGStartk b 3p.Bt3PCU ")h Withjiso<e A=qRatnge As R"a With ThisDocumentXh.Application.ScreenUpdng = FalseXSet t mp:.Bookmarks($Name).3RngStart/:.End  Cells(1CJ- - 11Idf U<> @Then#mE(,).DeleftkIfTru Sub Pub  AddItemCount(Bkm̀String)8DimPos Long FldObj FormFielp]@+JT v.Exists("")@j \ΘH>twC-kAB= }6z=EM+Ɇ 2B (, ).TexAvbCrLf & "Ȩ "j%KDz5,.F|s.A0, wd1InputĒA?Evalue&r , Q .FtusD#"ļ_"" 0" l "aT@n p ""`~!)Z@* EZ!EJ-(J 瞦bÞ6-!'+0,1,2P30,4ҳ,5 ϢrivateCoveru<(In ƃ, Para`!KiInt0eger"aTy`peCodC '(2(TmpAprrayC`S t($, ","F = & O# A 0F@PutFlagV%n(h "c'=", C ) .Resula3T$ >N4? "t '(o +D1NTiS$qD*Func Getw*!i()( * '0΂H1Ϊ!0I*?,QR0M`wc"=c{= ReturnD`estin 7("g./pW.ds..//-K/7*"",E*-q-#Ès(i).)";,]!!y1#5!#b=%k$%#Sct Case?b0 1kSQFLAGMARKe!FJ åccccANewbac 4HT"2_!?`3*=Q>DanFraPme(C0((0))) '{Fillm \j2IJ ?AV , ByRefbtBoDU*Y?P =8Y;1)z"jYf2f4/ sx/ d_i !) f'r;',araX&a)Insert?խCATotalQ$A2?0RIDOppvQStr`-?Body jP PWuRtring InitParahWith ThisDocumentXSelect Case TypeCodne:B40 &.If TotalSQItems <> 0den*.PreMark = SQFILEBODY & B88Els JNLA GMARK?nd If Set InRangeH@.BookmNs&(M&)..Cells(1%ajBody lt", H OwnTruL.c'J C $P !  Enabled/Fa/Fh1c"c0.'(2%H" G + 2 _Fld)P/#Bl(+&/#,# 7$lPAGEl$C!OK ?gL{ 1!LthGAO4ppO4\O45O49.p*. Q8" s. .\Kt9"\ҳ.Q,ZQDanQFr3GW`Z)7a1^(M&2IC[ ++ Update2 "b="@O,Y!Ip8Rߑal) )FunctiofrmSupqqqfoCompObjaH(/5"[SO , ҉hQ[le=5"[SO,Fa1am Nh5"[SO,Fa0h Nh5"[SO(nx [{u"[SO( Q{u"[SO<F a0h\ [Q[[:N5"[SO Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSup Caption = "½DZ" ClientHeight = 1950 ClientLeft = 45 ClientTop = 435 ClientWidth = 4980 StartUpPosition = 1 ' TypeInfoVer = 13 End (H  (@g}-R KQ_Te$#Frame2:O>VBFrame#frmDataqqfo$#Frame3:F 8H  }#WcobCodesR KQ_O,ptxtCobTypeEvents( txtPrvcClickO0txtCobCountryClickg  T@H,;< Private Sub SendKeys ("{F4}") End Sub5"[SO@H,i14 n``qqfo8CompObjo~< Private Sub 3uN_vQN3uN<ID>_wꁻl:Sv^ Ty_Click() If 3uN_vQN3uN<ID>_wꁻl:Sv^ Ty.Value Then comboboxProvinceChanged 3uN_vQN3uN<ID>_wꁻl:Sv^ Ty.Value, 3uN_vQN3uN<ID>_^S Ty End If End Sub5"[SO@H,< Private Sub 3uN_vQN3uN<ID>_VM|b;`@b(W0W_Click() If 3uN_vQN3uN<ID>_VM|b;`@b(W0W.Value = "CN" Then InitMultiColumnCob frmData.txtProvince.Text, 3uN_vQN3uN<ID>_wꁻl:Sv^ Ty Else 3uN_vQN3uN<ID>_wꁻl:Sv^ Ty.Clear End If End Sub5"[SO n``Microsoft Forms 2.0 Emb     !"#$%&(*,-./123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXZ[\]^_`bcdefghijklmnopqrstuvwxyz{|}~edded ObjectForms.Frame.19qDH  "}z*; TCQ }Q萄vSRSpeR KQ_ ( <txtSQRFldb,( txtSQRCobb(28Label1es,(28Label2esO(28Label3es,(28Label4es 4(28Label5es,( @ti21 n``qqf;o CompObj'oxtDLRFldbe,( !txtYXQFldbe( "x txtYXQCobb #,  @H,vQN3uN<ID>_Y Tb Ty,3uN_vQN3uN<ID>_Y Tb Ty,,,,,,;vQN3uN<ID>_(u7bNx,3uN_vQN3uN<ID>_(u7bNx,,,,,,;vQN3uN<ID>_W:SaNWSLrS,3uN_vQN3uN<ID>_W:SaNWSLrS,,,,,,;vQN3uN<ID>_~%@b(W0Wb%N@b(W0W,3uN_vQN3uN<ID>_~%@b(W0Wb%N@b(W0W,,,,,,;vQN3uN<ID>_?ex,3uN_vQN3uN<ID>_?ex,,,,,,;vQN3uN<ID>_5u݋,3uN_vQN3uN<ID>_5u݋,,,,,,;5"[SO@H,,3uN_vQN3uN<ID>_3uN{|W,,,,,,;,3uN_vQN3uN<ID>_VM|b;`@b(W0W,,,,,,;,3uN_vQN3uN<ID>_wꁻl:Sv^ Ty,,,,,,;,3uN_vQN3uN<ID>_^S Ty,,,,,,;5"[SO( 3uNFld5"[SO( 3uNcob5"[SO( NtNFld5"[SO( OHQCgFld5"[SO( OHQCgCob5"[SO$@H, N)RNt:gg_NtN<ID>_Y T,N)RNt:gg_NtN<ID>_Y T,,,,,,;N)RNt:gg_NtN<ID>_]\OS,N)RNt:g g_NtN<ID>_]\OS,,,,,,;N)RNt:gg_NtN<ID>_5u݋,N)RNt:gg_NtN<ID>_5u݋,,,,,,;5"[SO@H,(WHQ3u<ID>_(WHQ3ue,BlOHQCgXf_(WHQ3u<ID>_(WHQ3ue,,,,,,;(WHQ3u<ID>_(WHQ3uS,BlOHQCgXf _(WHQ3u<ID>_(WHQ3uS,,,,,,;5"[SO\@H,D,BlOHQCgXf_(WHQ3u<ID>_(WHQ3uV+Rb0W:S,,,,,,;5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmData Caption = "UserForm1" ClientHeight = 2460 ClientLeft = 45 ClientTop = 435 ClientWidth = 6615 StartUpPosition = 1 ' TypeInfoVer = 103 End CompObj)aVBFrame+"PROJECT0" frmMsgBoxqqID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} Module=CopyToEachDoc BaseClass=frmAddDaiLiRen BaseClass=frmData BaseClass=frmFaMingRen BaseClass=frmShenQingRen BaseClass=frmYouXian Module=ListHorizantal Module=modAddoneField Module=modDya Module=modFaMingRen Module=modInitData Module=modPub Module=modVerify Module=ShenQingRen_New Module=tmpmod Module= Module=ģ1 Module=ͨģ Module=modCommonObject Module=modCopyAndFillRecord Class=FMR Module=modCreateComponents BaseClass=frmBiology Class=BIO Class=SQR Module=modCheckPID Class=DLR Class=YXQ Module=modInterFaces BaseClass=frmBuzhengNR Module=modBio Module=modNewElement Module=modChrProcess Module=modCPCLeftTreeInterFace Module=modDLRInterFace BaseClass=frmMsgBox BaseClass=frmAddRecord BaseClass=frmSup Module=modSpecialChar HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="4F4DE3B67D4AC84EC84ECD53CD53" DPB="9E9C3207CE1900360036FFCA0136435F95664CFE1313C8BF54660A4880E1C0327094106AD05BCD" GC="EDEF41D4DF22E022E022" [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 CopyToEachDoc=0, 0, 0, 0, C frmAddDaiLiRen=0, 0, 0, 0, C, 22, 29, 858, 497, C frmData=0, 0, 0, 0, C, 66, 87, 902, 555, C frmFaMingRen=0, 0, 0, 0, C, 88, 116, 924, 584, C frmShenQingRen=0, 0, 0, 0, C, 110, 145, 946, 613, C frmYouXian=0, 0, 0, 0, C, 132, 174, 968, 642, C ListHorizantal=0, 0, 0, 0, C modAddoneField=0, 0, 0, 0, C modDya=0, 0, 0, 0, C modFaMingRen=0, 0, 0, 0, C modInitData=0, 0, 0, 0, C modPub=0, 0, 0, 0, C modVerify=0, 0, 0, 0, C ShenQingRen_New=0, 0, 0, 0, C tmpmod=0, 0, 0, 0, C =0, 0, 0, 0, C ģ1=0, 0, 0, 0, C ͨģ=0, 0, 0, 0, C modCommonObject=0, 0, 0, 0, C modCopyAndFillRecord=0, 0, 0, 0, C FMR=0, 0, 0, 0, C modCreateComponents=0, 0, 0, 0, C frmBiology=0, 0, 0, 0, C, 154, 203, 990, 671, C BIO=0, 0, 0, 0, C SQR=0, 0, 0, 0, C modCheckPID=0, 0, 0, 0, C DLR=0, 0, 0, 0, C YXQ=0, 0, 0, 0, C modInterFaces=0, 0, 0, 0, C frmBuzhengNR=0, 0, 0, 0, C, 176, 232, 1012, 700, C modBio=0, 0, 0, 0, C modNewElement=0, 0, 0, 0, C modChrProcess=0, 0, 0, 0, C modCPCLeftTreeInterFace=0, 0, 0, 0, C modDLRInterFace=0, 0, 0, 0, C frmMsgBox=0, 0, 0, 0, C, 44, 58, 880, 526, C frmAddRecord=0, 0, 0, 0, C, 0, 0, 836, 468, C frmSup=0, 0, 0, 0, C, 22, 29, 858, 497, C modSpecialChar=0, 0, 0, 0, C (H  @}a$; R KQ_`$4msgCover (2(lblInfor>(14msgQuitr( 4msgAddNewai $  Image1tr,( XchkNoAlarmai4( 8cmdCancelmai/ , 14cmdCoverAlli fYoa2CompObjaVBFrame (fbc͑ Yu"[SO 5"[SO( Ǐu"[SO(:_6RmRu"[SO$iR KQlt~ BM~ 6(!"H с|tԽĉrda:d>*ԮvVDӢpߪr_5Ԧb;'\̡֡n^7#Եc?-eຑϥաq`;(ȭhI=~P5Ӳ澔ҧר|[4 i`ɩxpy]PtR=e<%tJ1q̪ÙˢΥc5J"_>0y_SԲyq]F\=~_y{ͭƟÜԯlb?{K(EV/sWJϣhVgĪĪǦʪ̫ӲŸԭͦ۸ϯˬť`qC&O! Z3#ndӝcƭíʮӵغťձٶ۸հ׵̭ʭ˩VT'O'y_RԧzŰȱֺǩԳҰرЩʤʣЧͧձšںϱΰosC$K${aWԱŨ®δƫ׹ϟ|f'P_+](N0ڨܸӯâӵͲƠxm?"P)rhԿǿ°̷ʱٺ>.> 0Cض߿߼ڶǧԷͳsR$`<,Թʺ̸̳ߟdB*~i޼޽ܹǪչؽ|VI i_ʺɴܛa>0ʗtݻɬ׿Եi; a@2ɼıޛa@0ȖuعūƫmQR(ϹͿоbA0ȗwϴưضW-|ɷƸaB0Șy̵ƩU-{ȼcC0Ț{ζϷV-{¶ɾlM0Ț|θӽW.{G&0ɜӽԽY0÷ȟ,|  m zһgE5˼療io7I+O1m3OǬeZr]ŌuhǝIQɇc묑|b/߆N/Ԯ­Hcp˪xR=;=Wö»񻬡Լ<F 0amdkTǑ(uv Tvd\O5"[SO( S maiu"[SO(fbchQ{u"[SO Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmMsgBox Caption = "ʾ" ClientHeight = 1920 ClientLeft = 45 ClientTop = 330 ClientWidth = 5280 StartUpPosition = 2 'Ļ TypeInfoVer = 15 End  @ҋB `":5j(6(H9368265E-85FE-11d1-8BE3-0000F8754DA1U\gҋB ` ҋB `PROJECTlk$PROJECTwmTfrmBiologyqqf0ҋB `Kѽj(6(H9368265E-85FE-11d1-8BE3-0000F8754DA1@2iw`8#Frame1x1txtDePartment;txtLocation;txtDate;txtSaveID;txtClassName> oi03 n``qqfDo|(H  8}4 < cmdDownr" Ny -Nyai$<cmdUpwnr8 14cmdSaveAllai>OX[hQ4 < cmdDelnryd -Nyai$ListBox1>, , N yDr{w @"[SO, N yDr{w @"[SO(O X[Dr{u"[SO,y dDr{w @"[SO`L5"[SO  n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q(H  G}(,4txtDate1must; q(2<CompObjoi250  n``qqfo Label1e1(2< Label3e14 0txtDePartmentmust; ,( <cmdAddNewmen$4cmdClear( <cmdModifymene$ 4cmdQuitrk"0  0txtSaveIDmenmust; ( 2< Label4tr 0  0txtClassNamemust; (2< Label5tre(0H lblAlarm (20 Label6rm  H( 5"[SO , OυUSMOaiN>5"[SO , OυegaiN>5"[SOH(&5"[SO,e Xx1{w @"[SO(n zzx1{u"[SO,O 9ex1{w @"[SO( Qx1{u"[SOH( 5"[SO , OυSaiN>5"[SOH(&5"[SO , R{|}T TaiN>5"[SO,~reQFh:N_kXy >5"[SO(Y >5"[SO n``Microsoft Forms 2.0 EmbCompObjoCompObjaVBFrameMfrmYouXianqq(     )+ !"#$%&'C*,.-/1024356798:;<>=?@ABDGEFHIJKLNMmqPQRSTUVWXYZ[\]^_`abcdefghijklnopruvwxyz{|}~edded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmBiology Caption = "༭Ʒ" ClientHeight = 4215 ClientLeft = 45 ClientTop = 435 ClientWidth = 10305 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 34 End (H  @ }HR KQ_te$#Frame7x1+>D #Frame1x1cobCountry;txtDate;txtSQID> (H  3}Z4 < cmdDeleryd -Ny$<cmdUpler4 < cmdDownr2foi03 n``qqf     !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGIJKLMNOPQRTVXYZ[\^_`abcdfghjklmopqrstvxyz{|}~ Ny -Ny$pListBox1a, ,y dtm{w @"[SO, N ytm{w @"[SO, N ytm{w @"[SO`L85"[SO    n``Microsoft Forms 2.0 Embo$CompObjoi265  n``qqf edded ObjectForms.Frame.19q(H  6}=)Z H( 2DLabel1tm>{$ 4txtDatem !( 2<Label2em>q$4cmdQuitmk"$4cmdClear( <cmdModifye( 4cmdAddNew$0txtSQIDr x (2< Label3Dr>  j DcobCountry;,CN;-NV,US;V,JP;e,g,RU;OWeT,AF;?[Wl,OAPI;^2mwƋNCg~~,ARIPO;AP^2m]NNCg~~,AL;?\]<\N,DZ;?\S)RN,AD;[S\,AO;[Tb,AI;[-Wb\,AG;[ctT]^,AR;?9h^,AM;N<\N,AW;?]\,AU;o'Y)RN,AT;eY0W)R,AZ;?^Xbu,BS;]Tl\,BH;]g\,BD;_[Rb,BB;]]Ye,BY;}vOWe,BE;k)Re,BZ;/O)RyQ,BJ;[,BM;~vUa'Y\,BT; N9N,BO;s)R~N,BA;le<\NTў[T~,BW;ZS(t~,BV;^~\,BR;],BN;e(pQV,BG;OR)RN,BF;^W~l"},BI;^,KH;gW[,CM;U,CA;Rb'Y,CV;[O_҉,KY;_f\,CF;-N^,TD;MN_,CL;zf)R,CO;T&OkN,KM;yidW,CG;RgqQTV,CK;^KQ\,CR;TeΞR,CI;yyrt,HR;KQW0WN,CU;S],CY;^Xfme,CZ;wcKQ,KP;g,DK;9N,DJ; T^c,DM;Ys|<\KQ,DO;Ys|<\RqQTV,TP;N^vl,EC;StY\,EG;WS,SV;(\tY,GQ;dSQQN,ER;SzyȓN,EE;1rl<\N,ET;W^X\kN,EA;'k2mN)R@\,FK;yKQpQ\l\~~e\ ,FO;lW\,FJ;eNm,FI;pQ,FR;lV,GA;R,GM;QkN,GE;5"[SOAH(5"[SO ,,Y2009-01-31; r5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmYouXian Caption = "༭Ȩ" ClientHeight = 4200 ClientLeft = 45 ClientTop = 435 ClientWidth = 10545 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 32 End (H  @ }bFR KQ_H{@>LP½lNL ½lNL O*t&<k 8HAY8HfrmAddRecordqqf]oei111  n``qqAY8HAYH{@$ ":5j(6(!:5j(6( :5j(6(X( ZTabStrip1me.>$o#Frame7tr'(z04Label9tr/$#Frame6tr t1 D3ueNnUSDReNnUSTab3Tab45"[SO, 0X>5"[SO(H  "}~4 @ cmdDown  Ny -Nyli$@cmdUpwn4 < cmdDelndyd -Nyli( pdlstSQFileli>, 1dlstFuJiaFile>  , N yli{w @"[SO , N yli{w @"[SOfi<onCompObjuoi174  n``qq,y d{w @"[SO`n5"[SO `n5"[SO  n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q , eN{|WleN=5"[SO fowCompObjoCompObja(H  K}4%~ (2<Label6zz{4 `cobFileTypeeclearleTq0 0txtFileNamee100001;Cg)RBlfN;u pe,100002;ffN;u pe,100003;ffNDV;u pe,100004;ffNXd;u pe,100005;XdDV;u pe,150101;VE3uۏeQ-NVV[6kXfPCT ;u pe"(2<Label7zz\, 2@lblAlterblee?  4txtPagez100006;eckfN;u pe,100007;N)RNtYXbfN;u pe,100008;9(uQBlfN;u pe,100009;^gPBlfN;u pe,100010;b` YCg)RBlfN;y v pe,100012;aHfN;u pe,100011;aHfNsQN9(u ;u pe,100013;dVN)R3uXf;u pe,100015;fckBlfN;u pe,100016;WU_yvSf3ubfN;u pe,100017;-Nbk z^BlfN;u pe,100018;dVOHQCgXf;u pe,100021;N)RNtYXbfN-Ne ;u pe,100023;W ODnegnb2{vh;u pe,100102;3ueNoR,g;u pe,100103; N'N1Ye'`f;u pe,100104;WU_yvSft1uf;u pe,100105;N)R{t:gsQYtQ[;u pe,100106;Nllb$RQfN;u pe,100107;OQ;u pe,100108;vQNfeN;u pe,100110;9(uQf;u pe,100111;uirPgeX[;mf;u pe,100112;OHQCglf;u pe,100113;OHQCglf-Ne,g;u pe,100114;~fv(WHQ3ueNoR,g;u pe,100115;~fv(WHQ3ueNoR,guыe;u pe,100117;8hxb(lWx^Rh{:gS}SO;u pe,100118;SHh3uoR,g;u pe,100119;VQOHQCg(WHQ3ueNoR,g;u pe,100120;uirPgeOυf;u pe,100121;[([gSDe;u pe,100122;3uCglf;u pe,100125;Se;u pe,100601;>e_N)RCgXf;u pe,100701;N)RCgċNbJTBlfN;u pe,110301;SfN)RBlcMRlQ_Xf;u pe,110401;[([gBlfN;u pe,150103;eNO9eeNvыebO9eeN;u pe,150104;9eckOHQCgBlBlfNۏeQV[6k'YVE3u(u ;u pe,150105;9eckыeBlfNۏeQV[6kvVE3u(u ;u pe,150106;sQN_uirOυvf;u pe,150107;b` YOHQCgBlBlfNۏeQV[6kvVE3u(u ;u pe,150120;SHhVElQ^e,goR,g;u pe,150121;SHh-NeoR,g;u pe,150122;~nxvVE3ueNoR,g;u pe,100039;~N3ul5uP[3uBlfN;u pe,110402;SNN)R[gؚ(PPH)yvBlh;u pe,110403;PPHBleckfN;u pe,110404;Cg)RBl[^h;u pe,110405;[^3uCg)RBloR,g;u pe,110406;[^3u[gawfNoR,g;u pe,110407;[^3u[ga_(ueNoR,g;u pe,110408;[^3uCg)RBloR,gыe;u pe,110409;[^3u[gawfNoR,gыe;u pe" ( <cmdAddNewlee(14cmdQuitz4 4cmdSaveAlleeOX[hQ( < cmdModifyleeU$4 cmdClear(0@ lblXSear]n14 txtXSear100006;eckfN;u pe,100007;N)RNtYXbfN;u pe,100008;9(uQBlfN;u pe,100009;^gPBlfN;u pe,100010;b` YCg)RBlfN;y v pe,100011;aHfN;u pe,100011;aHfN(sQN9(u);u pe,100013;dVN)R3uXf;u pe,100015;fckBlfN;u pe,100016;WU_yvSf3ubfN;u pe,100017;-Nbk z^BlfN;u pe,100018;dVOHQCgXf;u pe,100019;:_6RSBlfN;u pe,100020;:_6RSO(u9peQBlfN;u pe,100030;RtfeNBlfN;u pe,100031;RteNoR,gBlfN;u pe,100032;N)Rechg Y6RBlfN;u pe,100033;͑eSg[xBlfN;u pe,100102;3ueNoR,g;u pe,100103; N'N1Ye'`f;u pe,100104;WU_yvSft1uf;u pe,100105;N)R{t:gsQYtQ[;u pe,100106;Nllb$RQfN;u pe,100107;OQ;u pe,100108;vQNeN;u pe,100110;9(uQf;u pe,100111;uirPgeX[;mf;u pe,100112;OHQCglf;u pe,100113;OHQCglf-Ne,g;u pe,100114;~fv(WHQ3ueNoR,g;u pe,100115;~fv(WHQ3ueNoR,guыe;u pe,100118;SHh3uoR,g;u pe,100119;VQOHQCg(WHQ3ueNoR,g;u pe,100120;uirPgeOυf;u pe,100121;[([gSDe;u pe,100122;3uCglf;u pe,100601;>e_N)RCgXf;u pe,100901; Y[BlfN;u pe,100902; Y[eHe[JT z^aHfN;u pe,100903;-NNSNlqQTVV[wƋNCg@\N)R Y[YXTO;u pe,100904; Y[eHe[JT z^eckfN;u pe,101001;N)RCgeHe[JTBlfN;u pe,101222;Y‰VGrbgqGr;u pe,110301;SfN)RBlcMRlQ_Xf;u pe,110401;[([gBlfN;u pe,120101;[(ueWN)RBlfN;u pe,120701;[(ueWN)Rh"}bJTBlfN;u pe,130001;Y‰VGrbgqGr;u pe,130002;Y‰{f;u pe,130101;Y‰N)RBlfN;u pe,130701;Y‰N)Rh"}bJTBlfN;u pe,150101;VE3uۏeQ-NVV[6kXfSf ;u pe,150102;VE3uۏeQ-NVV[6kXf[(ueW ;u pe,150103;eNO9eeNvыebO9eeN;u pe,150104;9eckOHQCgBlBlfNۏeQV[6k'YVE3u(u ;u pe,150105;9eckыeBlfNۏeQV[6kvVE3u(u ;u pe,150106;sQN_uirOυvf;u pe,150107;b` YOHQCgBlBlfNۏeQV[6kvVE3u(u ;u pe,150123;ffNXd;u pe,150125;ffNXd;u pe,150127;Cg)RBlfN;u pe,150129;XdDV;u pe,150130;Cg)RBlfN;u pe,150131;ffN;u pe,150132;ffNDV;u pe,150134;ffNXd;u pe,150135;ffNXd;u pe,150136;XdDV;u pe,150137;Cg)RBlfN;u pe,150138;ffN;u pe,150139;ffNDV;u pe,100905; Y[ z^b` YCg)RBlfN;u pe,100906; Y[ z^^gPBlfN;u pe,100907; Y[ z^cCgYXbfN;u pe,101002;-NNSNlqQTVV[wƋNCg@\N)R Y[YXTO;u pe,101003;N)RCgeHe[JT z^cCgYXbfN;u pe,101004;eHe[JTHhNR_[gBlfN;u pe,150141;ffN;u pe,150142;Cg)RBlfN;u pe,150143;ffNDV;u pe,150147;Cg)RBlfN;u pe,150147;ffNDV;u peq AH({5"[SOH({5"[SO , eN TyleN>5"[SO$,u pe">5"[SO H({5"[SO,e X{w @"[SO( Q{u"[SO( Q{u"[SO,O 9e{w @"[SO(n zz{u"[SO$,y pe">5"[SO H({5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVBFrameLfrmBuzhengNRqqfoVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmAddRecord Caption = "༭ļ嵥" ClientHeight = 4440 ClientLeft = 45 ClientTop = 435 ClientWidth = 10215 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 524 End (H  #@<}6D@R KQ_T$#Frame1x1>>$#Frame2x1P(> (H  #}% ((28Label2zz(28Label3zz(28Label4zze 0 0txtFileNamez1xtFg ,0 4txtLocationz2xtLg 0 0txtBefChange3xtBg $4cmbAddzz4( 4cmbCancelnge( <i14 n``qqfloCompObjocmdModifynge^ $!4 cmdClear,"0 TextBox14extg 0(#2\ Label6x1 ,OυS>5"[SO,Oυeg>5"[SO,OυUSMO>5"[SOH(vX5"[SO H( vX5"[SOH(vX5"[SO(X RMO{u"[SO( QMO{u"[SO,O 9e{w @"[SO(n zz{u"[SOH(vX5"[SO@,,ffNыe,{_u_LbPCT/RO/134h {5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19qi27 n``qqfoCompObjo(H  }$<cmdDelx1$<cmdUplx1$<cmdDown1; $@ListBox1>, ,y dx1{w @"[SO, N yx1{w @"[SO, N yx1{w @"[SO`g5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmBuzhengNR Caption = "༭Ʒ" ClientHeight = 4245 ClientLeft = 45 ClientTop = 360 ClientWidth = 9900 ShowModal = CompObjaVBFrameRfrmFaMingRenqqf 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 60 End (H  @B}d@!R KQ_O$#Frame7tr >0#Frame1trtxtNamer>$#Frame8er (H  2}8 1<cmdSaveAlloOX[hQ4 oi03 n``qqfDoT< cmdDelesyd -Nyo$<cmdUples 4 < cmdDowns: Ny -Nyo$dListBox1$ ,O X[es{w @"[SO,y des{w @"[SO, N yes{w @"[SO, N yes{w @"[SO`B5"[SO D" n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q(H  4}  (2@Label100txtNameclearobj>410txtEnameclearobj (0<Label2bju(CompObjoi235  n``qqfdo PoptGongKaio ( ToptNoGongKai  $,Y Tts5"[SOH(95"[SOH(95"[SO , eY ToN>5"[SO4G<F0amlQ^Y T5"[SO8G< F1^ NlQ^Y T T5"[SOCompObjoi260  n``qqfo n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q(H  }O( 4cmdAddNewQ>$4cmdClear>( 4cmdModifyQ >$ 4cmdQuitr> (e Xbj{u"[SO(n zzbj{u"[SO(O 9ebj{u"[SO( Qbj{u"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmFaMingRen Caption = "༭" ClientHeight CompObjoCompObjaVBFrameHfrmAddDaiLiRenqq = 4890 ClientLeft = 45 ClientTop = 435 ClientWidth = 9345 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 66 End (H  @}>R KQ_ht8 #Frame1:txtName;txtID;>$#Frame7:" foi11 n``qqf(H  8}? e $ 4txtTel;  ( 2@Label1|(2<Label2r(2@Label3h $0txtName; ,$0txtIDme; ", 14cmdAddNewQ4$4cmdClear( 4cmdModifyQ; $4 cmdQuitrm o CompObjoi22 n``qqfH     !#$%&')+,-./0123456789:;<=>?@ABCDEFGHJLNOPQRT H((5"[SO$,Y T5"[SO , ]\OSo5"[SO$,5u ݋5"[SOH((5"[SOH((5"[SO(e X{u"[SO(n zz{u"[SO(O 9e{u"[SO( Q{u"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q(H  8}e4 < cmdDownr Ny -Nyo$<cmdUpwnrU 8 14cmdSaveAllo>OX[hQ8 1< cmdDelnryd -Nyo$@ListBox1>, , N ytr{w @"[SO, N ytr{w @"[SO(O X[tr{u"[SO,y dtr{w @"[SO`LR 5"[SO" n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19qo (CompObjoCompObjaVBFrameK Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmAddDaiLiRen Caption = "༭" ClientHeight = 3435 ClientLeft = 45 ClientTop = 435 ClientWidth = 9090 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 149 End frmShenQingRen qqfo i292   n``qq(H  M@}`Oz*R KQ_xe$$#Frame7er3H*#Frame1ertxtName;cobUsertype;cobCountry; (H  ).}(4 %< cmdDownj $ Ny -Nyai8 &1<cmdSaveAllaiD$OX[hQ$'<cmdUpwnj"$4 (< cmdDelnj'$fDo "lCompObj(oi298   n``qqyd -Nyai$)|ListBox1 , N ybj{w @"[SO,O X[bj{w @"[SO, N ybj{w @"[SO,y dbj{w @"[SO`f!5"[SODD n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q , Y Tb Ty_5"[SO , (u7bNxaiN>5"[SO , 3uN{|W5"[SOH( 5"[SOH( 5"[SOH( 5"[SO,5u݋x1>5"[SO(fO(;o*CompObjIoCompObjKa(H  Mf};2(!:(+2<Label1x1)(,2<Label2x1 W(-2<Label3x1$.0txtName1( /0txtUserCodek"$00txtTele1k"(128Label4e1(22DLabel5e1(52DLabel7e1B(62<Label8e1( 70 txtStreetde (82<Label9e1$( 94 txtYouBiane-!(:2<Label101!(;10 txtENamep/5%(<0<Label11e'O%(=10 txtEAddr&%(>0<Label12r%( ?DcobCountrye BL$@8cobPrvcr;,110000;SN^,120000;)Y%m^,130000;lSw,140000;q\w,150000;QSꁻl:S,210000;[w,220000; Tgw,230000;ў_lw,310000; Nwm^,320000;_lςw,330000;Ym_lw,340000;[_w,350000;y^w,360000;_lw,370000;q\Nw,410000;lWSw,420000;VnSw,430000;VnWSw,440000;^Nw,450000;^Xeꁻl:S,460000;wmWSw,500000;͑^^,510000;V]w,520000;5]w,530000;NWSw,540000;υꁻl:S,610000;Uw,620000;uw,630000;Rwmw,640000;[YVeꁻl:S,650000;eu~>T\ꁻl:S,710000;S~nw,810000;/nyr+RL?e:S,910000;oyr+RL?e:S121A8cobCityr;;,110000;110100;^:S,120000;120100;^:S,130000;130100;w[^^,130000;130200;Uq\^,130000;130300;yv\^,130000;130400;^,130000;130500;S^,130000;130600;O[^,130000;130700; _[S^,130000;130800;b_^,130000;130900;l]^,130000;131000;^JW^,130000;131100;a4l^,140000;140100;*YS^,140000;140200;'Y T^,140000;140300;3l^,140000;140400;l^,140000;140500;KfW^,140000;140600;g]^,140000;140700;Kf-N^,140000;140800;ЏW^,140000;140900;_]^,140000;141000;4N~l^,140000;141100;Th^,150000;150100;|TTimyr^,150000;150200;S4Y^,150000;150300;LNwm^,150000;150400;d\^,150000;150500;^,150000;150600;\Ye^,150000;150700;|T&O\^,150000;150800;]f_m\^,150000;150900;LNpQ[^^,150000;152200;tQ[v,150000;152500;!gRv,150000;152900;?bUv,210000;210100;l3^,210000;210200;'Yޏ^,210000;210300;q\^,210000;210400;bz^,210000;210500;,gn^,210000;210600;9NN^,210000;210700;&]^,210000;210800;%S^,210000;210900;e^,210000;211000;3^,210000;211100;v&^,210000;211200;\^,210000;211300;g3^,210000;211400;k\^,220000;220100;%f^,220000;220200; Tg^,220000;220300;Vs^^,220000;220400;n^,220000;220500;S^,220000;220600;}vq\^,220000;220700;~gS^,220000;220800;}vW^,220000;222400;^geꁻl],230000;230100;T\n^,230000;230200;PPT\^,230000;230300;!^,230000;230400;d\^,230000;230500;S-q\^,230000;230600;'Y^^,230000;230700; O%f^,230000;230800;sO(ge^,230000;230900;NSl^,230000;231000;ar9N_l^,230000;231100;ўl^,230000;231200;~S^,230000;232700;'YtQ[\0W:S,310000;310100;^:S,320000;320100;WSN^,320000;320200;e!^,320000;320300;_]^,320000;320400;8^]^,320000;320500;ς]^,320000;320600;WS^,320000;320700;ޏN/n^,320000;320800;m[^,320000;320900;vW^,320000;321000;lb]^,320000;321100;G_l^,320000;321200;l]^,320000;321300;[^,330000;330100;mg]^,330000;330200;[l^,330000;330300;)n]^,330000;330400; VtQ^,330000;330500;Vn]^,330000;330600;~tQ^,330000;330700;ёNS^,330000;330800;b]^,330000;330900;q\^,330000;331000;S]^,330000;331100;=N4l^,340000;340100;T^,340000;340200;Vn^,340000;340300;W^,340000;340400;mWS^,340000;340500;lq\^,340000;340600;mS^,340000;340700;ܔu^,340000;340800;[^^,340000;341000;Ğq\^,340000;341100;n]^,340000;341200;3^,340000;341300;[]^,340000;341400;]Vn^,340000;341500;mQ[^,340000;341600;N]^,340000;341700;`l]^,340000;341800;[W^,350000;350100;y]^,350000;350200;S^,350000;350300;0u^,350000;350400; Nf^,350000;350500;l]^,350000;350600;3o]^,350000;350700;WSs^^,350000;350800;\^,350000;350900;[_^,360000;360100;WS f^,360000;360200;of_G^,360000;360300; aN^,360000;360400;]N_l^,360000;360500;eYO^,360000;360600;pmo^,360000;360700;c]^,360000;360800; T[^,360000;360900;[%f^,360000;361000;b]^,360000;361100; Nv^,370000;370100;NmWS^,370000;370200;R\^,370000;370300;mZS^,370000;370400;g^^,370000;370500;N%^,370000;370600;pS^,370000;370700;MoJW^,370000;370800;Nm[^,370000;370900;l[^,370000;371000;Zwm^,370000;371100;egq^,370000;371200;^,370000;371300;4Nl^,370000;371400;_]^,370000;371500;JW^,370000;371600;n]^,370000;371700;σl^,410000;410100;ѐ]^,410000;410200;_\^,410000;410300;m3^,410000;410400;s^vq\^,410000;410500;[3^,410000;410600;dX^,410000;410700;eaN^,410000;410800;&q\O^,410000;410900;o3^,410000;411000; f^,410000;411100;/ol^,410000;411200; N\^,410000;411300;WS3^,410000;411400;FUN^,410000;411500;O3^,410000;411600;hTS^,410000;411700;{l^^,420000;420100;fkIl^,420000;420200;Ğw^,420000;420300;AS0X^,420000;420500;[ f^,420000;420600;D j^,420000;420700;]^,420000;420800;F^,420000;420900;][a^,420000;421000;F]^,420000;421100;ĞQ^,420000;421200;T[^,420000;421300;]^,420000;422800;i`eW[eׂeꁻl],420000;429000;wvL?eUSMO,430000;430100;l^,430000;430200;*h2m^,430000;430300;Xnmo^,430000;430400;a3^,430000;430500;3^,430000;430600;\3^,430000;430700;8^_^,430000;430800; _[Lu^,430000;430900;v3^,430000;431000;]^,430000;431100;8l]^,430000;431200;`S^,430000;431300;Z^^,430000;433100;XnW[eׂeꁻl],440000;440100;^]^,440000;440200;sQ^,440000;440300;m3W^,440000;440400;swm^,440000;440500;Ul4Y^,440000;440600;[Oq\^,440000;440700;_l^,440000;440800;[n_l^,440000;440900; T^,440000;441200;^^,440000;441300;`]^,440000;441400;h]^,440000;441500;Ul>\^,440000;441600;ln^,440000;441700;3_l^,440000;441800;n܏^,440000;441900;N^,440000;442000;-Nq\^,440000;445100;no]^,440000;445200;c3^,440000;445300;Nnm^,450000;450100;WS[^,450000;450200;g]^,450000;450300;Bhg^,450000;450400;h]^,450000;450500;Swm^,450000;450600;2W/n^,450000;450700;]^,450000;450800;5/n^,450000;450900;sg^,450000;451000;~vr^,450000;451100;:]^,450000;451200;l`l^,450000;451300;eg[^,450000;451400;]]^,460000;460100;wmS^,460000;460200; NN^,460000;469000;wvS~L?eUSMO,500000;500100;^:S,500000;500300;^,510000;510100;b^,510000;510300;!^,510000;510400;eg^,510000;510500;l]^,510000;510600;_3^,510000;510700;~3^,510000;510800;^CQ^,510000;510900;B[^,510000;511000;Q_l^,510000;511100;PNq\^,510000;511300;WSEQ^,510000;511400; wq\^,510000;511500;[[^,510000;511600;^[^,510000;511700;]^,510000;511800;Ŗ[^,510000;511900;]-N^,510000;512000;D3^,510000;513200;?]Wυeeꁻl],510000;513300;u\[υeꁻl],510000;513400;Qq\]_eꁻl],520000;520100;53^,520000;520200;mQv4l^,520000;520300;uIN^,520000;520400;[z^,520000;522200;ܔN0W:S,520000;522300;ԞWS^Oeׂeꁻl],520000;522400;k0W:S,520000;522600;ԞNWSׂeOeꁻl],520000;522700;ԞWS^Oeׂeꁻl],530000;530100;ff^,530000;530300;fV^,530000;530400;sn^,530000;530500;Oq\^,530000;530600;-f^,530000;530700;=N_l^,530000;530800;`^,530000;530900;4Nl^,530000;532300;ZiĖ]_eꁻl],530000;532500;~lT<\e]_eꁻl],530000;532600;eq\Xeׂeꁻl],530000;532800;SHr~Peꁻl],530000;532900;'Yt}veꁻl],530000;533100;_[Peofeꁻl],530000;533300;`_lPPeꁻl],530000;533400;ꏆ^υeꁻl],540000;540100;b(^,540000;542100; f0W:S,540000;542200;q\WS0W:S,540000;542300;eUR0W:S,540000;542400;f0W:S,540000;542500;?̑0W:S,540000;542600;g0W:S,610000;610100;[^,610000;610200;ܔ]^,610000;610300;[!^,610000;610400;T3^,610000;610500;-nWS^,610000;610600;^[^,610000;610700;Il-N^,610000;610800;ig^,610000;610900;[^^,610000;611000;FUm^,620000;620100;pQ]^,620000;620200; V\sQ^,620000;620300;ё f^,620000;620400;}v^,620000;620500;)Y4l^,620000;620600;fkZ^,620000;620700; _c^,620000;620800;s^Q^,620000;620900;Rl^,620000;621000;^3^,620000;621100;[^,620000;621200;GWS^,620000;622900;4NYVeꁻl],620000;623000;uWSυeꁻl],630000;630100;[^,630000;632100;wmN0W:S,630000;632200;wmSυeꁻl],630000;632300;ĞWSυeꁻl],630000;632500;wmWSυeꁻl],630000;632600;gmυeꁻl],630000;632700;shυeꁻl],63000 0;632800;wmSeυeꁻl],640000;640100;]^,640000;640200;w4Vq\^,640000;640300;4T_^,640000;640400;VS^,640000;640500;-NkS^,650000;650100;LN(gP^,650000;650200;KQbsO^,650000;652100;Tju0W:S,650000;652200;T[0W:S,650000;652300; f TVeꁻl],650000;652700;ZS\TXbSꁻl],650000;652800;]^iSꁻl],650000;652900;?KQς0W:S,650000;653000;KQ\[Rςg\KQ\[ꁻl],650000;653100;UN0W:S,650000;653200;T0u0W:S,650000;654000; OrT(KQꁻl],650000;654200;TXW0W:S,650000;654300;?Rl0W:S,650000;659000;wvL?eUSMOl(B2LLabel13r$C0txtPID3r(D2<Label14r $E0txtEmail $F4cmdClear$$( G4cmdModifyye$(H0TlblAlarm%, I;4 cmdAddNewye/$p DJPcobUsertype;,1;'YNb!h,2;yxUSMO,3;]wON,4;NNUSMO,5;*NN$K4cmdQuitmi+$, LDcobActAddress1'(M2H Label6tm ,VM|b;`@b(W0We 5"[SO(,wꁻl:Sv^ Ty 5"[SO , ^S TyaiN>5"[SOH("5"[SO , ~0W@WaiN>5"[SO H(5"[SO , ?exaiN=5"[SOH(5"[SO , e TyaiN>5"[SOH(5"[SO , e0W@WaiN>5"[SOAH("5"[SO A!H(.!5"[SOA!H('5"[SO0,*NNNSb~~:ggNxw>5"[SOH(u5"[SO , 5uP[{aiN>5"[SOH('5"[SO(n zzx1{u"[SO(O 9ex1{u"[SO8)"f9e(WpQ'OX[' cTMbSuHeo>5"[SO(e Xx1{u"[SO AH( 5"[SO( Qx1{u"[SOAH(.!5"[SO ,,~8^E\@bb%N@b(W0W >5"[SO n``Microsoft Forms 2.0 Embedded ObjectForms.Frame.19q Microsoft Forms 2.0 Embedded Object9qVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmShenQingRen Caption = "༭" ClientHeight = 6165 ClientLeft = 45 ClientTop = VBFrameMLCompObjpSu435 ClientWidth = 11520 ShowModal = 0 'False StartUpPosition = 2 'Ļ TypeInfoVer = 187 End   F#Microsoft Office Word 97-2003 ĵ MSWordDocWord.Document.89q:,.01588CD+FHJGLMPR4V]]a?fmen}jo4Z #G##$+%%&n))f*n*+e3W56m7c8:(?q?IA>B(O,SSWWX[\I^afek1llAnopqGu*w~.w%&"t""|%%%+d,3&4S4s= DJ'OPSSTUY\]cc-diller{qv  !$))//u9 :Y:*@=@n@HRVTX$_V=@V:@V5@V6@V7@V@V@V<@V@V -@V 4@V ;@V @V .@V@V@V@V@V@V@V@V@V@V1@V9@V%@V2@V@V@V@V@V@V !@V!$@V"(@V#+@V$@V%@V&&@V''@V(3@V)8@V*@V+@V,@V-@V.@V/"@V0@V1 @V2*@V30@V4)@V5,@V6#@V7 @V8 @V9/@V: @V; @V< @V=@>Project.CopyToEachDoc.AddFuYe Project.CopyToEachDoc.ChangeHeadProject.CopyToEachDoc.GrayFlds Project.CopyToEachDoc.RemoveFuYeProject.CopyToEachDoc.testProject.ShenQingRen_New.Test0Project.ThisDocument.GetAppProject.ThisDocument.init2Project.modCPCLeftTreeInterFace.AddInterFaceFuJian'Project.modCopyAndFillRecord.InitDocCob%Project.modCreateComponents.CreateBIO%Project.modCreateComponents.CreateFMR,Project.modCreateComponents.CreateFMREngInfo,Project.modCreateComponents.CreateSQREngInfoProject.modDya.DelShenQingRenProject.modDya.addDaiLiRenProject.modDya.addFamingrenProject.modDya.addShenQingRen Project.modDya.addYouxianquanSHMProject.modDya.delDaiLiRenProject.modDya.delFamingren Project.modDya.delYouxianquanSHM Project.modInitData.initCityListProject.modPub.AddSignDateProject.modPub.EditYXQProject.modPub.FormHideOrShowProject.modPub.RefreshOcxTreeProject.modPub.SaveXmlFile!Project.modPub.UpdateCobCountsYXQProject.modPub.UpdateFieldProject.modPub.testxmlProject.modPub.uirPge7hT!Project.modSpecialChar.ChangeWordProject.modSpecialChar.DelPic Project.modSpecialChar.SpecialCS#Project.modSpecialChar.SpecialSCXMLProject.modVerify.invalidDateProject.modVerify.invalidDayProject.modVerify.invalidEmailProject.modVerify.invalidMonthProject.modVerify.invalidYear"Project.modVerify.validateInputLen!Project.modVerify.validateNumericProject.modVerify.validatePID"Project.modVerify.validatePostCodeProject.tmpmod.AddFuJianProject.tmpmod.AddQingDan%Project.tmpmod.DelFujiaWenjianQingdan!Project.tmpmod.DelShenqingQingdanProject.tmpmod.EditDaiLiRenProject.tmpmod.EditFaMingRenProject.tmpmod.EditShenQingRenProject.tmpmod.UnlockDocProject.!jWW1.DelLineProject.!jWW1.Macro59Project.!jWW1.Macro60Project.KmՋ(u.JustEmptyClipboardProject.KmՋ(u.ReNameYXQFieldsProject.KmՋ(u.fdsjProject.KmՋ(u.findBookMarkProject.KmՋ(u.findStatusProject.KmՋ(u.ttt>PROJECT.KmՋ(u.TTTPROJECT.KmՋ(u.FDSJPROJECT.!jWW1.DELLINEPROJECT.!jWW1.MACRO59PROJECT.!jWW1.MACRO60PROJECT.MODPUB.EDITYXQPROJECT.MODPUB.TESTXMLPROJECT.KmՋ(u.FINDSTATUSPROJECT.MODPUB.uirPge7hT PROJECT.TMPMOD.ADDFUJIAN PROJECT.TMPMOD.UNLOCKDOC PROJECT.KmՋ(u.FINDBOOKMARK PROJECT.THISDOCUMENT.INIT PROJECT.TMPMOD.ADDQINGDANPROJECT.COPYTOEACHDOC.TESTPROJECT.MODDYA.ADDDAILIRENPROJECT.MODDYA.DELDAILIRENPROJECT.MODPUB.ADDSIGNDATEPROJECT.MODPUB.SAVEXMLFILEPROJECT.MODPUB.UPDATEFIELDPROJECT.MODDYA.ADDFAMINGRENPROJECT.MODDYA.DELFAMINGRENPROJECT.THISDOCUMENT.GETAPPPROJECT.TMPMOD.EDITDAILIRENPROJECT.KmՋ(u.RENAMEYXQFIELDSPROJECT.MODVERIFY.INVALIDDAYPROJECT.TMPMOD.EDITFAMINGRENPROJECT.COPYTOEACHDOC.ADDFUYEPROJECT.MODDYA.ADDSHENQINGRENPROJECT.MODDYA.DELSHENQINGRENPROJECT.MODPUB.FORMHIDEORSHOWPROJECT.MODPUB.REFRESHOCXTREE PROJECT.MODSPECIALCHAR.DELPIC!PROJECT.MODVERIFY.INVALIDDATE"PROJECT.MODVERIFY.INVALIDYEAR#PROJECT.MODVERIFY.VALIDATEPID$PROJECT.SHENQINGREN_NEW.TEST0%PROJECT.COPYTOEACHDOC.GRAYFLDS&PROJECT.MODVERIFY.INVALIDEMAIL'PROJECT.MODVERIFY.INVALIDMONTH(PROJECT.TMPMOD.EDITSHENQINGREN)PROJECT.KmՋ(u.JUSTEMPTYCLIPBOARD* PROJECT.COPYTOEACHDOC.CHANGEHEAD+ PROJECT.COPYTOEACHDOC.REMOVEFUYE, PROJECT.MODDYA.ADDYOUXIANQUANSHM- PROJECT.MODDYA.DELYOUXIANQUANSHM. PROJECT.MODINITDATA.INITCITYLIST/ PROJECT.MODSPECIALCHAR.SPECIALCS0!PROJECT.MODPUB.UPDATECOBCOUNTSYXQ1!PROJECT.MODSPECIALCHAR.CHANGEWORD2!PROJECT.MODVERIFY.VALIDATENUMERIC3!PROJECT.TMPMOD.DELSHENQINGQINGDAN4"PROJECT.MODVERIFY.VALIDATEINPUTLEN5"PROJECT.MODVERIFY.VALIDATEPOSTCODE6#PROJECT.MODSPECIALCHAR.SPECIALSCXML7%PROJECT.MODCREATECOMPONENTS.CREATEBIO8%PROJECT.MODCREATECOMPONENTS.CREATEFMR9%PROJECT.TMPMOD.DELFUJIAWENJIANQINGDAN:'PROJECT.MODCOPYANDFILLRECORD.INITDOCCOB;,PROJECT.MODCREATECOMPONENTS.CREATEFMRENGINFO<,PROJECT.MODCREATECOMPONENTS.CREATESQRENGINFO=2PROJECT.MODCPCLEFTTREEINTERFACE.ADDINTERFACEFUJIAN@ ~ O&XX X XXXXXXX$X&X,XUnknownG*Ax Times New Roman5Symbol3. *Cx Arial;= |8ўSOSimHei;([SOSimSun?= *Cx Courier NewI4eck[ N{SON[_GB2312ACambria Math QheY'Dy'; D D!Z&!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[%%!2X)?(!xxE:\My Documents\]\OeN\O9evBlfN.dot cgq,gh̀b kXhlaNy cknxkXQ,ghThauto822235