Warning: mkdir(): No space left on device in /www/wwwroot/www.huidaye.com/func.php on line 252

Warning: file_put_contents(./cachefile_yuan/3dsd.net/cache/59/7a35a/c7b17.html): failed to open stream: No such file or directory in /www/wwwroot/www.huidaye.com/func.php on line 240
邢唷> h01  !"#$%&'()*+,-./E2345678B:;<=>?@ACDGHIJKLMNOPQRSUVWXYZ[\]^_`abcdefgjklmnopqrstuvwxyz{|}~€Root Entry F2 :D[€0SummaryInformation(0DocumentSummaryInformation8LMacros续9D[续9D[  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSUVWXY[\]^_`abcdefghijklmnopqrsuvwxyz{|}~€鄥燆鵒h珣+'迟0 X€`h| ck噀噀鯪RJeGovAdministrator7@.8∷7@^9D[@V`_焰WPS 噀W[胀諟.摋+,D胀諟.摋+,p8€@H `hRJSOFT (\€dlKSOProductBuildVer2052-11.1.0.9828渤€0* pH"dD正埼<@j= B F?_ J< r€stdole>stdo€le h%^*\G{00€020430-C 0046}#2.0#0#C:\Windows\SysW OW64\e2.tlb#OLE Automation`婲or(mal僂N€Cr坢a€F €b €*\C  ?_!Of坒ic刧Of€╥c俫檪!G{2DF8D04C-5BFA-101B-BDER5€gAA€e4€2圴BA续9D[续9D[dir Common)RJeGov%gProgram Files (x86)\Common \Microsoft Shared\OFFICE14\M€SO.DLL#働 9.0 Object Lib0rary&€"@MSFCs>SF腃Hs3@BeD452EE1-E08FA1A-8-02608C4 D0BB4YeFMl20 'B r&/;"1剝B} 儍00}#0們# €50 嚴A36533716-46D0-4545-A232-2D282€D5042AC6Users\LENOVO~1\AppData\Local\Tem`p\VBE纀7.xexd萩<@"€.E 忇厐.`孧 戳"裸澈B蟃hisDocumentG T佬is"D@lcu@砮猲镭 2` (H1纖X",礣""+R@JeGovG RJ郹G`vM2 o ! ArfrmSDel`ZG€fAxSA奵B&2/1/摖#(僺C 鷐`/o`/M忢,U" 僁ialog,G爑iⅷDbi"榦g`.+2K6瑞7"!揔* *\CNormalrU€€€~~~~~~~~~~~\ Q酟QZ8-A獤歘T/祚 儕a 9&Qi A y ! a ) dl 澈U" CopyFileAxME(<<< <h +@ i儕`i儗€yi儙陘:P 陘n陘rx 陘 陘6 h6 +  i儢`剺`劕+` i儤 X`凩+0i儺i儼!d`劜+pi儺i儼'r`劜N+`i兌(i兏`労+Ni儺i儼`劜+p8 i儺Xi儼`劜 T i兗i儼€ 劸@(`劺`劼`劜  + i兤0i內Pi兪`劜+HI兲 `勎`勑`勔`凬+)冓€%i儸+x  )冓0 8 €%i儸X I兪  )冓 €%i儸蕫~( L陘<陘j陘x陘@Hx  @` P 0x ( Hx  @` P 0x ( v  x @%h F?_ €€ H€ € $€(8€ `€"€€(€$€*€(€H€"h€ B €T(€€ B  €" " &( Phpx€€ B €€ B € (HP€ B X€`hpx € B €€ B € @H€ € (PB x€€€€ "0@PXh€€ B € D08@€ B H€P€X€`€hp2f P` h x€      € B  ( 0 H €P X € B ` h p   €  € B      €  € € € € € € €  x]$t_ 1下载的模板的前缀] ( 1下载模板的目标文件名和路径] 1下载模板的URL地址] P 1文档使用的新的文件字%] 1文档可能使用的新的模板名称] 1文档使用的原来的文件字8] x 1文档使用的原来的word模板名称,则列] 1原上下行文标志 X]  1 上下行文标志X!^] @1自动更改模板信息标志b]d \$' \$'  !$ 'hk  \rjoawork.bakA@z   \rjoawork.bak\ yyyymmddhhnnss$ $'orix h B@det]€     $~S A@elLk \*.*   $~'L/BS Lte \ L$   \ LA@k ~'L€ !'i`]  $'P涬    $ 'ki0]  $'     $ 'ki]H_ '   '  iX`]  '    $ 'Nki]x  '     $ 'pki"将一个字符串按分隔符分成几个字符串]]H`x从第一个字母开始找'_8   ' Gxj 酅     $  +   '  ' 酅  $  + 'Tip]p  '  b   $       $ l '    ' 'i]]]]0 N   N$ ' $' G 'j.对半角空格作特殊处理  :  /  [  @  {  `   'd $ ' KT%0 'KT% 'KT%u0 'KT%u 'n  'k 'iHJF  %H'zJiJF   B@.'zhJ`iXx JF  B@'z(J iAttribute VB_Name = "Common" Option Explicit Declare FuncpCopyFile Lib "kernel32" Alias=乺Left(€ , "8\")Righ6If Lena) > 32 Then !C Mid$E, 33 End IfC@'rOt鄅erDaB&rjoa繞k.bak€榿 G&`~%朼 C\" _ & Forma爐(Now ymmddhhnn@ss") &E), False@E6!捚7n838O@眗ror Re膕u@礜ex`册餎rr. =!h?=0` , vbectory +SystemBHidde攏)A",5Mk/ I3s= € #"\*.*"O CWha葍<> "7€4BD`癟ime "C!/) < `3 - 4!KilcAI闳end#8€$(!0Number 0@€铅j幂郞0MainIsSe>pbB兿c!=intPo锣IntegerC= I鈔 Rev' 鈤 `! 9@e R9- 1Tqo/@1&Bo筷o0僶sooooy p臜齤+誏Q茟z?f疗CheckO 8tchl1幾ln鰃DxoRD /(+ 1B Ma@ `Loop 3:> 0 nS# ---ro- 昺-q-瞣籃+,4 $)麗 47€)) Or _搥P 9164123 96 2邐繫膒倗&羦罞崆 ElseMA纄pHex$6HR@3Select Ca|seEn 1@€莡"%0"n & 23踯u^ 4] 零K'J€KIfdNe|xtD脃€4& xG@etItem u`e(col!tCLol8 , 鎮Nxame繫 凮 n ErrwGo€v@handle: `C .ar肁 $DExit钄}6楽b B鄌olea€M皲Add醙B虏iTru刯馩礑el5A5et.Re餸ovee)>5∥ei澈购xME(<<< <x `勳`勵`勷x 匉 %  ( h      "@`$  *€ .`0`$ 9 8&&`0`$ //// :x////% <////%    D` J`凩ectT`( @h€`( @h€`F?_ €€ "€ 8HX.h,€F(8H Xx€ "  € " ( 08@HPX `hpx€ "€€ € " (€ "0 8H€ € JP€ 0€ J" (€ "0€ &X€€ * € " (08 @H*P€ € "€ € (€  €@€H€ Php x€0H PX`h€ "px€€€€ € $€ € $€ 0HP X`h (  0 8 @ € € (H &p €    &     "   0 € "8 @  H X € € :` € "   € " € >  0 P X € ` € h € x €  €  € € €  xh ]@Xpx b!!' b!!' b!!' b!InsertFileStart5\B@. $B@ b! InsertFileEnd5\B@.Z+]InsertFileStart7\!^ InsertFileEnd7\!7.ec  !(  !(  !(InsertFileStart7\B@ InsertFileEnd7\B@q`oXA@ 5A@k(9995A@kqo 5A@k9995A@kqo€(SetRevisionsOption 999q8o0h  9 9 9  9 9 9 9 9qo "B@BoC///////////////////////////////////////////////////////////////////* 以下是红头相关的操作C///////////////////////////////////////////////////////////////////SubjectText是“文件标题”框DocMarkLine是“文号”下面的红线]( "5A@kX ( SubjectText7!!!(& If  DocMarkLine7(5A@kqo@ "5A@k , SubjectText7!!!(&  DocMarkLine7(5A@kHq@o8€(KeywordText是“主题词”框!KeywordLine是“主题词”下面的线条CopySendText是“抄送”框]]33333$@$2'0 "5A@kx KeywordText7.$ $!4 0 $(4 KeywordLine7.$ $!4 0 $(4 CopySendText7.$ $!4 0 $(4 $!6 0 $(65A@kqo€]0]H加入如果抄送为最小的时候不缩小]` CopySendText "%.: :G|j :!6 G|j''''''''''''''''''''''''''''''33333$@$2'0 "5A@k KeywordText7.$ $!4 0 $(4 KeywordLine7.$% $!4 0 $(4$ CopySendText7.$ $!4 0 $(4K $!6 0 $(65A@kq"当抄送文本框为空的时候则对齐两横线 CopySendText "%!6 ]€ CopySendLine "%.< < <!4 KeywordLine "%(4kko @ "B@>o "B@B` o3===================================================%  b!F%H!A@€ o0`]请输入对象的名字: 公文对象命名 请取个名字$'L L L b!F%H(ko Sub test()MsgBox Application.VersionEnd SubHAttribute VB_Name = "RJeGov" Option Explicit Sub 引胛恼()  ODrro@r Resu凬 exV2With ActiveD4oc6n08Dim oldIndent As Single, s纓rFontg, int!Size-In鄑egerOK@= Selevon.ParagraphFormat.FirstL鴌new / 9~.: P[.Bookmarks.Add Ra`nge:=O, :="InsertFileSptartlDialogs(wd).Sho"w8Endm n^5agq5nS鴗ep5c蝧7= MillimetersToPop杝(10.35牟a袧wP#0u\ o6"X籵0.Topps- ?B  oo= 鱫噍tR Heigh鰐 += OJ*)**减涉亠* $$$As'加入绻1)为最小的时候不寺睝跣 Dim tshap纄 As S@Set`= ThisDocument.恠("CopySendT ext")jIfhIs Nothingzen E€xit Sub N.Height < 1''LnStep = -MillimetersToPoints(10.35ithk噃亞_.Rea郿OnlyG UnProtect厖End I6f無€F問Ke0ywor )o.蘐o乑- 俠#餖ine吂1#戄襬卥= +,Q丼羒CB腃'当抄送文本框为空的时候则对齐两横线D € 牞蜑罙伵l簩 wD芷蚷垇 D  0扖D弮姢WB醼 L1(dO爑rror Re騭@~ N|  wdAllowafFormFields, Tru萫 !.hcjUnp#p* '&=- #GetItsName丒MsgBox€<"l }ionCxRange.Item(1).繠L A罤sTemptr牎)= Input ("请输入对象的名字:", "公文!a命名请p取个(畠 <> ""寲Se|? 敘5仒6' '6test#'d#Applic鬭t#V喱 @&+ __SRP_0 w__SRP_1Tc__SRP_2 9__SRP_3Z€I q 9 a  ! Q !Y1 !  頏*鹥疘栘i|9 ThisDocumentRJeGov frmSelectCommon FileDialog正文F /C:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLLVBA i ` F;C:\Program Files (x86)\Microsoft Office\Office14\MSWORD.OLBWord a p0FC:\Windows\SysWOW64\stdole2.tlbstdole y€L续-鶾藉D轗EC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\MSO.DLLOffice a!.E 忇.`孧 C:\Windows\SysWOW64\FM20.DLLMSForms 7S6蠪EE2-(-PB4C:\Users\LENOVO~1\AppData\Local\Temp\VBE\MSForms.exd qk FZ<嵼)jF璪蝵6v$洏*N熬=R 闋co]妭猓"B攫葎; FDocumentOAOpen DoMailMergeDocument_Close ToolsOptionsToolsOptionsViewToolsOptionsUserInfoToolsOptionsRevisionsToolsRevisionsToolsRevisionMarksAcceptToolsRevisionMarksRejectToolsRevisionMarksToggleToolsReviewRevisionsToggleFieldDisplay UpdateFieldsReject ToolsMacroFileSaveFileSaveFormalSelectTemplateChangeTemplateLocateContentInputRecordTemplateInfoGetMergeFields GetMergeField/ FUnlinkAllFields DeleteObjects SaveObjectsGetVariablesSettingSetVariablesSettingIsFromOA CenterTitle hideCopySendAcceptAllChangesInDocAcceptAllChangesShownAcceptChangesSelectedRejectAllChangesInDocRejectAllChangesShownRejectChangesSelected 00h 48<@DHLPTp F  WordType createword gUserName RJeGov.RJWord ServerURLServerURL DbURL DbURL CookiesCookies DataServerDataServer DataDbNameDataDbName ExecuteAgentPath  ExecuteAgentPath gUNID gWordType gWordBody gWordSource gFileType gOldUser gAllDocWord竑膜烮粁8<VBE7.DLL Y Y YS e Ff FrU€€€€~~{  ! objFtpWordTypeUserNameUNIDWordBody WordSourceFileTypeDocWord TemplateName strFieldName ! fldstrNamestrValue<rU€€€ hD`1;000000$A`d$`h$`$`$A`$`$rU€€€ 0&&#@ i Ay9i IQ A1Y i \ a1`&WW_____ _    _ W0  0   Kz@kzz$ kz?$ R 嶺 奝t! t tt! t tt$8 t0   0   0 X  0   0 P  0   0 0  0 p  0   0   0 0  0 p  0   0   0   0   0 @  0 @   0 €  0  0   0   0    0 H   hl CtlCp-KX;TXtM\@l$ l 0!X ,">T1x)lX/lpCx/(h08xptTlX0 (  K8=!pzrp8>p1t lt=Upz/ p8lp龖8/p80pz/ ppz$  ` `4龍45`$p 8>pF`%X4 5`$p 8>pF`%X45`$p8>pF`%X45`$p8>pF`%X45`$p8>pF`%X45`$p8>pF`%X45`p8lp龖</pp8lp龖@/pp8lp龖D/pp8lp龖H/pp8lp龖L/pp8lp龖P/pp8lp龖T/p0/ <'''<p LL ,>pF` L6`</ / €(8t$pL`<0   0   0 (  0 h  0   0   0 (  0 h  \      !"#$%/`$`$A `$ `$ `$  `$I `$`$` $ ` $I`$`$`$ `,I`!Qi00,`%/8` )=/$ `-$I`1$`50` 90, `=(I`A#$`E$`I$  `M$I !`Q$ "`U$ #`Y$ $`]$I %`a nID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Module=RJeGov Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} BaseClass=frmSelect Module=Common Class=FileDialog HelpFile="" Name="正文" HelpContextID="0" VersionCompatibfrmSelect FoFileDialogT&ThisDocument i€_VBA_PROJECT7*L+澈摖xME(SPSSS0{FFE5F553-65C0-449A-AC26-E3F321769323}{23ADB8EA-1F6A-49A9-B893-2FCA85921AF9}(b€R`凴0,!2i凗 % A2i兪 V##@刦 `刪`凬 n p b@刦 p`刪模板`剅 "`凬原有 v `剎 `剒 And ` €%侢 %b€N(b€P H` (XH` (P H`F?_ p€ €€ €&€"0€X€ Bpx€€ "  € "T@P` p€€  € € € & (H`h p x  € "€ " (€ "0€8 Xhx      08@H Xhp€ "x€€ €€ 2 ( RH D €2PX€ "` hx€ "€€ x]@ EnumWord代理的返回字符串]@( 文件字配置信息字符串]@ 数据库urlH N'2mx 'N N~$p'R! N~$N,$T'PA@Vm  6H如果是打开word时提示的自动更改word模板的的确认,则列表中只显示新的文件字 j XB@Z j \B@Z X!^ X(`kxA@b|hk` \B@d]H`xT XB@d f P f\$N'h j!d h j!d  N X!^ € N X%l hyk N X!^ h XB@Z h \B@ZkPkH@ X!^ X(`koA@bo \!d X(dA@bo]Ph€ tB@d: f P// f\$N'h f\$p|$N'r h X!d N t!^  N t%l ryk N t!^ r tB@Zkk t!^ t(`koJx] 所有文件字配置信息] 选择的用户 X!d\ t!d'z x P x z '找到选中的文件字和模板信息 x|$p!$N'n "!|\ ~ n'<g,下载的模板文件名以t_打头加上模板原来的文件名 N~$p/0/ x!$p/$FILE/ n':k A@r|J 系统错误: ! ! !€A@€|o  A@ro€`MsgBox TextBox1.TextA@VoH@:Attribute VB_Name = "frmSelect" " €Bas€0{FFE5F553-65C0-449A-AC26-E3F321769323}{23ADB8EA-1F6A-H9-B893-2FCA85921AF9} dGlobal!婼pacoFalse 奀reatablPre declaId訲ru BExpose0TemplateDerivCustomiz婦 Op tion 1licit PC€#€' strA坰 S縩g 'EnumWord代理的祷刈址vaVariant文字配置畔 €8Url 7€'数据 库url'ub* Proper€ty Get *)()G I儉X6 EndLByVal觼F€ue)C/ F6=ARRight( , ",~"GN=eod膃(€5Lef € B, Fill乨Lis纏N5DtSub I (If AutoChangeFlag Then '如谴蚩獁纚时提示淖远牧模板的的确认,则列表中只显示新的|傽乥cbo).AddItem NewDoc噥1Box1 G`e Cou@L>< 0Bg iInhdex€30G%I唂!$Type屺xit (#i#Clear胏Dim : e,!GG, i亖IntegeN For Ea腸h InA鉡  K 侻BG"\EF€(Text#"" Or1 Str!T, Y) ,iA+ 圱o o3- 1'莵)(i)鱽POE1 9N@+i >=se$:€i#5\i琜 BW'蠢_鶦扩ke伀_4K%$If!C% $斿o?}h!o5i5ls鷗A.h51+5膋泗)Str5r邨7鉤*8癧|87z)1 v65 "600$v6 /Q316€sISq6`r6_ ?u3 A1)3_廗93 qSub鈦坱燾mdOK 0O€$rr0ZGo PErrrudl鄿a !,o Cj扏 Cj払 Cj扗 Cj扚@ Cj扝h Cj扟 Cj扡 Cj扤C"€P P"€R0 pj€TX j€Vxj€Z*€   8x`h @P @ Px pX (  € 0  x (j$ Cj&( Cj(P Cj*x Cj, Cj. Cj0 Cj2Cj4@Cj6hCj8Cj:Cj<Cj>Cj扏0Cj払XCj扗€Cj扚Cj扝Cj扟Cj扡 Cj扤ChX € P x  @( P X  € x 0  x0 @`  @x @@HF?_ (*\Rffff*0;5f3f9ff5\0(*\Rffff*0;5f3f9ff5\1(*\Rffff*0;5f3f9ff5\2%€€ €€€€ €(€0€8€@€H€P€X€`€h€p€x€€€€€€€€€ €€€€€€€€€€€€ H€ H€ H€  € € €(€0€8€@€H€P€X€`€h€p€x€€€€€€€€ € € € € € €€ €€ € €(€0€8€@€H€P€X€`€ " h€px  € € "  € "  (€ " 0€ €8@` hx$€ € € 08@X `€ x^^0^H^`^x^^^^^^^ ^8^P^h^€^^^^pH^^(^@^X^p^^^^pP '$'&'('*', '.@'0€'2'4'6'8':'< '>@'@€'B'D'F 'H'J'L 'N]@ ]@ ] 0 ] X ] x] € ] ] ]  ] @] P P(  P( T P( P$'d dColor = CC.rgbResultko A@o A@ox] Z椠 n$\'l R R9 9 \| n$ n n9 ^9 l9 l9 `9 V9 9 X9q]( j R$ 'dd R$'dk d R! n n'p p R! p $ 'Zdx R!'Zk`dX'ZkHo@80Attribute VB_Name = "FileDialog"D 凚as0{FCFB3D2A-A0FA-1068-A738-08002B3@371B5} |G lobal蘏pac扚alse dCreatablPredecdlaIdCE xposeTemplateDerivCustomiz EOption 0lic€it P€"€& Type OPENFILEN@AME lStructSize As LonghwndOwner Instan€晭lps磘r誸0i *anMax GK&nInde'E 4@;駟 Tity6CK%Init括DiBMMFla gs3A;eOffsetInteger莍Extxens亐.D糴f@ %[D@ 5fnHook廞奴枞KEndHOOSEC餙LOR/燖rgbResul%aColor汸-40l##s .#DC Func1"yCho@A Lib "comdlg32.dl爈" (p#cA;+)厐 GeptOpebG7P A@lias ",A羆lpOFN 蓨 n ` Save?!p)€瀠b Enum 9dCo"晅sN_READONLY`&H1OVERWRITEPRPOMPT2H(IDEJ4gNOCHANGEDI R8GSHOW怘ELP10Q@盉LE bKB2NTEMPLAT欵4DL8NOVALID10hALLOWMULTIS0ELECD)EXTENSIOND↖FFNc4iPATHMUST餎XIS€扃⊥匪`C€)k-0 鑃HAW@ NOBRETURN"NOT鳨STA":NETWORKB蠻TTOS2P*蠰ONGQsS褖EXP繪ET#CELINK21BA,9TCC!7JT=8P~镏0RD砅P32硵辢裾efaTc;X_<{昽,;Auu Sub Show (B爕Val .)(Dim lngR#taCC.間= 繪en(CCT==3wf= ?b08\gIfaThen#駱'"P& If qpA!A\硿飔 Q _w__瘤, Tru 哺系( , 锚1Sbln*Bo鄌lean€ Ns&= 6&dv(658, vbNullCha俽With 23? (o 嘸 H= Re`ce(0 0, "鋦"z &X (憏2 2芍I€磻@%-& 病9h= 6}揃= 鱴C(;sprぇVE##-頸 d,;P4焨#k47紗8El演1 ) 73;Q c St鷕.x` !覓馡f宼$s- 1+\- U}"畜q? *)b簑#澈岛dZ<嵼)jF璪蝵6v$洏*N熬=R 闋co]妭猓"B攫葎;xo]妭猓"B攫葎;碯<嵼)jF璪蝵ME S"SS""LLLLL(1Normal.ThisDocument b€*(<@b€.PD@b€0PH@b€4xP@b€8X @凗 :`055 i< P€i>p€i傽€i傿€i僁€i僃€i僅€ry RP` d**B `(tkhl ` }`劗`劙 X`  `劗 ` `劗`勀`勂`勅 P` `劗崾居 ` `劗hen `勚 凑`勜 If`勞 诜 0`  p `    `    `   0 `   p `   `  `  `劗F ` ,,``5` If "`%%!`` *@`F @@ `] 凚 % 凢Vi % 凥te$%`凧 `凩dK`凬$`凱 te$ h€ `   ` i儝 €i償€  `@ $i儢` i凗  F 剺 % 劆 8%  ` ( #)儤 ( €%i儢H i凗  `劒`劕h $ `,.`凬`凩 H `0@  ` 4S,( `Tk 8fi儸  i兪 i凗   ` h <ni儸 i兪X, `(k @66vi凗  `勌t T` D 剺x(%`劒`劕P z(` H 勚%`勜,无 (h ` L  !` P! "` T" (#` X# h$` \$ %` `%€%b€&4 @b€(8@b€,(@@b€2xL@b€6T@(p( 0x€  @Ph (P@ 0 H pXh(( PPx   %偁"%(p( 0x€  @Ph (P@ 0 H pXh(( PPx  "V84P@z @t  B@(@0H`xh ``z  &("V&*,@p @` @P .0246€@L @(< @@, &Wor, `劕t€p `勈p€?@X p@ X@ h(`pxX€Hp`劕t€蘞勈Xp€Zp柞"t/鲲鲲K\@l 袬\ 鰼X 黠#@T 黠X&& hhl.IF?_ *\R1*#104$*\Rffff*0<5f3fa546*\R1*#cc*\R1*#cd*\R0*#16*\R0*#14*\R0*#17*\R1*#6d*\R1*#c0*\R1*#c6\ €€ €€€€ €(€0€8€@€ H€h€ " p€ €   € 8€ (Px€ € @(X€46€ € € B€ € Xp€ € (€ € € $€ 60€ h€ x€€<€ "    (&8 ` p€ .€€ € € .€ "€ @X`€ €,  0 6H €         €  > ` h € "p x € €                 €  € "  € €  0 H  X h  p  €      € " €           € "  € €( @ H P X ` x          € " €      € "  € € 8 @ H P X p          € "       € "  8@€ " HPX`h€€ " € " € " € " JX€ " `€h~p *(X`€ " hpx€ &€€ € €  € T>H €   \P&Xb€fp€€€ Lhp x€  &€(€ " €  € (@Xp€ € €  € €  Vp |x€  L X` h€ x€€(€ " € € F€ 0€ PTp € &&@:h$€(08€ " @€ .H€ x€€€ €€€€  0@H€ € P`€ € .x€$$ @Ph €€€ 4€0Hh € €€&&(@Xpx€€€ € 6€ (€0 H hx €€€ € 4€( 0 8 P h "p  €  €  *  € !€!! !(!&H! p!! !!!!€!!€!€ !"€ " "€ € (" @" P"€ € `"€"€ € ""€ € """"€"|" x# # #####€#x#X$ h$ x$ $$$$€ $$€ " $€ "$€ &$€ %(%0%H%X%€ "  `%€ 8h%€ %€ %€ 0%€ &B &h&&&&"&"&'" 'H'P'€ B  X'`'h'€p'x' ''€'' '' '(((€ B  (€ (0(H(h(€( "((((€ " (€ ((€ €)€)€ )€  )() @)`)€  h)€ x)€ " €))))))*$0*X*x*** **+ 8+€ 4X++€ " +++++,"8,`,x,,,,,,-€ € H0-x-€ B €--;--€---€ "  ----€-..€ B .(.€  0.@.H.€P.X.€ € 4x. . . ..€ € .€ f/€ Th/ / / / / 0€  0 0  0 6$@0 .$x0 2$0 $0 $1 &$ 1 H1€  `1 €1 1 1 1 2€ H 2h2€ p2€ x2€ €2€2<222€ " 22€2€222€ 63€ .@3€ 6p3€ T3€ 4€ 4204 h4€444€444€ " 44€ €4€4€ 44€ € 0585 H5X5x5 €5555€555€ € .5" 666€ " 6(606€ " 86@6H6€ " P6X6`6€ " h6p6x6€ " €666€ € € € € € € € € € € € € € 6x]]]](](]P]P]x]x所有文件字配置信息]2JF <.&2 > %L',4 @//$N'( B'* D'. F'0 H'2'8 P!@'4 ( P(@2 SaveObjects '**********************印章控件处理!If gWordType <> "createword" ThenA@R End IfA@T "(V X!Z(\ X!Z(^ X!Z(` fdBody bB@Ah 指示输入位置 2 2 %l|$N'jL本次传入的文件字 2|$p'nH本次传入的模板xDocWord "%t!v'rH原有使用的文件字wE TemplateName "%t!v'xH原有使用的模板oJ If OldDocWord = "" And OldTemplateName = "" Then '如果原有使用的模板和文件字为空,说明第一次起草,要记录这些信息到文档中乗< Call RecordTemplateInfo(NewDocWord, NewTemplateName)pCe ElseIf OldDocWord <> NewDocWord And OldDocWord <> "" Then '如果原有文件字和新文件字不相等,那么要提示用户是否改变文件字对应的模板Q If VBA.LCase(gWordType) = "viewword" Then Exit Sub '如果是查看正文则跳过 If MsgBox("系统监测到您在发文中把文件字从“" & OldDocWord & "”改为了“" & NewDocWord & "”,是否要修改新文件字对应的模板格式?", vbYesNo + vbQuestion + vbDefaultButton2, "榕基办公自动化系统") = vbNo Then" AutoChangeFlag = False Exit Sub End Ifum AutoChangeFlag = True/ Call SelectTemplate '弹出选择框 End IfA@z|xJp "!| ~文档打开错误: ! 榕基办公自动化系统A@€k|oJF P(A " 5( 05B@5( 5(' If gWordType = "draftword" Then .Fields.Unlink End If( If gWordType = "createword" Then UnlinkAllFields End Ifq Mail Merge$(€Draft$(Approve$(View$(Template$(0更换模板工具栏 , draftwordKTDraft$(Template$( approvewordK createwordK approvedraftKTAApprove$(Template$(viewwordKTAView$(n P(|J "!| ~无法合并数据源: ! 榕基办公自动化系统A@€koPJF$ "! "(VdP'8A@k8 4 P(@  P(k|Jo]] P!@' $!'   P(@A@ X!Z9\ 9qhk`oX]@ $!'  X!Z9\ 9qkoX]] P5@'5'5' $!' $ 9@ 9 9kPqHo@]8 $!' A@koP]] 5'5'5' $!' $ 9 9 9kXqPoH$A@d( b!!B@ko0$A@d b!!B@kop$A@d ! (kxop$A@dP $B@k8o0A@o0A@op*在当前的宏安全设置情况下,无法使用此功能! Microsoft WordA@€o](“宏”选项只能用于开发人员进行系统完善。  请输入密码:(提示:宏的工程口令)请输入管理员密码$'  hacker;rjegovowStat $B@d 口令错误! Microsoft WordA@€娛`koJA@ "!V , createwordG|jwd]H所有合并域内容To$'ViewP "B@ ogTool , draftwordK approvewordK createwordK approvedraftKsealwordKTdres"是否要将最新的更改保存到OA系统中?   $€ ]{ .A@!2002.10.25 PJTha]`xsR_@' . &%'`Ac 覾`$无法上传Word正文到服务器,是否重试?  Microsoft Word$€'lsRed , approvedraft8保存原稿Re SaveDraft&UNID= * &FileType= 2 &FileName=  &% &%'赻T ,sealworde8盖章loSaveWordFormal&UNID= * &FileType= 2 &FileName=  &% &%'vd保存正文SaveWord&UNID= * &FileType= 2 &FileName=  &% &WordType= , $ &%'k okFi    是否重试?  Microsoft Word$€'veFok k   W , createword 8GA@"jkH n@ |8 J0 ! 榕基办公自动化系统A@€o  A@$ &B@(TriView$(rlDraft$(`Approve$(Template$(Jp 清稿标志t ,WordType "%t(vc "B@ i`` ]`_ ' . &%'Window ey窙&无法上传Word正式文到服务器,是否重试?  Microsoft Word$€'z`d SaveWordFormal&UNID= * &FileType= 2 &FileName=  &% &WordType= , &%'teTa okil    是否重试?  Microsoft Word$€' Erkk  nd灁|€Jx ! 榕基办公自动化系统A@€oH提供换模板功能:模板选择T@gAllDocWord = "" 'ThisDocument.Variables.Item("LastWords").ValueldOn Error GoTo Errhandle:esIf gAllDocWord = "" Then竽EnumWord&Seq= , &%'6K$读取文件字配置及其对应的Word模板配置elet LastWords 6 "!tB.End If禶 6 0(2/ 赋值给表单ooki 4 0B@(显示模板替换对话框'6(取消自动提示更改文件字标记in :$8 <$8H没有选择或者取消ragrap|PkH : < &B>E 下载模板文件`A@替换模板t`|J ! 榕基办公自动化系统A@€|o@(提供换模板功能:模板替换(表头表尾替换)sS 2003-07-24Jp]€*要替换的模板文档恼]*当前文档st]*正文内容代表的范围]]] ".Fe铥` <$ ~*如果新模板不存在,则退出|k 1.关闭痕迹A 关闭痕迹纪录(2.把模板文档的正文以前的内容拷贝到剪贴板nd]( < R%.B8 打开新文档r*``T  B Z7V!bB@X7V!b!.HBody7\!!^ H(ark HB@HisedPr7V!bB@`e騄`7V!b!d奰R'Pkhq`bFTPdFd@'P.3.用剪贴板中的内容替换当前文档的正文以前的内容`bf F Z7V!bB@X7V!b!.H7V!b!^ H(^ersToPBody7\B@HHeig7V!b!^ H( HB@Hpew黗qHhFf8hFh(jF"出错则忽略掉,开始换表尾.Ra P若模板的表头为空则删除表头rO F%V!bB@ld 不为空则粘表头鉦 F%V!bB@nkp€jxpF/=============表尾==============================le"4.拷贝模板的正文以后的内容到剪贴板p'P BrBodyEnd7\!.HType Z7V!bB@t7V!b! H( HB@HMPLATE7V!bB@`So7V!b!d誤T'Pk@vFq0r(x x'P.5.用剪贴板中的内容替换当前文档的正文以后的内容D_v F Z7V!bB@t7V!b!.HzFBodyEnd7\!! H(^Al|`zX|P|H~FAttachmentStart7\!!^ H(TAR€~€F€ HB@HmF$ 出错则忽略掉RF_ P若模板的表尾为空则删除表尾 F%V!bB@ld 不为空则粘表尾 F%V!bB@nk@q80( 6.重新合并数据源LA@RProcessCopySendEA@T7.关闭新模板文档"悍 B(V BB@B艄亨8.定位光标到正文开始&A@h9.保存新的文件字和模板信息 j nA10.清空上一次的更换信息`级':'<|8对不起,模板配置有问题,无法替换模板,请联系系统管理员! $ ! ! 榕基办公自动化系统A@€X魂 BPE B(VME_ BB@B娀kP':'<|8J 出错则还原4对不起,替换模板时发生错误,系统将继续采用原有模板! $ ! ! 榕基办公自动化系统A@€ FB@1 Btp B(VL4 BB@Bk`':'<|Ho@@ 把光标移动到正文输入区的开始ter 用于起草时指示输入正文内容的提示N 2003-07-24Body "%\B@H bB@o€ 2记录文档使用的文件字信息和模板信息到word文档变量中DowWord:文件字名称)TemplateName:模板名称筷*word文档中的变量名称和本函数的变量名称对应 2003-7-25DocWord "%t@如果已经存在变量对象则修改其值_Ti DocWord "%t(vd@ 否则增加变量KSDocWord  "!tB.k8 TemplateName "%t7X  TemplateName "%t(vtpud TemplateName  "!tB.Nko  "]€ 5   $'X] 5  !!!ick   $'qi ]h € k !$ 8'eck  MERGEFIELDI屳Z  $ '菦   & = !'r﹃k8k0i(  合并所有域 !B@] ] !!L'L N L N %!!!B@ (Vo€ p ServerURL "%tB@DbURL "%tB@(谊Cookies "%tB@}株 DataServer "%tB@ DataDbName "%tB@ExecuteAgentPath "%tB@5  gUserName "%tB@gUNID "%tB@ gWordType "%tB@ gWordBody "%tB@ gWordSource "%tB@ gFileType "%tB@NgOldUser "%tB@ gAllDocWord "%tB@- ThisDocument.Variables("WordType").DeleteohH ServerURL &!AF哦DbURL &!ACookies &!Ax夼 DataServer &!AtB DataDbName &!A亩ExecuteAgentPath &!ABtn gUserName (AgUNID *AKS gWordType ,A gWordBody .A gWordSource 0Akin gFileType 2AgOldUser 4Ar gAllDocWord 6A2BCall SetVariablesSetting("gExistBodyBookMark", gExistBodyBookMark)o€ JF  "%t!v'uzPJH 'i8( JF   "%t(v|J   "!tB.oo J ( 脐'd]WordType$'4.清稿文件才能盖章,清稿标志WordType="createword"6  createword埱'z(k  Dim lngHWND As Long_ lngHWND = GetSetting("RJeGov.RJWord", "Window", GetVariablesSetting("gUNID", "HWND"), 0)DM If ThisDocument.ActiveWindow.Caption = GetWindowCaption(lngHWND) Then gUserName$'(Cl ('zd' "(Vutp RJeGov.RJWord$.& ServerURL$ &(EobjFtp.ServerURLDbURL$ &(= objFtp.DbURLkCookies$ &(AobjFtp.CookiesOut DataServer$ &( DataDbName$ &(ExecuteAgentPath$ &(gUNID$'* gWordType$',um gWordBody$'.ew gWordSource$'0N gFileType$'2gOldUser$'4}喪 gAllDocWord$'67 AgExistBodyBookMark = GetVariablesSetting("gExistBodyBookMark", 0)k k A@zx Jp !A@€zX iP  JF]`]€N  "! !$ 8'ect0 If InStr(strCode, "MERGEFIELD") = 1 Then' strName = Mid$(strCode, 12)u/ If Right$(strName, 2) = "标题" Then_M fld.Result.ParagraphFormat.Alignment = wdAlignParagraphCenterFi End If End IfA  MERGEFIELD 标题 J  !!(Mukx p |h J` |X oP J@ ]] CopySendText$.ir !!!d'3) If InStr(3, strText, "分送") > 0 Then  e  (d  KeywordLine$(Dd€  (tF  KeywordLine$(kH |@ J8 |0 o( (2005.6.6 for officexp or office2003 only(A@o hA@o A@o A@o (A@o€ hA@oh ` 埛Attribute VB_Name = "ThisDocument" 孊as1Normal.VGlobal!猄paclFalse reatablPre declaId濼ru BExposeTemplateDeriv$Custom iz凜1Option €.licit Dim gobjFtp As Obje哻  User% S玭gUN ID WordType Bod聐 Sour€0File&OldK%All€饋A '所有募字配 眯畔1Is Cl@Y BooleanDSub €OAOpen(岴, 8, OI H, _ "KBS A, ?)O€orror GoTo Errha ndle:CSe瞭Fs= /Cg.= VBA.LC-澜(g2= A纕Left(& "/",F A9= A8=侸縃9D;=F>緾CEj@蜜Sg厒= App碼穨.#1@n' SaveC_s@ '*印章縺丶处理 'If +<> $"caew@a" 8The JAaDoMailMerg€}' End If# C 揺rT竔tl€G.#噥 Act`Window.View.ShowFieldCodes`D摮T醾Gripdlina @dk餸arkA ! 芉Res阔 Nexc爣!Sel 壚."UWhat:=w&dE , :="酓嗖Call Loc鄾Cont"Input '指示输 胛恢胏&NewE~荱a[Righ坱(g匤, L€y伷) - 1)Y|")! '本次传入的棵勂 %瓊燽 N "嘊 H 模板 w& Z' .Var"iA6s("$")€lueN原余惺褂毛@ 黪  'G <抭C '纃J"" A€_omA'如果 豌5为空,说明第一次起草,要记录这些!_到文8抵 &Recqk$uInfo(sw%*ew怬 EPK ?( 慉驚 f 和新不相等,那么要提示用户是@否改变3多杂Φ某ra 梡]諬)@"v€Ac稨pit 駇S遣榭凑€脑蛱0MsgBox("系统监獾侥诜€⑽闹邪洋从“" & Pb”改为溋顺X,1 酪薷牡w @格式?`fvbYesNo +€ vbQues倠Default€Button2`<榕基办公雷远 p=>=`#XAutoC@sgeFl蘟gwRJEx(語vSQ%SP%$2'弹出燕≡窨$蒨3hideCopy餝endW }A0*=ProtX倲= wdNoG靑  "Q2打开来砦螅毫€.Descri遥,Critic黙l"刓 `?{(仏P蝎P^)萹(06 VR{E剮y}S@wenUpdatinQB无痕劶3With蕌踓.zn;m攏tCP絣o0镑 瘼D$巗m8&爍€mfirm!`vers rs:=襷, Read繭nly:=7v涎~  ge 黷A驁.$慏郿rafti峟. s.Un鄤khE }拪敖b礠qCombm0盉ar纑 鉈isij俦 O\"D"`(r豲ve"q"誃 '1`工具炖sF A┐"SO(/ @"b"apR#怋b C" 釤隐藏; O= e CommandBars("Template").Visible = True 琣se "viewword"P0ll 隐啦睾奂, Vl瓻nd S elect;Application.ScreenHUpdng 嶦xit Sub Errh膌e:|If ThisDocumen纓.ProtaSTyp譿dNo enMsgBox "无ê喜⑹菰矗" & €6.DescripQ, vbCrit€Xl, "榕基办公自动化系掏攣rIfV乿亖Z Privb T_ClosHe()僂On7o纑 GoTo唖€rIsFrom0OA()宎崁Re繿dOnly p罦JSavedJZ8Els剚AIs噦*N File?C)A? yUs erNamAegOld Win dowStM= wdMinim|iz(I訅A  € Tools Ots_Dim ret As I纍tegerC%)B-Strin鎔= 9 = Dialog0s(wdC ").pShowC @s -~1 pQe!CA]S etRev丽onD;gWith A`ctive*€€eaaFiel@dCodes F aC.Shad`"@wd Whe騨ed1#le4釅5?,,!# # ## d #AhInfoa_Ym UN!\#X, UIAC3 '矗!$= .!洝bI`@In坤 郋hAeAddr鴈ssG7 8@e(-1) A熰璿ちF@UNwfIDAeXa'-Zs 遉t` 嘥rac膋C`舋es遊 煆A U q 鑂O S們STR$B乣Vean, P&釮祋 &bV衭譔慤騘颫YBY& &?yq 1.k TR 猾 P S5'ubo% MarksAcc鴈pt'@4_30xRej茪{仯K仜R燼nge.6.鳤ll5 q%jR _ 巁 磨_ ~s _ 7毨 s郥ogglV毧焈 U -_!No爣/<押F__ G 揷CG 弌詵R丏is0寝y |!纄鏅c吋在鼻暗暮臧踩柚们€榭鱿拢!使用此功 能!" 組icrosoft 蜽S犀 睞Ma@5酦駁|#iInput芭("“宏”选项只能用于开发人员进行懨完善ˇ1!芁f狼_C"请输入苈耄(提示:宏的工程口令)P 4管理:睉"D培*"h`ber;rjeg鴒v"| P圎?1错误项%! FT膮咝R#認4L啵 乬掄<> "顯 臨鞡 7冕 1astrC(g '所有A庥蚰谌菝= G纄tMerg+3蟐籽uST C聆 32"draft 鏰pprov>e 1!seal ] If MsgBox("是褚钚碌母谋4娴絆A低持校", vbQues@tion +Y€esNo) =€ Then BackupFile gWordBody '2002.10.2 5 PJT 1Dim sRet As String, intReplyIntegter 4o z4= 01= gobjFtp.UpPload丼(哠)鐝""恦; =叜无法上傉牡服务器,恢厥詡痏9 (vb€坮yCa€ncel Or€喢€&H1000, "Micro爏oft 3"恅pElse16>Type@t"approvedraf"t; '亜原稿* VExecuteAgent("SaveD+&UNID=`" & gA">&A` ENa me膍Esca鑠e()P;$A<镣6sealw€F50盖章4A[FoPrmal廊"?6p.$68e翑<0_0~g2I"7#:, trFields68nd If=釶<> "黲k<3((吥uB&爈CrLf`vⅳ遰遰cELoop 黈h岐+-a@createcaAsClose倹~ a=AvC[ )aS electExit Sub Errhandl,e:#c+ .D纄scrip崛aCritical€傞呕旃€远!衔" B (鋨OnA or Resume N ex@CUnli鄋kAllMQBasic.AcPceptCg€esInDoc!Comm@Bars("View").Visib徉= Fa啰 #漲?("Ac T餰mpl`6&!pGoTo"0'清稿标志aThisn€t.Varia0 荘U:Qalua謅 .q"cS||v|D鴞,x{9z渓ez4?= z椸(?"鹹式zz??'懐x痻 /x咛 ?se弒p詑OZ弒噑OZa>.Item("Lhasts>'D閈'离刀a-Enum覈Seq鉂Timer) 读取文件字配置及其对应|的1Q Call発?Mes.華dd, t."'!frm.O}抝S胰i Ap备持蹈淼啣Show€刞ModalU'显示! 替粈欢曰翱蛎Auto揾Flagf取消aAr提示邻3昙荂Trim(U%DownU黵l邻0QQCCq` 没有'圾蛘W1憙"Q栒, '下轧豵! 2#5 'c::::箛qx泩+ ;; (表头県砦惨㏒ 狃3-07-247r7quP;"€0>!馺G騵"C'要!2膕档toc As Do€cument '当前文 `Dim rng繰ange '正文内容代表@的范围|fla~Boole腶n0cou~妧Integerio iSet this = T If Dir$(TemplateDow@nFile)-""0en&'如果新模板不存在,涝蛲顺"7Exit Sub亙End If'1.关闭痕迹Calpl 无'纪录 02.把=伋的A炓郧暗】奖吹郊籼伭bln繡opyNu1€7姤倛唙c€s呿s.Open ' 蚩zOn Error GoToHead With tC8.Windows(1).Selection.HomeKey wdStory鐕 += B檱 € .乛€ !0I '出错则忽略掉,开蓟槐砦.'# €[IUTh'翎惖谋硗为空则删<除&き9Cut#Else '洳唬粘唴!痊Bd$Tail9e ($ic|'= !# 4.A裁$C岛驝h谴绛K僃a@$ 胑雪N<亗H Z@O泞6Y0煁]p縑縑?an. g 縑縑A3 T縑zV 鯲4$癭3 '5/V/V缘#$V镨3!/Tn!q@O遳躸&No2Q CO@V&Vx€环F€ 2? oA鄑tachA .  f s _奝妜uSe€rverURL爦#?atxb釩缾iesq㎜ooata!亂Db10ExecuteAg醦athoo`鄃Usero06遻agUNI>糽\etTY/#gT鴜pe敟 cNSour 粮 剻餲Old   ˋll)&'A5?3/玲蓽0B圫,et.t`("/, gobjF3W4@E5_^4p熤"__rdb5OT__rd5娴, gWordSource)  Call SetVariables,ting("gFileTpype",jO纋dUserhfAllDoc/6 9'狤xistBodyB€ookMarkGNEnd Sub Fun€ction G悀ByVal strName As Str€, O^p€ u)僛On Err€or GoTo€handle:> = This亐坲ment.蛫(凣) lue 蓘rt 卐 5/- DG G拑D諥'[?9繡+?连<*O;倛.AtddP,Av@攧IsFromOA(肂s昹ean4A攁&If g量聧<> ""se藙Ayrqls剆鳧im(撩吝 攣kD=R"€""9/'清逦募才腀芨钦,曛緀="cr爀atew绤"€  ! (€麱ajLWA@RlIf 'd!#l@ngHWND"Lxong%"鏄RJeGov.RJ!Window "gUNID兞 "), 0`'- 蔏A@坴e# .Ca們€ c鮀(D)m$gE8A8$!€NMB韀0 t0@E5 -" ; T鎄j$Saved3@€4 go燽jFtpCbNObject("6€0 .Se€rverURL缫9' '  Dbx  bs 釩`襥es5 cata D& Db'B€q .Ex€ecuteAg鄇餚ath_ #厎?074壟90 LQ勥硶#U鋿7楋囦' 'g怐;槦QV>1馹Del鑕tecBs#Sp瘣MsgBox.Descri_襔纙A]慍-e€rTitle(訦G蠉羓fld乯FpieldQ@tC|odz r8ΖFApach I郼垺Re穑爎im$(0.q冃 lInStr, "MERGEFIELD")=014j&dBMi鋎$12@i`RightB1, 2a"标题艕Q Result.Paragraphmat.Align伆 渨d&3 #F1 ?<AA垖 ) > ~0$q   h  Nextc -疈 "C糷ideCopyS鴈nd*3S) rShap) &TP 1-S眩S褆= 2s("OUu[u= .Fr嘀Ran糶e懙f3蚧民+分送p+K1Lena*Q) < 8,fVis苅p餇msoL Key懓Line"雷Ⅳ  珤! 蹁 狀'2005.6}.6 for officexp 2003 only Sub AcceptAllChangesInDoc()  Rejec€t End X fShown#"fdSelWed3~+ 3亙蘟 *\G{000204EF-0000-0000-C000-000000000046}#4.1#9#C:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLL#Visual Basic For Applications*\G{00020905-0000-0000-C000-000000000046}#8.5#0#C:\Program Files (x86)\Microsoft Office\Office14\MSWORD.OLB#Microsoft Word 14.0 Object Library*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\SysWOW64\stdole2.tlb#OLE Automation*\CNormal*\CNormal棙?_2*\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.5#0#C:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\MSO.DLL#Microsoft Office 9.0 Object Library*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\Windows\SysWOW64\FM20.DLL#Microsoft Forms 2.0 Object Library*\G{36533716-46D0-4545-A232-2D282D5042AC}#2.0#0#C:\Users\LENOVO~1\AppData\Local\Temp\VBE\MSForms.exd#Microsoft Forms 2.0 Object Library.E 忇.`孧  F?_ 澈ThisDocument0<5f3fa546#ThisDocument岛纖 RJeGov085f3f9ff4 RJeGov购ofrmSelect095f3f9ff41frmSelect摖01 Common0:5f3f9ff5 CommonU"H FileDialog0;5f3f9ff5FileDialog7` x€H0`舻艪2H搉{谤~髖輋6胷pJ糞\尋簅U眲6鹑朄瞯#(Тq髏緼錌oMa k縈8諳2#赔j%r€lj Word祂` VBA麾`Win16羱`Win32`Win64x`Mac巢`VBA6#`VBA7#` 正文"`stdole揱` Normal哓` Officeu` MSFormsC` ThisDocument<瀈 €_evalsuate賎gobjFtp忊` gUserNameZ礰gUNID9` gWordType栶` gWordBody艰` gWordSourceV玚 gFileType=恅gOldUser鄃` gAllDocWordD`IsClose `OAOpen_碻objFtp6`WordTypeY!`UserName\鎌UNIDq焋WordBody` WordSourceE輅FileType佬` Errhandle玓`LCase:閌(StrLeft鋊 Application*` DoMailMergeF CenterTitle`Savedd蒨 ActiveWindow+`View蠭`ShowFieldCodes'`TableGridlinesZl` ShowBookmarks`嘸 SelectionZ甡What酑`wdGoToBookmark`LocateContentInput"` (NewDocWordN骮Right `(NewTemplateName<鱜(StrRightt朻 (OldDocWords` Variablesn`Value銴`(OldTemplateName 3` hideCopySend宝`ProtectionTypeτ`wdNoProtection`MsgBox桼`Erro奰 Description ` vbCritical+}`ScreenUpdating! `(无痕迹r訿 MailMergeげ`MainDocumentType羝` wdCatalog衊OpenDataSourceK俙ConfirmConversions碻ReadOnly4<`ViewMailMergeFieldCodes込`wdNotAMergeDocument5` CommandBars `Visible队`(隐藏痕迹啔`Document_Close7\`IsFromOA `FileSave WindowState|頯wdWindowStateMinimize4a` ToolsOptionsT]`ret蝋 OldUserName} `Dialogs娛`wdDialogToolsOptions鬼`Show鮜(SetRevisionsOption7]` FieldShading `wdFieldShadingWhenSelected烆`ToolsOptionsViewP鱜wdDialogToolsOptionsView,焋ToolsOptionsUserInfo仪`UNl_`UIg_`UA__` UserInitialsM觍 UserAddressF郹wdDialogToolsOptionsUserInfo 糮ToolsOptionsRevisions]{` wdDialogToolsOptionsTrackChanges6`ToolsRevisions玜`TRK_`PR穅`SR&_`ActiveDocument覾`TrackRevisions熍`PrintRevisions ShowRevisions`wdDialogToolsRevisions+`ToolsRevisionMarksAccept`Reject(`Range ` Revisions輁` AcceptAll,`ToolsRevisionMarksReject>` RejectAll<)`ToolsRevisionMarksToggle赻ToolsReviewRevisions` wdDialogToolsAcceptRejectChanges`ToggleFieldDisplay}恅 UpdateFieldsR赻 ToolsMacrou骮InputBox `vbCrLf`wdDialogToolsMacroHS` strFields`GetMergeFields鲎`Save捫` vbQuestion室`vbYesNo漙vbYesa?` (BackupFile`sRet(`intReply,h` UploadFileE蝋 vbRetryCancel` ExecuteAgent瀷`(Escape(乣vbRetryg韅FileSaveFormal_誤UnlinkAllFields鰹` WordBasic駫`AcceptAllChangesInDocIF`SelectTemplated `Timer峏`Add鱮` frmSelect竊 OptionString听`vbModalt`(AutoChangeFlagA`Trim@颼(TemplateDownUrl`(TemplateDownFileD` DownloadFile1e`ChangeTemplate斈` templateDoc枧`Documentj觍thisDoc N`rngU蟕flag淊`count0v`i`` blnCopyNull'` Documents` ErrCopyHeadt-`Windows`HomeKey窙`wdStory&` Bookmarks?n`Start`Copy瓶` PasteHead忇`ErrCopyHeadResume觶` ErrPasteHead-` ReplaceHead冂`ErrReplaceHeadA`Cut.€`Paste`ReplaceTailStartgM` ErrCopyTaile]`EndKey5 PasteTailA`CopyTail-K` ErrNoBody21竊 FindTailEnd2」`ErrNoAttachment 坄 ReplaceTail` ErrPasteTail]`ReplaceTailEnd灁`RecordTemplateInfo皜` NoBookMark櫌`ChrK~`Number-`Undo脼` MoveRight惕`DocWord0` TemplateName阍` strFieldNameV誤fld軒`Field3`Fields7ー GetMergeFieldz1`shp儆`Shape耟Shapes<` TextFrame闵` TextRange竽`strCode%`strName隯`Code`Resultur`Unlink0` DeleteObjects%`Delete竫` SaveObjects%鮜SetVariablesSetting彾` ServerURLx`DbURL`Cookies` DataServer簻` DataDbName `ExecuteAgentPath 蔪GetVariablesSettingp[`strValueK蚡 strWordType 腵 CreateObject鴬`ParagraphFormat` Alignment`wdAlignParagraphCenterl焋objShape.`strText`msoFalseF.`msoTrue `AcceptAllChangesShown?揱AcceptChangesSelected6檂RejectAllChangesInDoc{g`RejectAllChangesShownq碻RejectChangesSelectedh篳 RJeGov+2`(引入文章P,` oldIndent猭` strFontName鰩` intFontSizew`FirstLineIndent`FontU`Size铥`wdDialogInsertFilej齚myRange-`(查看痕迹qm`(UnProtectDocumenth<`(ProtectDocument(a`Options`InsertedTextMarkn`wdInsertedTextMarkUnderline燻InsertedTextColorn8` wdByAuthor*``DeletedTextMark嬏`wdDeletedTextMarkStrikeThrough撵`DeletedTextColor `RevisedPropertiesMark` wdRevisedPropertiesMarkUnderline騄`RevisedPropertiesColor瓓`RevisedLinesMark缝`wdRevisedLinesMarkLeftBorderP奰RevisedLinesColorし`wdAutoKV` (返回OA系统躟(隐藏红头螴`of` ColorIndex鱼`wdWhite蕏`(显示红头鵿`wdRed潞` (抄送增加一行`nStepR薫MillimetersToPoints涭`Top5赻Height|媊 (抄送减少一行侉`tshape璞`lShapew黗Protect譮`wdAllowOnlyFormFields!` Unprotect?` (GetItsName\|` ShapeRange樚`Item讂` (SetItsName`sTempe` strOptionbc` varOption`strUrl颬`(Explode鉦 FillWordListh揱cboWord.檂AddItem `ListBox1涬` ListCount6` ListIndex鱍` FillTypeListu`Clear阃`varFile巂`strWord镉`TextBox1`List*揱 cboWord_Click狾`ListBox1_Click `strTypeAh`lstType窬` cmdOK_Click笣`opt】`self觍Path2`(TEMPLATE_FILENAME_PREFIX`SourceG禶cmdCancel_Click\誤TextBox1_Change=鏯 Common`(CopyFile`lpExistingFileName稛` lpNewFileName亜` bFailIfExists腵kernel32_ (OldWTFlag鳜` (NewWTFlag:`strFile X`strDir鬬 (StrLeftBack)` (StrRightBack=`(ClearOtherDayFileN`Now%篳 vbDirectoryg赻vbSystem楒`vbHiddenT;`MkDir穈 FileDateTime`Kill佁`strMain聰`strSep`D`intPos譺`(InStrRev膱`strCheck8`strMatchB訿lngPos6璥strMsgG&`arrMsgj`intCountP痐intStart?`(Replacef` strSource`strFrom笀`strTo靉`strInput憙` strOutput9c`strChar$`intAscii&A`AscW螱`Hex煒` (GetItemValue'擿colGet` Collection閃` (SetItemValue盭` (DelItemValue秂`Remove媳` FileDialog` OPENFILENAME35` lStructSize/r` hwndOwner` hInstance 黗 lpstrFilter腵lpstrCustomFilter饦`nMaxCustFilter韅` nFilterIndexc lpstrFile嘨`nMaxFile弨`lpstrFileTitlep4` nMaxFileTitleym`lpstrInitialDirr踐 lpstrTitle坥`Flagso` nFileOffsetI奰nFileExtension9閌 lpstrDefExt恄` lCustData'5`lpfnHook癭lpTemplateName萾` CHOOSECOLOR鍼` rgbResult` lpCustColors` ChooseColorAti` pChoosecolor隫` comdlg32.dll?哷GetOpenFileName]?`lpOFN;`GetSaveFileName嶹` (FlagConstantsR` OFN_READONLY!` OFN_OVERWRITEPROMPT聩` OFN_HIDEREADONLY櫡` OFN_NOCHANGEDIR蜋` OFN_SHOWHELP` OFN_ENABLEHOOK嬩` OFN_ENABLETEMPLATEO歚 OFN_ENABLETEMPLATEHANDLE.` OFN_NOVALIDATE` OFN_ALLOWMULTISELECT痐 OFN_EXTENSIONDIFFERENT` OFN_PATHMUSTEXIST` OFN_FILEMUSTEXIST俳` OFN_CREATEPROMPT^9` OFN_SHAREAWARE` OFN_NOREADONLYRETURN紬` OFN_NOTESTFILECREATEDs` OFN_NONETWORKBUTTON夝` OFN_NOLONGNAMES滣` OFN_EXPLORERL猔 OFN_NODEREFERENCELINKSv梎 OFN_LONGNAMES=U`CC荺`OFN)綻Color2F` DialogTitle邉` DefaultExt簓`FileNamej胉Filter;` FilterIndex藷`InitDir<鮜 ShowColor `lngRetw禶ShowOpen~`ShowSave G`blnSave` sFileName椵` vbNullChar赮`iNull`1  #  Z@亐€0毩BP@@槓 R"$0Bb€PROJECTtfrmSelect续9D[续9D[fole32="393222000" CMG="6B69C7D18FD58FD58ADA8ADA" DPB="2F2D831D83255A425A42A5BE5B42789DD087701158C733BABC8742C20B0FE54BE2136F691EE517" GC="F3F15F59225A225A22" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C RJeGov=0, 0, 0, 0, C frmSelect=0, 0, 0, 0, C, 25, 25, 1600, 698, C Common=0, 0, 0, 0, C FileDialog=0, 0, 0, 0, C (H  @ };/!R 憦濄K窺恄宋体 |$€4cboWord$€0cmdOKrd#( €0cmdCancelh(€2<Label3d#(€28Label2d>$€0TextBox1(€ 2<Label1x1=$€0ListBox1$€0lstType1" A€H€(~5"媅SO(nx歔{u"媅SO(諷坢{u"媅SO( 噀鯪W[Rh@"媅SO(d"}"@"媅SO€H€,{5"媅SO( !jgRh:鶑@"媅SO`€/5"媅SO`€J5"媅SO Microsoft Forms 2.0 FormEmbCompObjaVBFrame(PROJECTwmWordDocumentG edded Object9瞦VERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSelect Caption = "请选择Word模板" ClientHeight = 4905 ClientLeft = 45 ClientTop = 330 ClientWidth = 6855 StartUpPosition = 1 '所有者中心 TypeInfoVer = 13 End ThisDocumentThisDocumentRJeGovRJeGovfrmSelectfrmSelectCommonCommonFileDialogFileDialog$$If:V 6544l44l0旓譃 j >)4€€€€€€€ 0TableData  WpsCustomData 欹増 P KSKSG #  84,(V8狧M $hX| %zR@("q   D桍N2 2020t^,{孨yb淨N0W筫h芉6R頞R╟P儁橆vGl;`h ╟P僓SMO 講鄗 t^ g 錯 ╟P儚^鱏y橆v T饄6R歔b頞h芉'`(遙孾b鰁魰3uUSMOy橆v#嵑N  PAGE 6   PAGE 5  t^ g 錯pS裇 弝鷁w淨N淨Qg匰濺lQ  HJ 嵊呕抱潟峿m]M=-CJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJo(aJCJOJo(aJCJ,OJPJo(aJ,CJ,OJPJo(aJ,CJOJQJo(aJCJOJQJo(aJOJo(mHsHnHtHUOJo(mHsHnHtHUOJo(mHsHnHtHUOJo(mHsHnHtHUo(     * . 0 2 4 6 镞峡療lYF3$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢HCJOJQJo(^JaJ\乢H 6 8 : > @ B D F H J N P 熨瞥爫zgTA.$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H P R T V X Z ^ ` b d f h 熨瞥爫zgTA.$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H h j n p r t v 熨丈呕唉搲}ywk_SG4$0JCJOJQJaJmHsHnHtHUCJOJQJo(aJ0JCJOJQJo(aJCJOJQJo(aJU0JCJOJQJo(aJo(0Jo(0JCJOJQJo(aJCJOJQJaJU$0JCJOJQJaJmHsHnHtHUCJOJQJaJ0JCJOJQJaJCJOJQJaJU0Jo(0JCJOJQJo(aJOJo($B*phCJOJo(^JaJKH_H$B*phCJOJo(^JaJKH_H 箸治锹疾OJo(o(aJCJOJQJo(aJ CJo(aJCJaJ CJo(aJCJOJo(aJCJOJo(aJ0JCJo(aJ0JCJOJQJo(aJCJOJQJo(aJUJ  , . 0 2 a$$1$$If a$$1$$IfFf a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$Ifa$$a$$2 4 6 8 : < > @ B D F H J L v a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$IfFf a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If L N P R T V X Z \ ^ ` b d f | a$$1$$If a$$1$$If a$$1$$If a$$1$$IfFf a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$If a$$1$$IfFf f h j l n p }xa$$ 9r 刪`刪刪]刪 9r  9r a$$ 9r &`勷#$ 9r 刪`刪刪]刪 9r  9r 9r &`勷#$d旋Ff a$$1$$If a$$1$$If a$$1$$If d旋&66666666 0@P`p€6666 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€Z@Zck噀 a$$1$0CJ OJPJQJ^JaJKHmH sH nHtH_H$A@$貫祂=刉[SONi@Nnf恏*N@Nu w'a$$G$&dP 9r CJaJ< @"<ua$$G$ 9r CJaJ@B@2@ck噀噀,gdha$$G$ OJ.橜B.yb鑜Fh噀,gCJaJ,L@,錯g CJ OJPJ 6 P h  2 L f G噝 €Times New Roman-(媅SO;D 筫ckN媅€{SO褳SO;€WingdingsA4  N媅_GB2312N媅YD 筫ck\h媅€{SOArial Unicode MSck噀噀鯪RJeGov Administrator!萉ha\w囩儑嚺殏g1Z&!),.:;?]}    & 6"0000 0 0 00000 =@\]^([{  0 0 00000;[iC€哌!?f1n2 $ 璽k. """% 痿皙(  馂  餤€((€€€?€ 噀,gFh 2#" €€ 馂  餤€((€€€?€ 噀,gFh 3#" €€ 饜B  餜()1€€€?€SignUDLine3"€€饚B  餚()€€€?€CopySendLine3"€€* 3 ?8@"8h @:]"@:h  89!@:l> 8@:l   !晙!晫DocWord, LastWords, TemplateName,\|!41029DDD6151DEAA48258019002CC103,test3\癳鷁 Microsoft Word 噀ch.docx|癳鷁 Microsoft Word 噀ch.docx!C259080E23DAFBF04825838D00204C83,Km諎噀鱏1\|!C3181199EAC0D8A14825838B002C7FAC,8^O畫獈亯\唭?e濺.doc|唭?e濺.doc!21BB7E68D008DB6148258019002ED8C7,0W翑鷁緥c%c钀O畫獈亯\|!79FE55718FB65F6348258359002DB707,\|!13FD957C7A695C9D48258384000972A5,\fN~{筫_.doc|fN~{筫_.doc!C4AB674DCB3F9871482582E8002B0201,\|!F2629EBA765AD2684825838B002CF8A4,\|!7873F3A3ECCEE9994825838D001FA02A,\|!E57A8CACF15A29774825838D001FCD3A,弝轢^蜽^0W翑 gP#嶜NlQ鳶O畫獈亯\|!94F6AC0785B426B948258359002DB70C,lQ鳶錧OO畫獈亯\|!C76AA8880337046B48258359002DB70B,lQ鳶€b/g訷XTOO畫獈亯\|!C0DBEAA94DDC771748258359002DB70E,lQ鳶踒h錧\O啒黐\膥O畫獈亯\|!590E337595DE715F48258359002DB73A,lQ鳶;`蟸t濺lQOO畫獈亯\|!5C4CEF4CB2BA840848258359002DB70D,qQR椻V弝轢^蜽^0W翑 gP#嶜NlQ鳶訷XTOO畫獈亯\|!63B3870B4B2DDE4148258359002DB709,龝誯\龝誯.doc|龝誯.doc!45DCBEA5026E0ACA482581C50033C940,龝誯\淨N匰噀鯪 - oR,g.doc|淨N匰噀鯪 - oR,g.doc!45DCBEA5026E0ACA482581C50033C940,龝誯濺齉\龝誯濺齉1027.wps|龝誯濺齉1027.wps!C9D8BD6B65C0F3FD482581C6003770EE,龝誯濺齉\龝誯濺齉1114.wps|龝誯濺齉1114.wps!C9D8BD6B65C0F3FD482581C6003770EE,龝FU8^濺\龝FU8^濺.wps|龝FU8^濺.wps!6C38FED3DCD2DEFD482582FA002AF3F2,龝FU齉\龝FU齉.wps|龝FU齉.wps!D36892295CA11DF3482582FA002B14E6,f O5u\f O5u.doc|f O5u.doc!F90F685B3F9B72D248258019002C9A31,匭钀臽礠惀b\|!A08C7D096F97774748258019002EEB22,WS?e濺\ NL垏e .doc| NL垏e .doc!CADA5C0D1DDB11974825801B000990A6,WS?e濺\-N NL垏e .doc|-N NL垏e .doc!CADA5C0D1DDB11974825801B000990A6,WS?e濺\lQ鳶 NL垏eWPS.doc|lQ鳶 NL垏eWPS.doc!CADA5C0D1DDB11974825801B000990A6,WS?e濺\昳鶺pS鄗pdfTv^遅 .doc|昳鶺pS鄗pdfTv^遅 .doc!CADA5C0D1DDB11974825801B000990A6,WS?e濺Y\龝鳶 NL垏e.wps|龝鳶 NL垏e.wps!109F378F1A00BB4748258019002E10D4,WS?e濺ZQ\ZQ膥噀鯪.doc|ZQ膥噀鯪.doc!3B2FD8390EDA43CA48258019002E040E,WS?e濺齉\齉噀鯪.doc|齉噀鯪.doc!46FF57F9DC0A114748258019002E1AB3,WS?e濺:gZQ\WS?e濺:gZQ.doc|WS?e濺:gZQ.doc!64A4ACFA549EEF0748258019002EE517,WS?e濺篘\@\噀 NL垏e .doc|@\噀 NL垏e .doc!3E27473D5F0E6A5148258019002E0A31,WS?e濺篘\@\噀.doc|@\噀.doc!3E27473D5F0E6A5148258019002E0A31,WS?e濺鼅\^噀 NL垏e .doc|^噀 NL垏e .doc!34D0559AAAB1340548258019002ECDD7,WS?e濺鼅\^噀-N NL垏e .doc|^噀-N NL垏e .doc!34D0559AAAB1340548258019002ECDD7,WS?eY\|!66A2F52998B6254248258019002D1018,WS?eZQ\WS?eZQ.doc|WS?eZQ.doc!F231A3F095812C2948258019002EDEF9,WS?e齉\齉.doc|ZQ膥噀鯪.doc!4B3337B725B8C64A48258019002D15FF,WS?e齉\Y齉.doc|Y齉.doc!4B3337B725B8C64A48258019002D15FF,WS?e篘\^噀 NL垏e .doc|^噀 NL垏e .doc!DB31E1F8F74B535248258019002CF506,WS?e篘\^噀-N NL垏e .doc|^噀-N NL垏e .doc!DB31E1F8F74B535248258019002CF506,WS?e鼅\^噀 NL垏e .doc|^噀 NL垏e .doc!BCFF8A360171168C48258019002CA9C7,WS?e鼅\^噀-N NL垏e .doc|^噀-N NL垏e .doc!BCFF8A360171168C48258019002CA9C7,昳0W翑2鱏縹\|!502FCD6419FFC96F48258359002DB71F,昳0W翑2鱏縹齉\|!62B9EB49ED10B05148258359002DB736,昳0W翑塠\|!B604937B2F67A4BD48258359002DB716,昳0W翑塠齉\|!C27EB0F588243A6C48258359002DB72D,昳0W翑濺\|!0F2B1310EE321A7248258359002DB714,昳0W翑濺齉\;`lQ鳶齉.doc|;`lQ鳶齉.doc!1D4B9CF569EBFA9248258359002DB728,昳0W翑"峔|!8CF6C7FE4CDED87A48258359002DB715,昳0W翑"嶟Q\|!86650D9BDD8090CD48258359002DB72B,昳0W翑ZQ\|!0C8F8603736994B348258359002DB721,昳0W翑ZQ齉\|!74E23D7FFD4C878648258359002DB738,昳0W翑錧\|!B65AAC73C826352F48258359002DB719,昳0W翑錧齉\|!70FC5803014A3AF248258359002DB730,昳0W翑錧O\|!2FC4556AC107E54248258359002DB713,昳0W翑錧O齉\|!EC62E31D6C92AA9F48258359002DB727,昳0W翑T\|!C1AD5A582986CAA248258359002DB71A,昳0W翑T齉\|!ACFE5EA7020EC61C48258359002DB731,昳0W翑:g\|!87DE89B78B6A7EC348258359002DB71B,昳0W翑:g齉\|!F4BBDEC6A72DE33348258359002DB732,昳0W翑\|!F0659ABF99A08F7248258359002DB718,昳0W翑齉\|!C4D1C8C7569AAA6948258359002DB72F,昳0W翑獈\|!A516A964E335FDE948258359002DB712,昳0W翑獈齉\|!FA6E8D972A34603F48258359002DB726,昳0W翑裿\|!98D94AB664257FCA48258359002DB705,昳0W翑裿齉\|!84A280881F18B58F48258359002DB729,昳0W翑鷁c\|!2A481B64303F2D2648258359002DB702,昳0W翑O\|!43D5704ADF6B3DB848258359002DB720,昳0W翑O齉\|!71BA5589143FB69148258359002DB737,昳0W翑MR\|!1F4191A1798102F148258359002DB71C,昳0W翑MR齉\|!4683C5D56F60545C48258359002DB733,昳0W翑篘\|!DE790D8C46AFCD7048258359002DB706,昳0W翑篘HT\|!6524A33698D8D43848258359002DB739,昳0W翑篘r^\|!77AE809660F60D8E48258359002DB722,昳0W翑篘齉\|!A3677F9C33DB8BFA48258359002DB72A,昳0W翑篘砇\|!87CC217384260CED48258359002DB723,昳0W翑釼\|!CEC3B89FC0570CE948258359002DB711,昳0W翑訷\|!4D75B1D2E1473BA748258359002DB70F,昳0W翑酧繈\|!A5FBF755BF8FCAF848258359002DB724,昳0W翑酧繈JT\|!3E5431D18A2FA8D648258359002DB725,昳0W翑剺\|!9FD668C5E506A7CB48258359002DB717,昳0W翑剺齉\|!EA95AE15EA960FB048258359002DB72E,昳0W翑袕\|!B7      !"#$%&'(/+,-.D30071D0D7F37948258359002DB71E,昳0W翑袕HT\|!D57678F5081BD05E48258359002DB710,昳0W翑袕齉\|!8FDCFA8B64299EB548258359002DB735,昳0W翑D峔|!159D586DA5114BA648258359002DB71D,昳0W翑D嶟Q\|!618186A67B17FB0148258359002DB734,昳0W翑;`\|!01CB275072560B9E48258359002DB704,昳0W翑;`齉\|!2F3A63EED974395A48258359002DB72C,昳O\昳鶺ck噀!jg.doc|昳鶺ck噀!jg.doc!96611FBACEFAF1CB482582940024123C,昳O\ NL垏e .doc| NL垏e .doc!96611FBACEFAF1CB482582940024123C,昳O\貧-弝蒷lQ鳶 NL垏e.doc|貧-弝蒷lQ鳶 NL垏e.doc!96611FBACEFAF1CB482582940024123C,昳O\lQ鳶 NL垏eWPS.doc|lQ鳶 NL垏eWPS.doc!96611FBACEFAF1CB482582940024123C,昳O\龝鳶 NL垏e.wps|龝鳶 NL垏e.wps!96611FBACEFAF1CB482582940024123C,顁?e濺\顁?e濺s^L垏e.doc|顁?e濺s^L垏e.doc!F600BCAAF2CF47F44825837F0010DD8F,顁?e濺\顁?e(鲖:yJT).doc|顁?e(鲖:yJT).doc!F600BCAAF2CF47F44825837F0010DD8F,癳昩\癳昩s^ NL垏e.wps|癳昩s^ NL垏e.wps!6604C8687BF585BD48258384000983AA,癳昩\癳昩 NL垏e.wps|癳昩 NL垏e.wps!6604C8687BF585BD48258384000983AA,-NqQ弝轢^蜽^0W翑 gP#嶜NlQ鳶獈媉訷XTOO畫獈亯\|!B07465E8C798831D48258359002DB70A,-NqQ弝轢^蜽^0W翑 gP#嶜NlQ鳶訷XTOO畫獈亯\|!A2CB0C27C9034D6C48258359002DB708,N槝獈亯\|!4C81BAEC95576FB348258019002ED2FB,\裇噀魦f1.doc|裇噀魦f.doc!79BC105B18C72A77482582CD00325304~http://oa.rongji.com.cn:7078/eGov/dispatch.nsf  DraftDraft€>E>E>E>E>E0( _eQ噀鄗_eQ噀鄗 RJeGov._eQ噀鄗((钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟倓倓魄破瞧倓倓钟种又钟倓倓魄破瞧倓倓钟种又钟倓倓魄破瞧倓倓钟种又钟倓倓倓倓钟种又钟倓倓倓倓倓倓倓倓倓倓倓钟种又钟倓倓倓倓钟种又钟倓倓钟种又钟倓倓钟种又钟倓倓钟种又钟倓钟种又钟种又钟种又倓钟钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟钟种又钟种又钟种又钟种又钟种又钟种又钟种又钟謕( (@刡Custom Popup 17 (@4YCustom Popup 18j: 詮轛濺lQ鹼邁((肿种字000肿种字肿种字肿种字肿种字肿种字肿种字0渆肿种字00渆渆渆肿种字肿种字sus0肿种字0渆渆蝒e1e1渆渆肿种字Z]Z0肿諦AB00渆e1蝒e1e1e1e1e1渆肿諾]Ze100渆e1蝒肿种字0e1e1e1e1渆Z]Z剢e10渆蝒e1肿种字肿种字0e1e1e1渆susce10渆e1蝒肿种字肿种字肿种字肿种字肿謘us挡礳e1渆e1蝒蝒蝒蝒蝒蝒蝒蝒蝒蝒肿謘us挡ece1e1e1e1e1螝螝蝒肿治0剢劀e1e1蝒肿种字肿种字0c蝒肿种字0剢劀e1蝒蝒肿种字0螝c蝒肿种字肿治00剢勂闷蝒蝒00蝒c蝒肿种字肿种字0蝒歝魉ノe蝒螝螝蝒肿种字肿种字肿种字蝒蝒e1e1e1e1螝蝒肿种字e1肿种字肿种字肿种字蝒蝒蝒蝒蝒蝒肿种字肿治e肿种字肿种字肿种字肿种字肿种字肿治e蝒蝒蝒肿謕(ApproveApprover>hr>hr>hr>hr>h0 (@刡Custom Popup 17 (@4YCustom Popup 18( 錱 w誹鶑錱 w誹鶑 RJeGov.錱 w誹鶑樿(€€€€€€€€€€€览览D@@D@D@D@D10033p(餑繜__忂儫?( 悥蠀誹鶑悥蠀誹鶑 RJeGov.悥蠀誹鶑樿(€€€€€€€€€€€€览览p(醴 象魁?喵鮛j: 詮轛濺lQ鹼邁((肿种字000肿种字肿种字肿种字肿种字肿种字肿种字0渆肿种字00渆渆渆肿种字肿种字sus0肿种字0渆渆蝒e1e1渆渆肿种字Z]Z0肿諦AB00渆e1蝒e1e1e1e1e1渆肿諾]Ze100渆e1蝒肿种字0e1e1e1e1渆Z]Z剢e10渆蝒e1肿种字肿种字0e1e1e1渆susce10渆e1蝒肿种字肿种字肿种字肿种字肿謘us挡礳e1渆e1蝒蝒蝒蝒蝒蝒蝒蝒蝒蝒肿謘us挡ece1e1e1e1e1螝螝蝒肿治0剢劀e1e1蝒肿种字肿种字0c蝒肿种字0剢劀e1蝒蝒肿种字0螝c蝒肿种字肿治00剢勂闷蝒蝒00蝒c蝒肿种字肿种字0蝒歝魉ノe蝒螝螝蝒肿种字肿种字肿种字蝒蝒e1e1e1e1螝蝒肿种字e1肿种字肿种字肿种字蝒蝒蝒蝒蝒蝒肿种字肿治e肿种字肿种字肿种字肿种字肿种字肿治e蝒蝒蝒肿謕(+Custom Popup 17 Custom Popup 170(瀀燫NL刡悶X燫NL RJeGov.刡悶X燫NL惥(螿\NL刡愊Q\NL RJeGov.刡愊Q\NL惥Custom Popup 18 Custom Popup 180(>f:y4Y>f:y4Y RJeGov.>f:y4Y惥(悥蠀4Y悥蠀4Y RJeGov.悥蠀4Y惥ViewViewJ"J"J"J"J"0 (@4YCustom Popup 18( 錱 w誹鶑錱 w誹鶑 RJeGov.錱 w誹鶑樿(€€€€€€€€€€€览览D@@D@D@D@D10033p(餑繜__忂儫?( 悥蠀誹鶑悥蠀誹鶑 RJeGov.悥蠀誹鶑樿(€€€€€€€€€€€€览览p(醴 象魁?喵鮛j: 詮轛濺lQ鹼邁((肿种字000肿种字肿种字肿种字肿种字肿种字肿种字0渆肿种字00渆渆渆肿种字肿种字sus0肿种字0渆渆蝒e1e1渆渆肿种字Z]Z0肿諦AB00渆e1蝒e1e1e1e1e1渆肿諾]Ze100渆e1蝒肿种字0e1e1e1e1渆Z]Z剢e10渆蝒e1肿种字肿种字0e1e1e1渆susce10渆e1蝒肿种字肿种字肿种字肿种字肿謘us挡礳e1渆e1蝒蝒蝒蝒蝒蝒蝒蝒蝒蝒肿謘us挡ece1e1e1e1e1螝螝蝒肿治0剢劀e1e1蝒肿种字肿种字0c蝒肿种字0剢劀e1蝒蝒肿种字0螝c蝒肿种字肿治00剢勂闷蝒蝒00蝒c蝒肿种字肿种字0蝒歝魉ノe蝒螝螝蝒肿种字肿种字肿种字蝒蝒e1e1e1e1螝蝒肿种字e1肿种字肿种字肿种字蝒蝒蝒蝒蝒蝒肿种字肿治e肿种字肿种字肿种字肿种字肿种字肿治e蝒蝒蝒肿謕(Custom Popup 19 Custom Popup 190TemplateTemplate;*;*;*;*;*0( 鬴bc!jgSelect TemplateThisDocument.SelectTemplateCustom Popup 24919272 Custom Popup 249192720 (hQ剺抍hQ剺抍ThisDocument.hQ剺抍惥( 剺抍Hr抍Hr剺葔ThisDocument.抍Hr剺葔惏(Hrb棐cHrHrb棐cHrThisDocument.Hrb棐cHr惥(hQ覊RbchQ覊RbcThisDocument.hQ覊Rbc惥(peW[l廕S覊peW[l廕S覊ThisDocument.peW[l廕S覊惥(W[蚹l廕S覊W[蚹l廕S覊ThisDocument.W[蚹l廕S覊惥( nd杬zf:ypS>f:ypSThisDocument.>f:ypS惥(悥蠀pS悥蠀pSThisDocument.悥蠀pS惥Custom Popup 24924529 Custom Popup 24924529 0 (hQ剺抍hQ剺抍ThisDocument.hQ剺抍惥( 剺抍Hr抍Hr剺葔ThisDocument.抍Hr剺葔惏(Hrb棐cHrHrb棐cHrThisDocument.Hrb棐cHr惥(hQ覊RbchQ覊RbcThisDocument.hQ覊Rbc惥(peW[l廕S覊peW[l廕S覊ThisDocument.peW[l廕S覊惥(W[蚹l廕S覊W[蚹l廕S覊ThisDocument.W[蚹l廕S覊惥( nd杬zf:ypS>f:ypSThisDocument.>f:ypS惥(悥蠀pS悥蠀pSThisDocument.悥蠀pS惥+V V V VVVVVVV V V V V V!V"V#VVVV VVV V$V%V&VVVVVV' V!V"V #V($V)%V*&V'V(V)V*+ck噀.RJeGov.GetItsNameck噀.RJeGov.ProtectDocumentck噀.RJeGov.SetItsNameck噀.RJeGov.SetRevisionsOptionck噀.RJeGov.UnProtectDocumentck噀.RJeGov._eQ噀鄗ck噀.RJeGov.刡愊Q\NLck噀.RJeGov.刡悶X燫NL ck噀.RJeGov.鄀誹鶑ck噀.RJeGov.>f:y4Yck噀.RJeGov.錱 w誹鶑ck噀.RJeGov.詮轛OA鹼邁ck噀.RJeGov.悥蠀誹鶑ck噀.RJeGov.悥蠀4Y%ck噀.ThisDocument.AcceptAllChangesInDoc%ck噀.ThisDocument.AcceptAllChangesShown%ck噀.ThisDocument.AcceptChangesSelectedck噀.ThisDocument.CenterTitleck噀.ThisDocument.ChangeTemplateck噀.ThisDocument.DeleteObjectsck噀.ThisDocument.FileSaveck噀.ThisDocument.FileSaveFormal"ck噀.ThisDocument.LocateContentInputck噀.ThisDocument.Reject%ck噀.ThisDocument.RejectAllChangesInDoc%ck噀.ThisDocument.RejectAllChangesShown%ck噀.ThisDocument.RejectChangesSelectedck噀.ThisDocument.SaveObjectsck噀.ThisDocument.SelectTemplate"ck噀.ThisDocument.ToggleFieldDisplayck噀.ThisDocument.ToolsMacrock噀.ThisDocument.ToolsOptions%ck噀.ThisDocument.ToolsOptionsRevisions$ck噀.ThisDocument.ToolsOptionsUserInfo ck噀.ThisDocument.ToolsOptionsView$ck噀.ThisDocument.ToolsReviewRevisions(ck噀.ThisDocument.ToolsRevisionMarksAccept(ck噀.ThisDocument.ToolsRevisionMarksReject(ck噀.ThisDocument.ToolsRevisionMarksToggleck噀.ThisDocument.ToolsRevisionsck噀.ThisDocument.UnlinkAllFieldsck噀.ThisDocument.UpdateFieldsck噀.ThisDocument.hideCopySend+ ck噀.RJEGOV.鄀誹鶑ck噀.RJEGOV._eQ噀鄗ck噀.RJEGOV.>f:y4Yck噀.RJEGOV.錱 w誹鶑ck噀.RJEGOV.悥蠀誹鶑ck噀.RJEGOV.悥蠀4Yck噀.RJEGOV.刡愊Q\NLck噀.RJEGOV.刡悶X燫NLck噀.RJEGOV.詮轛OA鹼邁 ck噀.RJEGOV.GETITSNAME ck噀.RJEGOV.SETITSNAME ck噀.THISDOCUMENT.REJECT ck噀.THISDOCUMENT.FILESAVE ck噀.RJEGOV.PROTECTDOCUMENTck噀.THISDOCUMENT.TOOLSMACROck噀.RJEGOV.UNPROTECTDOCUMENTck噀.THISDOCUMENT.CENTERTITLEck噀.THISDOCUMENT.SAVEOBJECTSck噀.RJEGOV.SETREVISIONSOPTIONck噀.THISDOCUMENT.HIDECOPYSENDck噀.THISDOCUMENT.TOOLSOPTIONSck噀.THISDOCUMENT.UPDATEFIELDSck噀.THISDOCUMENT.DELETEOBJECTSck噀.THISDOCUMENT.CHANGETEMPLATEck噀.THISDOCUMENT.FILESAVEFORMALck噀.THISDOCUMENT.SELECTTEMPLATEck噀.THISDOCUMENT.TOOLSREVISIONSck噀.THISDOCUMENT.UNLINKALLFIELDS ck噀.THISDOCUMENT.TOOLSOPTIONSVIEW"ck噀.THISDOCUMENT.LOCATECONTENTINPUT"ck噀.THISDOCUMENT.TOGGLEFIELDDISPLAY$ck噀.THISDOCUMENT.TOOLSOPTIONSUSERINFO $ck噀.THISDOCUMENT.TOOLSREVIEWREVISIONS!%ck噀.THISDOCUMENT.ACCEPTALLCHANGESINDOC"%ck噀.THISDOCUMENT.ACCEPTALLCHANGESSHOWN#%ck噀.THISDOCUMENT.ACCEPTCHANGESSELECTED$%ck噀.THISDOCUMENT.REJECTALLCHANGESINDOC%%ck噀.THISDOCUMENT.REJECTALLCHANGESSHOWN&%ck噀.THISDOCUMENT.REJECTCHANGESSELECTED'%ck噀.THISDOCUMENT.TOOLSOPTIONSREVISIONS((E3P叭A 皟.!皧#慃"傲$怮%癝班2P1怌 005y5555 5 Ff$$If:V 6544l44l0敯譃 j >)4€ €€€€€€ 5y5555 5 Ff$$If:V 6544l44l0斃譃 j >)4€ €€€€€€ 5y5555 5 Ff$$If:V 6544l44l0斝譃 j >)4€ €€€€€€ 5y5555 5 Ff$$If:V 6544l44l0斝譃 j >)4€ €€€€€€ 5y5555 5 Ffck噀.THISDOCUMENT.TOOLSREVISIONMARKSACCEPT)(ck噀.THISDOCUMENT.TOOLSREVISIONMARKSREJECT*(ck噀.THISDOCUMENT.TOOLSREVISIONMARKSTOGGLE@