邢唷>? ?b?F;< ? !"#$%&'()*+,-./0123456789:?Q=>?@ABCDEG?HIJKLMNOPRSTUWXYZ[\]^_`a??defghijklmnopqrstuvwxyz{|}~€Root Entry F sf>SummaryInformation(8DocumentSummaryInformation8 Macrosw鎟f炴rf? ??!"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^?`abcdefgh?jklmnopqrstuvwxyz{|}~€?鄥燆鵒h珣+'迟0€ , 8 DP \hpx€ck噀噀鯪RJeGovNormalMASK4@察f@O@糍3K@7Jrf@€?qR<WPS Office_11.8.2.8506_F1E327BC-269C-435d-A152-05C5408002CA?胀諟.摋+,D胀諟.摋+,h$€   RJSOFT (\€dlKSOProductBuildVer2052-11.8.2.8506嚦€0* pH"dD正埼<@j= B T婽` J< r€stdole>stdo€leh%^*\G{00€020430-C 0046}#2.0#0#C:\Windows\syst em32\e2.tlb#OLE Automation`婲or(mal僂N€Cr坢a€F €b €*\C  嘥`?Of坒ic刧Of€╥c俫梻!G{2DF8D04C-5BFA-101B-BDER5€gAA€e4€2乬2僩Program Files\Kingsof@t\WPS ?\11.8.2.8 506\oA6\ksoapi.dll#Micro 9.0 Object Li`brary@&€D@MSF€Bs>SF慏VBAw鎟f炴rfdirCommon?RJeGov?Cs3@耫D452EE1-E08F?A-8-02608C@4D0BB4賒F€M20.DLL'岯 €q?/;"~1兟|B ??}#0? €褳50 劺A33A3E557-8732-4B18-90F1-C5D900D9C508?Users\admin\AppData\Local\Temp\VBE\酓T.exd啕€!€?E忇?`孧 碋佺傗蜹hisDocumentGT€蟟sDD€kcu瞖Tn€ 2 Q` H1y?鄏",岛*""+{RJ eGovGR奐@`G`v??购!frm圫elZG€磃ScBM2//?(欳om╩onC m`/~o`/篟U"b4` 澈U"DCopyFileA4GetWindowTextAxME  (> < +€p@ i儌`bri儎€i儐8?*+ p  i儗i儙 i儛陘D @陘^ @陘b @陘v @t_%P 8 +` Hk@ i儗 `剶t`剸P+( `   i儦`劀`剬+`` $i儨`凩+0` 5i儾i兇`劧+` p=i儾i兇`劧+`` Ei兒(i兗`劸+@` Mi儾i兇`劧+`` 8 Ui儾Xi兇`劧 T`   ^i兝i兇€ 劼@(`勀`勂`劧  + `  pi兪0i兲Pi兾`劧+4 `  {I冃 `勔`勗`勚`剎蕫xx H陘F@@陘Zh@陘h@`x @hP  0 儈x8 `@  x  8 ` `x\@?d  @?T  @?L @?H P p  T婽`$*\Rffff*0960548b54*\R0*#f*\R0*#e€€ H€ H€ € $€(@€ h€"€(€$€*€"0€ B X€`h€€. "%€ B  € 8H`hX€ B   €" 8H"P x& € B  €(0PX€ B  `€hp€ B  € € B  € 08X`€ B  h€px€ € (B  €€€ (08Ph"x€ B  € (D8€€ € B  €€€€2 fX      ( @ H  X  ` p x €  €  x]$t_P 1下载的模板的前缀] x 1下载模板的目标文件名和路径] @1下载模板的URL地址]  1文档使用的新的文件字] h1文档可能使用的新的模板名称] 1文档使用的原来的文件字]  1文档使用的原来的word模板名称] 1自动更改模板信息标志 ]` % \']x  $'     % '(k 'i] \$' \$'  ! % 'k \rjoawork.bakA@   \rjoawork.bak\ yyyymmddhhnnss % $€'(i  ~B@f]€     $~ A@k \*.*   $~'L L \ L$  \ LA@k0 ~'L ~!n'i]  $'    % 'ki0]  $'     % 'kHi@]H_( '   '  i`]  '    % '@ki]x  '     % '`kHi@"将一个字符串按分隔符分成几个字符串]]H`x从第一个字母开始找'_   ' Gxj 酅     $  +   '  '8 酅  $  + 'Ti]p  '  b   $       $ \ '    'X 'iH]] ] ]0  x   x$ '  $' G 'j.对半角空格作特殊处理  :  /  [  @  {  `   'd( $ ' KT%0 'KT% 'KT%u0 'KT%u 'n  'k€ '4iphAttribute VB_Name = "Common" Option Explicit Declare FuncpCopyFile Lib "kernel32" Alias(=€侫.C$(2@55, 0)gl鄋gRet羙ヾ= 阨(,? D If > 0 ThenC ALeft$?, In*@vbNull ,r? - 1 Ey 32? VBA0.Mid,A, 33?C€UrOt`herDac夸&!@rjoa繼k.鴅ak@取8a?-囧徘\" _?&釶FormatP(Now !ymmddhhnns`s") &cF餫lse????On Err€or Resu€孱N郎c. 〓嘅?` , vbectory +SystemBHiddHen)@&"",6M~k as9= € ?"\p*.*"O #W唄Q|<> "@ (DpgTimeY") <6 74 Ki黮l f!) 邱h  end@(Numbe黵 丣<C囍5?(Main):駟Sepw2!鄫兂intPo倛€Integer興=3JReva?`?跲h ?Q ?STONn託 鏐J? v 绱匢+ 訫?OD"cC癶eckR!tC鏽纊xo q,` T?+ 1RB Ma@Loop 产`s?ku/昫'NF贵 ..颫.R嘜. D.勘. .,苹 ?=s a(?_-3€D_- _- '将一个址捶指舴殖壬几U ≤鑟desㄅn arrMsg?齇d!Coun?Star^2 '从第 母揽颊意`裼= 1?3;S2s疸 ? W=磨徐it DRe! Pre疣鴙e d€"}q3+%6A@"=q0A?_o #? = sStart) Explode = arrMsg End Functio n , Replace(ByVal strSource As String? 4From04To,)  Dim intPosIntege唕= Inlx(1,€ p Do WhileqJ> 0C谍@ Left(哻,亝- 1) +V+ Right"$Len) ? F!1凥< `+B&To)iLoop僡聙\贓scap翀買nput糂^qOut€峞EChar3Asc 47)) O竢 _€;9A64123y96?莗=;澳s&罞 Else-!?Hex$()Sele€ct CaseW飦1 @冟 "%0" [23u?4=U仺?*?% IfdNe|xtD脃€4& D L ?澈购xME(<<< < `勬`勮`勱x 勻'%   ( h    @ `  "€ (`?`  2``?`  4`?`  6@`?h`  8`?art` $ : `?t7` leEn <`?leSt` Inse >`?`  Bp`?`  D`?9` 0 F  J `凩头相€@  `(@ph€  €T婽`5€€ "€ 8HX.h,€F(8H Xx€ "€ "€ " € (@HPX`h€ "px€€ " € € J€ 0@€ Jp"€ "€ &€ (*0`€€ "*€ "€ € (8€ `€ €€ (€€(H€ (`€ € (€ (@H€ "PX€`€hp€0Ph  ( 0 € "8 @ €H €P X h € (p €  € ( €    8 X p     € "  € €    ( @ ` x       @  X x    € "  € €   ,  @`x€ "€€*(€ (H€ p€ (€ 0HP€ "X`€h€px." @Xx 8@€ "HP€X€`hx€, @H€ "PX€`€hp€€ (€  € (@€ h*€ "€€ @Xx 8X.p"€ € :€ " @€ "H€P>X € € xh ]@Xpx R!!' R!!' R!!' R!InsertFileStart5XB@<0 $B@ R!InsertFileEnd5XB@<te]InsertFileStart7X!\InsertFileEnd7X!7.  !(  !(  !(InsertFileStart7XB@InsertFileEnd7XB@q`oXA@ 999q o 999qo(SetRevisionsOption 999qoh  9 9 9 9 9 9  9 9q8o0 B@BoC///////////////////////////////////////////////////////////////////* 以下是红头相关的操作C///////////////////////////////////////////////////////////////////0SubjectText是“文件标题”框DocMarkLine是“文号”下面的红线](   SubjectText7|!~!€!(  DocMarkLine7|(qxop@`  $ SubjectText7|!~!€!( & DocMarkLine7|(qo€KeywordText是“主题词”框!KeywordLine是“主题词”下面的线条CopySendText是“抄送”框CopyReportText是“抄报”框"CopyReportLine是“抄报”下的下划线]] $,'*  KeywordText7|. !. * (. KeywordLine7|. !. * (.!Set o = .Shapes("CopyReportText")o.Top = o.Top - nStep!Set o = .Shapes("CopyReportLine")o.Top = o.Top - nStep CopySendText7|. !. * (. !0 * (0qo]0]H $,'*  KeywordText7|. !. * (. KeywordLine7|. !. * (.CopyReportText7|. !. * (.CopyReportLine7|. !. * (. CopySendText7|. !. * (. CopySendLine7|. !. * (.DispartSendText7|. !. * (. !0 * (0qo`]] $,'* !Set o = .Shapes("CopyReportText")o.Top = o.Top - nStep!Set o = .Shapes("CopyReportLine")o.Top = o.Top - nStep KeywordText7|. !. * (. KeywordLine7|. !. * (. CopySendText7|. !. * (. !0 * (0q8o0 ]]( $,'* CopyReportText7|. !. * (.CopyReportLine7|. !. * (. KeywordText7|. !. * (. KeywordLine7|. !. * (. CopySendText7|. !. * (. CopySendLine7|. !. * (.DispartSendText7|. !. * (. !0 * (0qPoH@8]€] $,'*  CopyReportText7|!~!€!( CopyReportLine7|( KeywordText7|. !. * (. KeywordLine7|. !. * (.qHo@0]] $,'*   CopySendText7|!~!€!(  CopySendLine7|(!Set o = .Shapes("CopyReportText")o.Top = o.Top - nStep!Set o = .Shapes("CopyReportLine")o.Top = o.Top - nStep KeywordText7|. !. * (. KeywordLine7|. !. * (.qo ]`]x $,'*  DispartSendText7|!~!€!( DispartSendLine7|( CopySendText7|. !. * (. CopySendLine7|. !. * (.!CopyReportText7|. !. * (.dCopyReportLine7|. !. * (. KeywordText7|.模板 !. * (.次 KeywordLine7|. !. * (.Zqo]] $,'*示  KeywordText7|.  !. * (.G KeywordLine7|.过 !. * (.中 @CopyReportText7|!~!€!(”, &CopyReportLine7|(qo]@]X $,'*  KeywordText7|.弹出 !. * (. KeywordLine7|.文档 !. * (.!Set o = .Shapes("CopyReportText")o.Top = o.Top - nStepF!Set o = .Shapes("CopyReportLine")o.Top = o.Top - nStep @ CopySendText7|!~!€!(' & CopySendLine7|(q o p ]] $,'*  KeywordText7|.B( !. * (. KeywordLine7|. !. * (.CopyReportText7|. !. * (.orCopyReportLine7|. !. * (.wo CopySendText7|. !. * (.( CopySendLine7|.dK !. * (. @DispartSendText7|!~!€!($ &DispartSendLine7|(4更q0 o( 3=================================================== R!H%8!A@l$o  ]`请输入对象的名字: 公文对象命名 请取个名字$'Lew L L R!H%8(Apk0 o(  yAttribute VB_Name = "RJeGov" Option Explicit Sub 引胛恼?) ODrro@r Resu凬 exV2With ActiveD4oc6n08Dim oldIndent As Single, s纓rFontg, int!Size-In鄑egerOK@= Selevon.ParagraphFormat.FirstL鴌new / ?~.: P[.Bookmarks.Add Ra`nge:=O, :="InsertFileSptartlDialogs(wd).Sho"w?Endm s&2ed崮nLeftB鑟rd壭. G €&o6;返回@OA系统%:This沛.Clog!s膭'/= '盫?以下是红头相关的操作4凲B椎???j纜,是“文件标题”框=#'@!1号”下面的p红线S鈫眑V餫ria厛R3puapes("").qFr爳_3jQ厁26W鋒iaSh V ]bla梞so縆?€ 显蕕綼蠗罈c>t1眾@@Re鷇o"gg 1o抄送增糮右恍锌'pKeyw? !粥魈獯?!%!CC!线条 '€CopySen襅ahRepo鎟"报抄下的禄'nSte~p(儺o)= MillimetersToPo嵝zs(10T捒+飧s`b o`(6,"罤杘.Topps? r o?ho臊 oQ v{]'3 "糠!P聇o  ? go.H`eight+绻_/ぴ分_/疨??忠CO$!O$黱tO$梖gO$G7docOJn?$d(  #Y$縬21p衘6$  俊@妃u?:p醰Disp€? $ ' = o.Top - nStep o.He癷ght(+ End With Sub  抄送减少一行()n Error Resu€me Next2DimU As @SingleoVarian.?MillimetersToPoints(10n This8Docn<?Set oA.Shapes("CopyReport鶷€J"!儘枒?0Line?KKe鄖word岻I#G-#ISen?w扅分懤p仐慛憥Y憅Z儯齦愨c陣2$?H類D纈spart__牑_R爻报撷撷撷撷# A澏?怓rame"Range.Font.Col€orIndex牘纖dWhitD #6.Visible€msoFal?X懽FfF笾踓8送8888t8鏩?8q廞1'烸;蹖!遳1 / * ocof%d?q%Ao%/?搑'蟦?? /? 禔?S?螦螦 悈3逜逜!??op JO.縤?T稛び ???戥T//)d?衙0??蠘允綺p狭 T ?A?苛苛苛 ?_a///rd刳) 蔩7_7€wdBlack?t# K7TruT?p镙镙 "巷^^qO4J4lg=}?lK%/B@ opySendT@ext").`FrameHRange.Font.ColorIndex = wdB€lack .Shapes(?C淟ine渶Visibled€msoTruedEnd With Sub   显示@分送()(On Error Resume NDim nStep As S癷ngl[o€Variant.*= MillimetersToPoints(10?I This8Doc€6乹Set octKey8wor泝1o.豑op€-Q#?#籖epo黵t冦?$I杮$A?FjDispar.t?筈%.楣'=/徘GetItsN犁E萂sgBox Selection)領te鄊(1). 広€!gsTemCjtr€j?= Input("请输入对象的名字:", "公文!a命名请P取个"$lIf <> ""鵣menC~鄇C A嘔f __SRP_0  __SRP_1_w__SRP_2 i0__SRP_34揔*m *\CNormalrU€€€€~~~~~~~~~~~~~~~G 廎熓縶鯝悤9F? 儕a $Qi) a  A  ) I i 9 a 9qQy !坅  9aA!  Υ籡HTbO€r?仦 1正文 ThisDocumentRJeGov frmSelectCommonF /C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA6\VBE6.DLLVBA Y ` 0K﹚ 6CC:\Program Files\Kingsoft\WPS Office\11.8.2.8506\office6\wpsapi.dllWord Qy p0FC:\Windows\system32\stdole2.tlbstdole y€L续-鶾藉D轗CC:\Program Files\Kingsoft\WPS Office\11.8.2.8506\office6\ksoapi.dllOffice ac?E忇?`孧 C:\Windows\system32\FM20.DLLMSForms W澹32K愸刨倥1C:\Users\admin\AppData\Local\Temp\VBE\MSForms.exd ik F羏 Qw*贔й珓h縎M t牶D鱶D;崊狖#QQi恹&J灰??剈 FDocumentOAOpen CenterTitle DoMailMergeDocument_Close ToolsOptionsToolsOptionsViewToolsOptionsUserInfoToolsOptionsRevisionsToolsRevisionsToolsRevisionMarksAcceptToolsRevisionMarksRejectToolsRevisionMarksToggleToolsReviewRevisionsToggleFieldDisplay UpdateFieldsReject ToolsMacroFileSaveSelectTemplateChangeTemplateLocateContentInputRecordTemplateInfoUnlinkAllFields SaveObjectsGetVariablesSettingSetVariablesSettingIsFromOAAcceptAllChangesInDocAcceptAllChangesShownAcceptChangesSelectedRejectAllChangesInDocRejectAllChangesShownRejectChangesSelectedGetMergeFieldsGetMergeField/ FRevision_Print 00d 48<@DHLPTp F  RJeGov.RJWorde F Window gUNID HWNDb F t_CopyFile kernel32 CopyFileA!GetWindowText user32 GetWindowTextAGetWindowCaption BackupFileClearOtherDayFile StrLeftBack StrRightBackInStrRevStrLeftStrRightExplodeReplaceEscape $$   ServerURLServerURL DbURL DbURL CookiesCookies gUserName gWordType gWordBody gWordSource gFileType gOldUser gAllDocWordVBE6.DLL H hf F ^ h [rU€€€~~{    ! objFtpWordTypeUserNameUNIDWordBody WordSourceFileTypeDocWord TemplateNamestrNamestrValue strFieldName !fldlpExistingFileNamelpNewFileNamebFailIfExistshWndlpStringcchstrFilestrDirstrMainstrSepstrCheckstrMatchstrMsg strSourcestrFromstrTostrInput{rU€€€ 0$$@ YYa9 Y 9a I  YX a1`???????????$WWW_____ _   0   0   0   KzPkzz$kz??$H,奝t! ttt! ttt$F t0   0 x  0   0 p  0   0 h  0   0   0 (  0 h  0   0   0 (  0 €  0   0 H  0    0 @  0    0 0   hl CtlCp-KX;TXtM\@l$l0X,>T1x)lX/lpCx/(h0FxptTlX0   ` ???pz2pH(`%lp #\Pqt2p\8pX$Xh lplt #\?2p\X?pz$! H H?龍45H$pH>pFH%X45H$pH>pFH%X45H$pH>pFH%X45HpHlp龖</ppHlp龖8/ppHlp龖@/ppHlp龖D/ppHlp龖H/ppHlp龖L/ppHlp龖P/ppHlp龖T/p/ 04 $F p\XH0    0 H   0    0    0   0 H  0   0 H  0    X     !"#?rU€€€ dD`1;000000$A`$`x$`|$`$A`$`$`$` $A `$ `$ `$  `$I`$`!$`%$ `)$I`-$`1$`5$ `9,I`=Qi00$`A$`E0 ` I?,I`M(`Q#$`U$ `Y$I`]$`a$`e$  `i,I !`m?8 "` q=/$ #`u nrU€€€€~|  __SRP_4 __SRP_5frmSelectVThisDocumentc8I)1(T? 1t5T.?ltL4lLl ^ qH=0o eAI ,誄i"LC 狺'椑e_鶦缹kedKG4徑GARJlst>.JJJ'OSt顁#?缼| Q?@麆V?T€B衭奦e乹?嶸$J)?BO%!1?0_IAqK,`?_ ?u? ?a$ ._O9. qo*qN cm(dOK?O0€rr?JGo餌Err癭dl悎!,opt!*葇0b所有gk}3Ase遼a'选择的用|户S2$& `O & A??U 蟃a0InP,( 怺el) eR找到选渲衑j和醠憠#A1@jU枻耏p?2"€1?!?1&歰wn BThis€oument`.Path0TEMPLATE_FILENAME€_PREFIX}'下载膓 A名以t_打头加葿螿原来摸鸞Y 瘔sD 爥 ?0/"p ~$ < '?U€nload M?盧;Sub悪%(:#MsgBox "系统错误 :€*.DesHcris? N`umber€ S餺urc@@r琠mdCancel?X (5????? 羑!澈岛`羏 Qw*贔й珓h縎M t牶D鱶D;崊狖#QQi恹&J灰??剈xQQi恹&J灰??剈羏 Qw*贔й珓h縎MMED @S"SS"0L<N<<<>"LLL LLx X `hpx€<€ " € €(8Ph   €€ "  (0 8&H p €€  €  (@Xp,6(,@p€ €> H P € "X ` h  p  €           €  € " € €   (  8 H  P  `  h p x € € " €           € " € €  ( 0 8 @ X  p  x  €    € " €      € " € €   ( 0 8 P  h  p  x €   € "       € "     € " (08@H`h€ " px€€ " € " € " J8€ " @€H~P*8@€ " HPX€ ` x€ € €  F>P €   \X&`t€ T (08€@(Hp€ " x€ €$ T @`h&&: $(Ph€p(x€ " € .€ €€ € 8€0X€  0€ € € € ((0HP`p€  € € <$Hpx ( 0@€ € FH   € € B   (€ € 8P€ € X p €€ € € € € € € |(   €0(0€8xP    (" 0€ "8€ &`€ "  € 8€ € 0€ 0P€ €B0"8"`"" € € €€€  €    0 P €  X € h € " p x     !!0!P!h!€!€ H??€ B ??;""€ "("0"€ "  8"@"H"`"€h"p"?€ B? ???€?B2?8# (# 0# !@# 6$`# .$? 2$? $ $ 8$ X$ x$ ? ? ?€ H?@%H%P%€ € .X%" ???€ " ???€ " ???€ " ???€ " ???€ " &&&€ B  & &(&€0&8& H&`&€h&p& €&? ????€ B  ?€??'('@' "X'€'??€ " ??€ €?€ € ? ?0?€ € ( (((0(€ €8( @(P(€  h(€  €(&?.?? ))0)@)P)X)h)x)€ €)?? ?€ €  ? ???? *T*p* €*?? ?€  ?T?0+T?,T ,x,€, ?€ €???€  ?? ? ? - - z - ? ?€??? ?€ ??..€  .€  .€(.0.@.€ P.x]]]] ](]P]H]x]p所有文件字配置信息<F .. 0 %>'  2//$@' 4' 6'" 8'$ :'& B!2'(  B(2A@D"**********************印章控件处理A@F (H J!L(N J!L(P VTBody RB@AX 指示输入位置 & & %\|$@'ZL本次传入的文件字 &|$`'^H本次传入的模板DocWord %d!f'bH原有使用的文件字 TemplateName %d!f'hH原有使用的模板<h b hHF如果原有使用的模板和文件字为空,说明第一次起草,要记录这些信息到文档中 Z ^Aj b Z be>F如果原有文件字和新文件字不相等,那么要提示用户是否改变文件字对应的模板  %>viewwordG|j<如果是查看正文则跳过 系统监测到您在发文中把文件字从“ b ”改为了“ Z&”,是否要修改新文件字对应的模板格式? n p r 榕基办公自动化系统$l t'v|k'vAx$ 弹出选择框kh|`<X !z |文档打开错误: ~!€ 榕基办公自动化系统A@lk|o<F]8]Xp  ! !$ '  MERGEFIELD  $ ' $ \标题  !!(k k|<o<F B(A  5( $5B@5( 5(A@  draftword .Fields.Unlinkk0  createwordA@kq Mail Merge$(  draftwordKTView$(Draft$(Approve$(Template$(4更换模板工具栏 approvewordK createwordK approvedraftKTAView$(Draft$(Approve$(Template$(4更换模板工具栏viewwordKTADraft$(Approve$(View$(n( B(|< !z |无法合并数据源: ~!€ 榕基办公自动化系统A@lko<F$ ! (HdhA@kX ( B(2  B(k0|(< o]H]` B!2' $!'   B(2A@ J!L9N 9qk€oxx] $!'  J!L9N 9qko]](@X B52'5'5' $!' $ 92 9 9kpqho`p] $!' A@ko]] 8P 5'5'5' $!' $ 9 9 9kxqpohh$A@dH R!!B@k(o $A@d R!!B@ko$A@d ! (ko($A@dp $B@kXoPhA@o8A@o *在当前的宏安全设置情况下,无法使用此功能! Microsoft WordA@lo(]h(“宏”选项只能用于开发人员进行系统完善。  请输入密码:(提示:宏的工程口令)请输入管理员密码$' hacker;rjegov $B@d 口令错误! Microsoft WordA@lko€<FA@  createword (H !z |G B@jkP !HG|j]所有合并域内容$"'  B@$  draftwordK approvewordK createwordK approvedraftKT"是否要将最新的更改保存到OA系统中? p n $l & "A@(!2002.10.25 PJT]_8', " %.'* *$无法上传Word正文到服务器,是否重试? 0 pMicrosoft Word$l',d  approvedraft8保存原稿  SaveDraft&UNID=  &FileType= & &FileName= * %4 $4 %2'*d保存正文 SaveWord&UNID=  &FileType= & &FileName= * %4 &WordType=  $4 %2'*k` *ok  *   是否重试? 0 pMicrosoft Word$l',k k , 6k n | < ~!€ 榕基办公自动化系统A@lo 提供换模板功能:模板选择X LastWords !d%8!f'*<F *EnumWord&Seq= : %2'*K$读取文件字配置及其对应的Word模板配置 LastWords * !dB<k * >(@/ 赋值给表单 B >B@(显示模板替换对话框'v(取消自动提示更改文件字标记 D$ F$H没有选择或者取消| k D F BHE 下载模板文件AJ替换模板| < ~!€ 榕基办公自动化系统A@l|X oP H(提供换模板功能:模板替换(表头表尾替换) 2003-07-24< ]*要替换的模板文档]*当前文档]*正文内容代表的范围]*"标志是否有正常拷贝正文内容到剪贴板 .P F$ ~*如果新模板不存在,则退出|0 k(  1.关闭痕迹A 关闭痕迹纪录"2.把当前文档的正文内容拷贝到剪贴板VBody P%XB@H< R!.R RB@Z R!\ R(\VxBodyEnd P%XB@H<P RB@^ R! R( RB@H'T` RB@b<63.把当前文档的正文内容从剪贴板粘贴到新模板文档的正文区 F d%.L8 打开新文档VBody L%XB@H<h R!.R RB@Z R!\ R(\V0BodyEnd L%XB@H< RB@^ R! R( RB@H T RB@fk@4.全选整个新模板文档(包含正文和表头表尾等)并把内容拷贝到剪贴板 LB@h RB@j RB@b<5.把新模板文档(包含正文和表头表尾等)的内容粘贴到当前文档中 PB@h RB@j RB@f6.重新合并数据源A@F7.关闭新模板文档 L(H LB@B8.定位光标到正文开始A@X9.保存新的文件字和模板信息 Z ^Aj10.清空上一次的更换信息'D'F|V8对不起,模板配置有问题,无法替换模板,请联系系统管理员!$l ~!€ ~!n 榕基办公自动化系统A@l L L(H LB@Bk 'D'F|` &没有文本选中时进行剪贴板拷贝导致的错误'T< 出错则还原4对不起,替换模板时发生错误,系统将继续采用原有模板!$l ~!€ ~!n 榕基办公自动化系统A@l PB@p L L(H LB@Bk'D'F|o 把光标移动到正文输入区的开始 用于起草时指示输入正文内容的提示 2003-07-24`Body %XB@H RB@Zo0@ 2记录文档使用的文件字信息和模板信息到word文档变量中DowWord:文件字名称TemplateName:模板名称*word文档中的变量名称和本函数的变量名称对应 2003-7-25DocWord %d@如果已经存在变量对象则修改其值 rDocWord %d(fd@ 否则增加变量DocWord r !dB<k TemplateName %d t TemplateName %d(fdp TemplateName t !dB<k@o8  合并所有域 !B@v] ] !|!z'z x z x %|!~!€!B@v (Ho0 ServerURL !ADbURL !ACookies !A gUserName AgUNID A gWordType A gWordBody "A gWordSource $A gFileType &AgOldUser (A gAllDocWord *ABCall SetVariablesSetting("gExistBodyBookMark", gExistBodyBookMark)op <F  %d!f'z< 'i <F   %d(f|<   !dB<op 'dH] RJeGov.RJWordWindowgUNIDHWND$$' !J! $' (HRJeGov.RJWord$. ServerURL$ (EobjFtp.ServerURLDbURL$ (= objFtp.DbURLCookies$ (AobjFtp.CookiesgUNID$' gUserName$' gWordType$'  gWordBody$'" gWordSource$'$ gFileType$'&gOldUser$'( gAllDocWord$'* AgExistBodyBookMark = GetVariablesSetting("gExistBodyBookMark", 0)kki(2005.6.6 for officexp or office2003 only A@o`H A@oH A@o0 A@oA@oHA@o ] 5 "  $'"]( 5|  !~!€! "  $'"@8q0i(H] !$ '  MERGEFIELD  $ '   & = !'kxkpih <X]`  B!d%<. B@h ! RB@ !J!L9 9q]€ ! x5z x78!B@H x5z  x78! x 78! x78!! x 78!!\ x78!l  RB@Z x78!!d R(d R!(  R!(d  R!(  R!(k€xkpkhk` x78!l  RB@Z x78!!d R(d R!(  R!( RB@Z( x78! x78!Zyyyy-mm-dd hh:nn$  删除) R(d R!( x78!l e  R!(  R!( RB@Z x ( x78! x78!Zyyyy-mm-dd hh:nn$  增加) R(d x 78!l  x 78!! x 78!!d  x78!!\ x 78! x78!e( x78! x78!Zyyyy-mm-dd hh:nn$  修改) R(dd( x78! x78!Zyyyy-mm-dd hh:nn$  增加) R(dk€  R!(kh`XqP ! x5z x78!B@H  R!(  R!( RB@Z[ x78!!d ( x78!  x78!Zyyyy-mm-dd hh:nn$ 批注)] R(d  R!(  R!(80q( RB@Z !J!L9 9q (H|< ~!€A@lo阜Attribute VB_Name = "ThisDocument" 孊as?Normal.VGlobal!猄paclFalse reatablPre declaId濼ruBExposeTemplateDeriv$Custom iz凜?Option €.licit Dim gobjFtp As Obje哻  User? S玭gUN ID WordType Bod聐 Sour€0File&OldK?All€饋A '所有募峙渲 眯畔>Sub OAOpen??, ?, OC兝 B, _ OK<;, ?)O€irror GoTo Err€handle:C萐etFm= ?Cg?= VBA.碙C婪(g?= 纏Left(亞& "/",sF A9= A}8=侸H?D咞=F>CEw= A詐p括a莲.? ?Q@哑4?#Sa攙e肸s€'*印章控件处理DoM€ailMerg€s; ? 莝Act爍Window.View.ShowFieldCpodes@剠T!uGridlin#咥Res€ N宔x`tSel鄒€z.釪What:=wdBook@mark, ax:="?牊Cal l Loc爤Cont愧Input '指示输@入位置 Newk嘐!KRight(gE:, L@i) - 1)繦|")! '敬未氲~膬q 鍣B峛 N "B H 模板 w&€L'?Var"i?s("$")@.ValueN詟惺褂毛這   'G 徛<苼CIf *?" AndaLaThenM'惾绻和?为空,说明第一次起草,要记录这些岐到文档謳 MReca昧闹Info(繱lew)E隟w" "Exit 慹 B是查看正文则跳 过w MsgBox("系统监测到您在发文中把从“" &郰”改p为了:要修改W格式?餧vbYesNo + vbQues拋DefaultButton2<榕基办公自动化 ==`QW AutoC纉ge餏lag[O1e鍡E?If^b%砄? '鲅≡窨-uP?0Prot鉛矆= 饂dNoG27  "10打开碻砦螅横.@Descri?Critical TZ ub. Q &5孋繹er繲itle(?撬B磧flda捯ic Qstr?^ bY鴻F€塃恆ch In€5?Rswe= @Trim$(0.q InStr(PMERGE燜IELD?1嘠4cMid$|12"e2!, 2猁标题Ⅺ 1a 駐lt.Paragraphpmat.Al榠gn聊?wd&穦?麽灡P鹁{F鑹 o/ 昐creenUpdatin<:?无痕悸 With v.&拺n癤"制2C鵳衛oP肁1懛蜠蘑Q:=耈嚻磓@奻irm`vers鄮s:=覕, ReadO鄋ly:=+B褬 ??欖  N鴒tAh8G餌鎎?"draf.t鏱'?.U鷑 爇?]鏟!o 嘌m9iqCComm毙艬ar€悂 B馻奿si婍1C覺 崞 F!鋈S俊a?b D CommandBars("Approve").Visible = False 糡empl刟t `TrueZ'更换模皜骞ぞ呃垁Case "aword", "8creFdraft"zall 隐藏痕紗 罺iew&緙D0%v巵u擠穽v€a厛, }縡檢V嘅End Sele ct,Jlica@tion.S@ve恘Upd€ng€xit Sub@ Errh罓le:G "okYc 蟘侳&燴CrLf`A絚a ?d?dc5 Loop Wh`珑擙@"v?Iac汇缣囗婌脟 .Descripa痩呕旃远化裐^2穧`Temply誫'提供换模板功能:a选择s €Res恴 Next}g`u衪?衉阫Variables.Item("Lastqs").餠alu~蠀蕝€*u\隖EnuFmB8Seq駻T imer)q'寥∥募峙渲眉捌€涠杂Φ?QCall峱Piw嫥Add|, 擣A棥f鋜m.O4勷hH '赋謤蹈淼ィ!Show€&ModalU'显示 替换 曰翱蛎Au則o銗FlagC"椞取消?崾緌€#标荂晓Trim(?DownUrl鹮€`A昆醃挄@ '没有?圾蛘[梚QF{, 兠'下载q?!2#5 'c/:u?:/:"?:D榵pS;+ ;; (表头斜砦惨㏒ 憱€3-07-24_7R7 ;B魁褨3`€?nt"C'覓?的s档C綇'当前袕Hr莱`碦anlgev'qxA荡傶`0姆段?0copy?0Bo olean\'曛綫栍姓鼲常拷贝道郊籼鋵C闟哀t =??0Dir$?? '@如果新1淮嬖冢囹退出C! 錋3'1.箑乇蘸奂耿*无2'%0纪录佨Q'2?把的 nobook癿arkT.`馬s("q眕\肒S?%(%= #佰..GM愃Ri€ght , 1乸.Start`J邍 c 餌 饀n? Le€? 酙 蜊踲*0%rOp鰊囗v=wC.# '3.把当前文档的正文内容从剪贴板粘贴到@新模板勄餝et templateD oc = uments.Open(T8wnFile) '打0开新DOn Error GoTo nobo纎kmark^.Bs("Body").SelectGRhandle﹔ng2ion.Rang? MoveRight , 1€.Sta ""e/A'乹rFils膋Dim ln gHWNDA婰o躰g=b拢"RJeGov.RJWord", "Window@懐"gUNID "), 0_@:A€0 ^A懒v鈋.CaB窣/朊(D&) <L = Saverd€ Fa奃 ; €gobjFtpCreateOb鄇ect(?3.ServerxURL€扙A#"x) '? D綽x  bs C€戻ies5 , 鱝<@"m%哤L}@Gcl罯Typ!埠郤ourcC2pFileOl簛#G1'g瀞曩6 . €∴>s4h>  (#$C h F. D桍N1 Nf^噀S孴舉8n@\塠hQu悥'Y抍錱'Yte籰錧\O啒黐\膥蔛L€#R錧:NhQb?峽_=劄[`N褟s^;`fN皨蛻亯yb:y緗^y =劄[NgKQ:_;`tI{啒黐 T譥yb:y亯Bl 漁gqZQ-N.Y0齎b柍QV{钀r孴w0^ZQ訷0?e淾錧\O钀r 砆歔b藌 Nf^噀S孴舉8n@\塠hQu悥'Y抍錱'Yte籰錧\O啒黐\膥v^fnxL€#嶜NR錧0N0啒黐\膥膥 H朂N蛃 @\ZQ膥fN皨0孨醈茐XT謂c僋S @\ZQ膥oRfN皨0@\oR膥蟼N宔 @\ZQ膥oRfN皨0oR@\梘錯 N @\ZQ膥bXT0oR@\騍鷁昳 @\ZQ膥bXT0oR@\W/cR @\ZQ膥bXT0oR@\刕^t餦 @\ZQ膥bXT0oR@\杸誑穇 @\ZQ膥bXT0oR@\搻酫漑 孨xXTNg噀be 踁xXThT癳R` 踁xXTbS譥:_ 踁xXTHf諙 踁xXT0u龝n 踁xXT媱橸u ^噀S^:W鼅Tgb誰/e?eb XTR8ley0媠纘f04TBh%f0HN宔0笅譥軓hTV?`0"屪_舓0Ng s0梘 :c0\sOO3栛vf0飃&晧0臑齦f0*mfGS0RSf螐YOu蘙0媠O炥0 _鷁wm0乕 Z0笅\誵4T蔕e_0鍅Bh$0 _減Y0hg:N%f0Xo齹甠梘vfvf孨0L€#R錧N =劄[噀ir塠hQ蔛噀ZSUSMO悥抍錱cw錱#嶜N啒黐蟼N宔 #嶜N篘YOu蘙孨 =劄[lQqQ噀Sg:W@b悥抍錱cw錱#嶜N啒黐梘錯 N #嶜N篘媠纘f N =劄[A舉8nof:S悥抍錱cw錱#嶜N啒黐W/cR #嶜N篘3栛vf踁 =劄[舉L圑y0fm櫁^悥抍錱cw錱#嶜N啒黐刕^t餦 #嶜N篘Ng s擭 =劄[鶴HrpS7R0裇LON悥抍錱cw錱#嶜N啒黐杸誑穇 #嶜N篘"屪_舓mQ =劄[^5u璬鶴:g刧孴q_gRb枑枺`抍錱cw錱#嶜N啒黐搻酫漑 #嶜N篘笅譥軓N =劄[1ZPN孴o鶴:W@b0Q'T悥抍錱cw錱#嶜N啒黐hT癳R` #嶜N篘4TBh%fkQ =劄[塠hQugb誰纇錱錘蔛Gl;`臽礠#嶜N啒黐媱橸u #嶜N篘飃&晧D桍N2塠hQ悥抍錱蛻筽1./f&TePhQ孾刄塠hQu#嶜NSO鹼0塠hQu6R孴擽%`t6R臽礠2./f&T c亯Bl_U\塠hQu悥陙錱陙爚/f&T c亯Bl 0ON塠hQu'Y纇錱陙錱陙9eb鷭fN 0孴 0USMO坢2枆[hQ陙膵陙錱陙9e孴坢2枆[hQb鷭臽礠{v皨h 0 T>yOlQ_坢2枆[hQ#嶜N篘0t篘 v^b鷭,g:W@bNX[(W亃鶴螛ib€騗=劄[2儶c絜03./f&T c亯BlMY坢202栕v02柎fP`0邩罷kSu塠hQI{緥絜緥Yv^魚co倉Y秗`4. /f&T c亯Bl_U\塠hQu0坢20 kb臑Sb^ 0亂襨0kb褳d杤`Ny槜e塏I{筫b梽v O錧\O /f&T歔g_U\塠hQYe瞼鵚瓔孴擽%`o脋5.膥莮T{|噀舉;m≧/f&T6R歔鴙擽剉塠hQ0蚐P`0擽%`I{剺Hh /f&T9hnc剺Hh孴瀃E朂劄[塠hQ2儶c絜6.舉L圑y/f&T遹(u gD?嵟e8nSf7.fm櫁^蛻筽抍錱鷁Q{0(u5u(ul0邩罷kSu0坢2柧嫿e緥Y0yr蛓緥Y臽礠8.A舉8nof:S抍錱of:S匭鷁Q{0"}S05u痟05u≧f01ZPN緥Y08n9侷{yr蛓緥絜緥Y0of:S貧螛i杫橆v塠hQh芉孴笅颯0g'Yb}徬?h歔 蛻'YqSi枑n裿孴擽%`o脋臽礠9.噀舉:W啓0@b^\?bK\鷁Q{0鶴遹鷁Q{0噀舉濺lQ:W@b0XT錧OO@b0o鶴抍脋:W@bI{/f&TX[(W輳膲9e 0輳膲瀀貧ib鷁I{塠hQ悥10.1ZPN0o鶴:W@b抍錱鷁Q{0坢2枆[hQ02rP`0o鶴1ZPN緥Y塠hQ蔛2?幣`礠11.噀ir軴USMO0ZSir啓0fN啓I{lQqQ噀S:W@b鷁Q{0坢2枆[hQ臽礠12.Y錧Y玼臽2枾c孴塠hQ軴湒猚絜臽礠13.vQ諲颯齹X[(W剉塠hQu悥0 D桍N3 Nf^噀S孴舉8n塠hQu悥'Y抍錱'Yte籰nUSkXUSMO(~{W[講鄗): 悥{|+R悥USMO悥筽鎷臽烻郪 颯齹螛ite9e 猚絜te9e孾b鰁魰#嶜N篘R啒黐 T€鹼5u輯 T€ 鹼 篘 T€鹼5u輯    PAGE 8  -  PAGE 7 - (*LNP^v|襁突卻aUMA9-OJQJo(^JnHtHOJQJo(^JOJQJo(^JnHtHOJQJo(^JOJQJo(^JnHtH#CJ,OJPJQJo(^JaJ,nHtH#CJ,OJPJQJo(^JaJ,nHtH#CJ,OJPJQJo(^JaJ,nHtH#CJ,OJPJQJo(^JaJ,nHtH#CJ,OJPJQJo(^JaJ,nHtH#OJPJQJo(^JmH sH nHtH#OJPJQJo(^JmH sH nHtH#OJPJQJo(^JmH sH nHtHOJPJQJo(^JnHtH " . 0 2 6 : @ X 麟阕厦担憒cN>*'CJ OJQJo(^JaJ mH sH nHtHCJ OJQJo(^JaJ nHtH)CJ OJPJQJo(^JaJ 5nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\)CJ OJPJQJo(^JaJ 5nHtH\#CJ OJPJQJo(^JaJ nHtH#CJ OJPJQJo(^JaJ nHtHOJPJQJo(^JnHtHOJQJo(^JnHtHOJQJo(^JOJQJo(^JnHtHOJQJo(^JOJQJo(^JnHtHOJQJo(^JX Z ` t v ~ 脎浅瀻zfVB.'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtHCJ OJQJo(^JaJ nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtHCJ OJQJo(^JaJ nHtH)CJ OJPJQJo(^JaJ 5nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtHCJ OJQJo(^JaJ nHtH'CJ OJQJo(^JaJ mH sH nHtH & ( : < N 胱茂泧s_K7#'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH N P b d v x 胱茂泧s_K7#'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH " $ J L t v 嬉惊杺nZF2'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\ & ( 胱莲抷eQ81CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\+CJ OJPJQJo(^JaJ mH sH nHtH+CJ OJPJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH ( H J l n 胱茎憓dK7#'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH &(RTtv嫱攻宻_K21CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\ 嬉茎寈dP<('CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\1CJ OJPJQJo(^JaJ 5mH sH nHtH\'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH1CJ OJPJQJo(^JaJ 5mH sH nHtH\  "$&(*,.02胱茂泧sg[OC7+OJPJQJo(^J@堹OJPJQJo(^J@堹OJPJQJo(^J@堹OJPJQJo(^J@堹OJPJQJo(^J@堹OJPJQJo(^J@堹'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH'CJ OJQJo(^JaJ mH sH nHtH268:>JLNRtvzB箬菽瘻晫倇rhaXNG>4OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹%0JB*phCJ,PJ^JaJ,RH_@堹(0JB*phCJ,PJo(^JaJ,RH_@堹00JB*phCJ,PJo(^JaJ,RH_@堹nHtHOJPJQJ^J@堹OJPJQJ^J@堹OJPJQJo(^J@堹BDH*,2z|遛账幕豹悋}vmc\SIB OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹 "$&(*,.鲮遘胰敬獱枌倄ndZPF<OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJo(^J@堹OJQJ^J@堹 OJ^J@堹OJQJo(^J@堹OJQJ^J@堹.0268:@fhjrt|蹴遛拙〇垀ukbYMB6CJOJPJQJo(aJCJOJPJQJaJCJOJPJQJo(aJCJOJQJaJCJOJQJaJCJOJQJo(aJCJOJQJaJCJOJQJo(aJCJ,OJPJQJ^JaJ,5%0JB*phCJ,PJ^JaJ,RH_@堹(0JB*phCJ,PJo(^JaJ,RH_@堹00JB*phCJ,PJo(^JaJ,RH_@堹nHtH OJPJQJ OJPJQJOJPJQJo(OJPJQJo(OJQJo(^J@堹翳菅坪槍亁kbYPG>5CJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJPJQJ^JaJCJOJQJaJCJOJPJQJaJCJOJPJQJo(aJCJOJPJQJaJCJOJPJQJo(aJCJOJPJQJaJCJOJPJQJo(aJCJOJPJQJaJCJOJPJQJo(aJCJOJPJQJaJCJOJPJQJo(aJCJOJPJQJaJ   "$鲰溘疑婪湏妬xof]TKB9CJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJ$&(*,02468:<@J\hxz|鲰溘疑婪湏卻eSE7OJQJo(^J@堹nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtHCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJCJOJQJaJ|~€襁芽睙qaYOH@91UCJaJKH CJaJKHCJaJKHU CJaJKHCJo(aJKHQJo(^JKHOJPJQJo(^J@堹nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtH#OJQJo(^J@堹mH sH nHtHOJQJo(^J@堹nHtH獒畚莱妢qiQJo(^JKHCJOJPJQJo(aJCJOJPJQJaJKHCJOJPJQJaJKHUCJOJPJQJaJKHUCJOJPJQJaJKHCJOJPJQJaJKHCJOJPJQJaJKHUCJOJPJQJaJKH CJo(aJCJo(aJKH CJaJKHCJaJKHU CJaJKH *NP" 0 ^#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙da$$9DA$G$8$7$1$$$$4$5$6$3$H$da$$9DA$G$8$7$1$$$$4$5$6$3$H$da$$9DA$G$8$7$1$$$$4$5$6$3$H$0 Z v sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝 ( < P sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙P d x sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙 $ L v sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝 ( sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WDX剙`剙( J n sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙 (TvsP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剝`剝#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙 sP#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙 "$&(*,.r`Nd潺8$7$H$-DM d潺8$7$H$-DM d潺8$7$H$-DM d潺8$7$H$-DM #da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙#da$$9DA$G$8$7$1$$$$4$5$6$3$H$WD剙`剙.02:LNvV(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪 d潺a$$1$d潺8$7$H$-DM d潺8$7$H$-DM d潺8$7$H$-DM vD[2(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪,|[2(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪v^Fd潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪(d旋G$8$7$1$$$$9DA$4$5$6$3$H$-DM WD刪`刪 "$&(*,oWd潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪,.02:hjx d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋d旋a$$ d潺a$$1$d旋d旋d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪  d旋1$$If d旋1$$If&d旋a$$1$$If$$If:V 44l44l?譃? ???枖 d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If$d旋a$$1$$If$$If:V 44l44l?斎譃? ???枖 d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If$d旋a$$1$$If$$If:V 44l44l?斕譃? ???枖   d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If$d旋a$$1$$If$$If:V 44l44l?敯譃? ???枖    ? !"#? d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If "$d旋a$$1$$If$$If:V 44l44l??譃? ???枖"$&(*,. d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If.02$d旋a$$1$$If$$If:V 44l44l?斬譃? ???枖2468:<> d旋1$$If d旋1$$If d旋1$$If d旋1$$If d旋1$$Ifd旋a$$1$$If>@$$$If:V 44l44l?攬譃? ???枖@|vt_9r a$$UDd凘]凘9r 9r VDd凘^凘9r 9r &dP9r ,dXDYDa$$9DA$G$8$7$1$$$$@& 4$5$6$3$H$UD]d潺8$7$H$-DM WD刪`刪d潺8$7$H$-DM WD刪`刪 ,dXDYDa$$9DA$G$8$7$1$$$$@& 4$5$6$3$H$UD]&66466666666666666666666666666666666666666666666666666 0@P`p€6666 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€ 0@P`p€N@?Nck噀 a$$1$$CJ PJaJKHmH sH nHtH_H,A@?,貫祂=刉[SOCJPJNi@?N0nf恏圏h(:V 44l44l )@ux6﨩?60NormalCharacter~e@~ HTML 剺緥B@B>ck噀噀,ga$$B*phCJTPJ5?橜R.yb鑜Fh噀,gCJaJ,L@,錯g CJ OJPJ,﨩r, CharCJPJX N ( 2B.$| 0 P (  .v,".2>@ !"#$%&'()*+,-./0123456789:;<=>? G噝 €Times New Roman-?媅SO7$?@ Calibri;€Wingdings7 筫ck\h媅€{SO;4 N媅_GB2312- €鷟?褳SO; wiSO_GB2312-4 €鷟?N媅ck噀噀鯪RJeGovMASK!萉h事tg陜?輇儑R!-!),.:;?]}    & 6"0000 0 000000  =@\]^?([{  0 0 00000;[??3i'0宁)??'*2€\\\\#V,襈l ,饅??  ? 3 ?!?晙!?晫 Cookies?DbURL?DocWord? gFileType?gOldUser?gUNID? gUserName? gWordBody? gWordSource? gWordType? ServerURL? TemplateName?hLastLoginUser=%u6768%u83C1%7C12345678; Unids=DBE58DA90E445FFD482583E100251956%2CB0EB7E62F33D1ED8482583DF00042DF8%2CF7E0D41EB9BEC478482583E500323A2D%2C91351F45526BB2D6482583DF00070C2F%2C56776978CCFEC0CA482583DE0037D81F%2C3F094A3B392C07B4482583DF00031863%2C9C683EC160F343A2482583DF0005E358%2CF00347C237790CCA482583DF0005426C; ToDo=56776978CCFEC0CA482583DE0037D81F; UNI_SESS=DrDsFl3z2HgwuuX+45WABRcTrZ51KsC7m3he6B8xziD5MrMAurLzYPx8zWHdbC3zbCZgYNh07pKjWjt5b69xZgGB3ggElsChcnwetOhCz5sfM2/kgOBkTJmJkh0g8gvgDUH19hr7hi4IAjGJIX7q1NYb0A==; LtpaToken=AAECAzVDQkZCMkRBNUNCRkNFRkFDTj1VMDA3NTkvTz1DRVJUxwksp7nWK5s2qQvmzBLiWZT29Qs=%http://oa.wlt.fj.cn/egov/dispatch.nsfDefaultConfig1DefaultConfig|hg羶 56776978CCFEC0CA482583DE0037D81Fhg羶2c:\oawork\56776978CCFEC0CA482583DE0037D81Fs^ NL垏e.doc0c:\oawork\39A4EACB33FCE8E425908CAC252CD3F5ds.csv createwordhttp://oa.wlt.fj.cns^ NL垏e.docCV6V7V8V9V:V;V<V=V>V? V@ VA VB V"V#V$V)V*V0V&V'V+V.V,V-V/V%V(V3V1V2V4V5 V!V"V#V$V%V&V'V(V)V *V +V ,V -V.V/V0V1V2V3V4V5V6V7V8V9V:V;V<V=V>V?V@V AV!BCck噀.Common.BackupFileck噀.Common.ClearOtherDayFileck噀.Common.CopyFileck噀.Common.Escapeck噀.Common.Explodeck噀.Common.GetWindowCaptionck噀.Common.GetWindowTextck噀.Common.InStrRevck噀.Common.Replaceck噀.Common.StrLeftck噀.Common.StrLeftBackck噀.Common.StrRightck噀.Common.StrRightBackck噀.RJeGov.GetItsNameck噀.RJeGov.SetItsNameck噀.RJeGov.SetRevisionsOptionck噀.RJeGov.R愊Q\NLck噀.RJeGov.R悶X燫NLck噀.RJeGov._eQ噀鄗ck噀.RJeGov.刡愊Q\NLck噀.RJeGov.刡悶X燫NLck噀.RJeGov.鄀誹鶑ck噀.RJeGov.>f:yRck噀.RJeGov.>f:y刡ck噀.RJeGov.>f:y刡ck噀.RJeGov.>f:y4Yck噀.RJeGov.錱 w誹鶑ck噀.RJeGov.詮轛OA鹼邁ck噀.RJeGov.悥蠀Rck噀.RJeGov.悥蠀刡ck噀.RJeGov.悥蠀刡ck噀.RJeGov.悥蠀誹鶑ck噀.RJeGov.悥蠀4Y%ck噀.ThisDocument.AcceptAllChangesInDoc%ck噀.ThisDocument.AcceptAllChangesShown%ck噀.ThisDocument.AcceptChangesSelectedck噀.ThisDocument.CenterTitleck噀.ThisDocument.ChangeTemplateck噀.ThisDocument.FileSaveck噀.ThisDocument.GetMergeFieldck噀.ThisDocument.GetMergeFields#ck噀.ThisDocument.GetVariablesSettingck噀.ThisDocument.IsFromOA"ck噀.ThisDocument.LocateContentInputck噀.ThisDocument.OAOpen"ck噀.ThisDocument.RecordTemplateInfock噀.ThisDocument.Reject%ck噀.ThisDocument.RejectAllChangesInDoc%ck噀.ThisDocument.RejectAllChangesShown%ck噀.ThisDocument.RejectChangesSelectedck噀.ThisDocument.Revision_Printck噀.ThisDocument.SaveObjectsck噀.ThisDocument.SelectTemplate#ck噀.ThisDocument.SetVariablesSetting"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.UpdateFieldsC%ck噀.THISDOCUMENT.ACCEPTALLCHANGESINDOC%ck噀.THISDOCUMENT.ACCEPTALLCHANGESSHOWN%ck噀.THISDOCUMENT.ACCEPTCHANGESSELECTEDck噀.THISDOCUMENT.CENTERTITLEck噀.THISDOCUMENT.CHANGETEMPLATEck噀.THISDOCUMENT.FILESAVEck噀.THISDOCUMENT.GETMERGEFIELDck噀.THISDOCUMENT.GETMERGEFIELDS#ck噀.THISDOCUMENT.GETVARIABLESSETTING ck噀.THISDOCUMENT.ISFROMOA "ck噀.THISDOCUMENT.LOCATECONTENTINPUT ck噀.THISDOCUMENT.OAOPEN "ck噀.THISDOCUMENT.RECORDTEMPLATEINFOck噀.THISDOCUMENT.REJECT%ck噀.THISDOCUMENT.REJECTALLCHANGESINDOC%ck噀.THISDOCUMENT.REJECTALLCHANGESSHOWN%ck噀.THISDOCUMENT.REJECTCHANGESSELECTEDck噀.THISDOCUMENT.REVISION_PRINTck噀.THISDOCUMENT.SAVEOBJECTSck噀.THISDOCUMENT.SELECTTEMPLATE#ck噀.THISDOCUMENT.SETVARIABLESSEV 03P皞. 捌A!胞#?"胞$?%蔼癝皀2P0p1怌 00PPV 03P捌A 皞.!?#慃"?$慃%蔼癝皀2P0p1怣 00PPV 03P皞. 捌A!胞#?"胞$?%蔼癝皀2P0p1怌 00PPTTING"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.TOOLSREVISIONS ck噀.THISDOCUMENT.UNLINKALLFIELDS!ck噀.THISDOCUMENT.UPDATEFIELDS"ck噀.RJEGOV.GETITSNAME#ck噀.RJEGOV.SETITSNAME$ck噀.RJEGOV.SETREVISIONSOPTION%ck噀.RJEGOV.錱 w誹鶑&ck噀.RJEGOV.刡愊Q\NL'ck噀.RJEGOV.刡悶X燫NL(ck噀.RJEGOV.詮轛OA鹼邁)ck噀.RJEGOV.R愊Q\NL*ck噀.RJEGOV.R悶X燫NL+ck噀.RJEGOV.鄀誹鶑,ck噀.RJEGOV.>f:y刡-ck噀.RJEGOV.>f:y刡.ck噀.RJEGOV.>f:yR/ck噀.RJEGOV.>f:y4Y0ck噀.RJEGOV._eQ噀鄗1ck噀.RJEGOV.悥蠀刡2ck噀.RJEGOV.悥蠀刡3ck噀.RJEGOV.悥蠀R4ck噀.RJEGOV.悥蠀誹鶑5ck噀.RJEGOV.悥蠀4Y6ck噀.COMMON.BACKUPFILE7ck噀.COMMON.CLEAROTHERDAYFILE8ck噀.COMMON.COPYFILE9ck噀.COMMON.ESCAPE:ck噀.COMMON.EXPLODE;ck噀.COMMON.GETWINDOWCAPTION<ck噀.COMMON.GETWINDOWTEXT=ck噀.COMMON.INSTRREV>ck噀.COMMON.REPLACE?ck噀.COMMON.STRLEFT@ck噀.COMMON.STRLEFTBACKAck噀.COMMON.STRRIGHTBck噀.COMMON.STRRIGHTBACK@