-和记娱乐官方旗舰
邢唷??>? dg?ch欹?q` 鳵?zbjbjqpqpp ::'????
???8*$n
,?v?"????????x x x x x x $?h?x?!?????????4?ddd??????tnd??dd?@?d?j牜咎搴??vd8?0,du1?v]3du1?93$?d????d??4x?????^???,????
dn
?
n
d桍n1
淨n钀砆歔焇bk剉膲鄗孴膲?`噀鯪
n0焇bk剉膲鄗
1臑$nwm0nwm0wswm:snnd崘n瀀杒軴9崄_6eo(u俧l垶r誰1989t^10g27錯淨n钀0齎禰ir鱊@\銷,{9鱏lq^1997t^12g25錯淨n钀銷,{39鱏02001t^12g10錯淨n钀銷,{5鱏02011t^12g31錯淨n钀銷2011t^,{4鱏頞
2淨\oir蛓p[纇寶xt€8ht濺誰2005t^2g6錯淨n钀銷,{49鱏lq^2013t^12g31錯淨n钀銷2013t^,{5鱏頞
孨0焇bk剉膲?`噀鯪
1. 淨n钀sq嶯ps裇
0淨qg茤sod崸nn8hd岪b gcglu歔俧l垶r誰0剉愬w1998t^8g18錯淨蟸裇0199806鱏
2淨n钀0"?e钀sq嶯ps裇
0淨qg茤sod崸nn8hd岲嵮?h瀃孴"崱ryt gsq膲歔0剉愬w1998t^9g1錯淨蟸裇0199807鱏
3淨n钀0"?e钀sq嶯ps裇
0淨qg茤sod崸n@b gcg{v皨t俧l垶r誰0剉愬w1998t^9g1錯淨蟸裇0199808鱏
4淨n钀sq嶯ps裇
0淨qg茤sod崸nn8hd嶅]\o gsq顣槝剉膲歔0剉愬w1998t^9g4錯淨蟸裇0199809鱏
5淨n钀lq塠钀sq嶯=劄[淨鹼邁齎 go婲nusmol€錧蔛禰^\^棞qn7b鉙?ev{ gsq顣槝剉愬w2003
*,.<>@b?, 2 4 6 8 z 碥却葻崀pewgwes?h?cj ojaj o(h貵?cj ojpjqjaj o(#h>s?h?cj ojpjqjaj o((h>s?h?b*cj ojqjaj o(ph&h],hr0*5丆j,ojpjqjaj,o(&h],h?5丆j,ojpjqjaj,o( h],5丆j$ojpjqjaj$o(#h],h],cj ojpjqjaj o(
,.>4 ??>
?2?&?f?v?????????????????????刲dhg$wd?`刲gd??
剠dhg$`剠gd貵?
刲wd?`刲gd?$
??a$gd],$a$gd?gd],?lx?z ?????
$
<
>
????02v????$&??dfh????tv襻云釜煪敧煪敧煪敧煪敧煉煪敧敧敧攪獢獓獢獓獆hh9cj ojaj o(h?wcj ojaj o(uh貵?cj ojaj o(hew'cj ojaj o(h貵?hh9cj ojaj o(h貵?hmm?cj ojaj o(h貵?h?cj ojaj o(h貵?cj ojpjaj o(h>s?h?cj ojpjaj o(h??h貵?cj ojaj o(,t^8g29錯淨裇0200302鱏
6淨n钀0"?e钀0砇≧孴>yo軴湒钀0ye瞼钀0褃€b钀0鷁緥钀
0sq嶯膥莮瀃絜淨qg砇≧汻l忹y鵚瓔3朓q錧z剉愬w02004t^3g22錯淨褃ye裇0200404鱏
7淨n钀lqjt,{1196鱏i兺y纇寶xt€8h濺誰 2009t^4g24錯lq^
8淨n鷁緥y橆v踒h纇錱錧\o膲歔2008t^11g19錯淨裇02008026鱏
9淨n钀sq嶯
0宼e齎y淨o冋媽?e9?h芉0剉愬w1990t^9g19錯0900淨()w[,{61鱏
10sq嶯蛓p[(嵪戭晿槃v
y齉2002t^5g10錯淨濺鼅齉0200202鱏
11淨n钀濺lq匰sq嶯蛓p[誰 gsqag>k?u剉齉2006t^1g26錯淨濺?e齉0200608鱏
12. hyperlink \l "蛓p[04" sq嶯u軆罷蛓歔顣槝剉
y齉2001t^3g9錯淨濺淨0200108鱏
page
page 1
vxz|~€?????????
$&(,糸糁玫熋壝祘m礶aeaeaeawqwqmhnm
hnm0jjhnm0juh?[jh?[uh??h矱?cj ojaj o(h*d?h??cj ojaj o( h矱?h矱?0j>*b*cj ojaj o(ph*?jh矱?h矱?cj ojuaj o(h矱?h矱?cj ojaj o($jh矱?h矱?cj ojuaj o($h矱?h矱?b*cj ojaj o(phh?wcj ojaj o(h矱?cj ojaj o(???
(*,fhjlnprtv??????????????????????$刪刪]刪`刪a$ 刪刪]刪`刪勷?&`#$
剠dhg$`剠gd貵?刲dhg$wd?`刲gd矱?,.0<>@bfjlvxz鲫怅贞鲅脱苫h矱?h矱?cj ojaj o(h瀞?h?[hnmhew'0jcjmhnhuhnm0jcjjhnm0jcjuhnm0jcjo(vxz??
剠dhg$`剠gd貵?n00&p 0p?1怑2pp/r(:p稰?皟. 叭a!皀"皀#悐$恘%?癝包惄kd猩陏?寕?k?蛓p[04t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~t惡髜l?楘€葌h~??r@?rck噀$d旋1$9dh$a$cjpj_hmh nhsh th$a@??$貫祂=刉[sofi@??fnf恏?h :v?4?4?
la? k@?? 鄀rh?<@?<u?wd?&d
?9r cj6@6ck噀)蹚$刾`刾a$pj4﨩4遅
td5丅*cjoj< @"<u??$
?9r d?a$cj)@?1u?xdz@bd瘇噀,gd?h$9dcjkhojpjqj:l@:錯gd?h$9dcj khoj>x@?a>:_?"5丂?cjojpjqjnhthunb@rnck噀噀,g2$d?匋剒勥&?$ d?/劦0$9dh$a$b*cjzkhpj rh2phr???rp_.q*b*ph?? ???_??b???;}~??????????????????????0€€?0€€?0€€?€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?€€?€€?0€€楡0€€€i?00?楡0€€€i?00?楡0€€€i?00?楡0€€€i?00?楡0€€€楡0€€€楡0€€€楡0€€楡0€€楡0€€8i?00l??0€€€?0€€€?0€€€?0€€€?0€€€?0€€}???_??b???;}~???????0€€?0€€?0€€?€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?0€€?€€?0€€搢x j?0p?欯p€€€z?0p€
00&j?0p(q'?0€€} &&&)z v,z ?vz
x?we?x?!)!?!?晙餈?@?€€€?餒 ??? ?
?饞??? ?"
?養
?s??? ???鈠$
銁洎?鋤洫?鍅$
鎧か?鐉$
鑪が?閦鞈?陑鞌?雤瑨?靭l擃
韟l戭
顉,旑
飠瑧?饅,擃
駔?騴勥髗?=xl??i???j{???#g?
hcw???r??t????-p?
;*€urn:schemas-microsoft-com:office:smarttags€chsdate€,((€1€10€11€12€18€19€1989€1990€1997€1998€2€2001€2002€2003€2004€2005€2006€2008€2009€2011€2013€22€24€25€26€27€29€3€31€4€5€6€8€9€day€false€islunardate €isrocdate€month€year%#$#"&'%#$#"&'%#$#"&'%#$#"&'%#$#"&
'%#$#"&'' & "$#%#' &!"$#%#' &!"$#%#' &!"$#%#'
& "$#%#%#$#"&'%#$#"&'%#$#"&'%#$#"&!'%#$#"&'%#$#"&''&"!$#%#?????xe?????????????ux??????????????33?????????????????????????????????&p顈?d9韋弎廎5l?騍隺
?
k
5<塋魊?@4慺??;l .%!?![p"%(#?$肕$t}$'?'ew'j7(?(*<(r0* " ],欴.p_.?3裈6u6舖7e9h9?9
@9/z;q@>%n?6{b?d,ese胒i\ l?mbgmy9n竮n:lqu_q?r?s?uev-nv?w廞w[x_z8oz?[眝]媃_卪ayvf~>g?@ab??efu?ijtlmnopqrs?vfwxyg[\]^_`abcde????jklmnopqrstuvwxyz{|}~€root entry ?f€!忍搴?h&data
1table]3worddocumentp summaryinformation(3documentsummaryinformation8;macros牜咎搴?牜咎搴?vba牜咎搴?牜咎搴?dir__srp_0
k?__srp_1?__srp_2
??? !?#$%&'()* ,-./0123456789:?<=??@abcdef?hijklmnopqrstuvwxyz[?]^_`abcdefghijklmnopqrstuvwxyz{|}~€磤0*?ph?d?projectq(@=?
l €搲nj<
rstdole>stdolep
h%^*\g{00020?30-c
0046}#2.0#0#c:\windows\system32\e2.tlb#ole aut€omation`nmsfor ms> msffrmhs3€ed452ee1-e08f-101a-8-02608c4d0bb4efm20.dll#microspoft ? €^ ob伄 libr@ary/;d1?€剚u垇?垇00鑮#0倎#€kh0?偫a810ab8ec-0794-4abd-8f17-8c61b0d2b61a?docume~1\owner\locals€temp\vbe\腟.exd`;!€?e
???`?m磥奜ffdicd奜f@i?cb姖?摾?2df8d04c -5bfa乬b-怋de5@iaa@?4?2?莱gram files\繡ommon莋shared\o€ffice11?哋lp? 8.0宲桜%€0n梐l兒奛d朼? ???*\c
佄輑ot*u?l€t妘?劳jg{1cf542e0-d988-b1€-b48a@805f98face}#6聣d:\la\notesh8\n?3鉪 鑕 class,es€
@們"?b?鈞thisdocume爊tg?t爕猧 d`c`m?猲??2?` (h?1鈯ex"?,?`敯"" ?? newmang
?nwm奱@hr€s?&2?/籇/f皷!b%?ev??modulegq?evd!c@aau`$s?o酄u?e焕q2?o篳竔?震?(*a&u╯era?c&u€鑕rβ1d&?c&浵?q@添娟?aru€€€€~~~~~u
y
)?(app ?8 ahdoccancelpropertynamemyrevqru€€€ 0a
)
q
?#8y
?揔*y *\cnormalru€€€~~~~~~~~~~~~~~~~~~e q"n?翦i?膼隂w ?儕a ?i q ??坅 ?
)y???
1
i
a
y
???€a ??1 ?? 癤k?濦€嵵qx? thisdocument newmacroseventclassmodule userform1project??f/c:\progra~1\common~1\micros~1\vba\vba6\vbe6.dllvba
i ??? ?f5c:\program files\microsoft office\office11\msword.olbword
a??0?fc:\windows\system32\stdole2.tlbstdoleapp
q????e
忇?`孧?c:\windows\system32\fm20.dllmsforms
aa???旄
仈絁?宎耙?/c:\docume~1\owner\locals~1\temp\vbe\msforms.exd
aai??l续-鶾藉?d轗?c:\program files\common files\microsoft shared\office11\mso.dlloffice
)q??郆?堎?磪€_橔?d:\lotus\notes8\notes32.tlblotus
h44
iq??k ?f??a?e擜.諌繼?6m锓帺o眶川iz檢y^jo厄鼰邸_
?fdocumentdocument_close
document_openformat
d4 =鸂h? 3q?x躤豥xif?f?v?*=鸂h? 3q?籜8腞a┗ 邠戦
?f!=鸂h? 3q?classp?gv鹜? 3o
vbinternal
? p ?fapp_documentbeforeclose秗`closedoctdfileprintpreviewclosepreviewgetcustomdocumentproperties viewfinal
showrevisions
hiderevisionsshowisrevokhidedrxgdocclose
queryclose
>f:y頞hiderevisions??f??fa?afwordenve ?ff ?fviewcaogaoautosofta(
countitemname
value??fb ?f??ftempovercreatecaogaoeditcaogaoedittemplateupdatedoc fldqxxxfilenametemp\$notes.notessession4鄀誰r鷁notes鵞a?鲖塠艌notes7b飠o忲n!/f&t軴x[鵞噀鯪剉頞9eoak for notesfldqxxxserverfldqxxxdbpathfldqxxxdbnamegetdatabase鄀誰sb_hqo`酧o`penc揯[],鲖noaktxtt€鹼!fldqxxxid "getdocumentbyunidvwqxxxbyunidgetview8]剉茐vwqxxxbyunid,鲖noaktxtt€鹼!
getdocumentbykey
,鄀誰sb_hqo`酧o`噀ch,鲖noaktxtt€鹼! fldqxxxitemnamegetfirstitem
$createrichtextitemembeddedobjectsremoveembedobject flditemnameflag1 replaceitemvaluesavel ?fvbe6.dll
8
?x
rx
s?
.?u?`?@<???ey?x$ lx
????$(x4
8aru€€€ h4?__srp_3?__srp_4"$__srp_5;?__srp_6
z?`(!?# ?@?4nru€€€ `???a???? q
??9a??????? a8 a) `` i[?w0 l"cxx#t?2xt??狖'胞'宣'瘥'?0?p?p?慄'包'悬'瘘'?0?p?p?慅'褒'旋'瘕'?0?p?p?慆'剥'玄'瘙''0'pp!
p
p6>狖p0瘙玄剥慆p??龕齪齈??鼝黳黀???'p$
qp[滬4$
$
滬'xp!
p
?lx???xp2?x橕:`npp滬p$
4p
?滬
0
橕
,>x1旣)p滬橕5p
l旣???'瘙':`nppc0?p$
4p
hp6p0瘙e*慃p$
4p
<l慃??p&):`nppp$
4p
?p5p?p$
4p
?p?l(?旣?$xtp滬橕p0瘙玄剥慆p?p?0??瘕旋褒慅p?p?0??瘘悬包慄p?p?0??瘥宣胞狖 ?x$
?qxt?t
?t
0?t
?t
8?t
??t
??t
(?t
@?t
d?t
<點t*?px!
?x
?p
p)xp?(txp88hru€€€ d$`?$a`? $?`?nru€€€ $?`?$?`?$ru€€€€~|
????a )aa?9)a?????ai??9q??? ayi ?????!i??1i?)? y? a??? yq??00@0€t1lp$
4p
0lw\upv)pl5\kv??icx?zkvv?mz龘@lp$
4p
0l\a$€f4]?)pl6\$?ez龘@lp$
4p
0l\a$`1x)pl6\$
zdv[cxh(x pl\$0p0?0 00?0?000?|xkj8<:p n@@`d$
4d
?`
0
<
,>8f(
:
]?)d`<6@(??d$
4d
?d7'('@`d$
d
8`
?)d`6@(?pz?d$
?d
?d*酤d$
4d
<l酤??da):pn@@d$
4d
?d5@8<:pn@@`d$
4d
?`
0
<
,>81瘙)d`<5@
l瘙???#l瘙??l瘙??l瘙????
l瘙??n8<:pn@@`d$
4d
?`
0
<
,>81忐)d`<5@h:pn@@#8*#棹l忐*f(
濑d$
4d
?>濑f]鸃28棹d6@((n8<:p n@@`d$
4d
?`
0
<
,>81玄)d`<5@h
<:p n@@`d$
4d
?`
0
<
0)d`<5@d$
4d
?dhl玄<:p n@@`d$
4d
?`
0
<
0)d`<5@?pn@@1濑'@?`?€?狚'例'帻'? ?@?`?€?轧''俐>濑#8*#棹l忐*f(d$
4d
?28棹濑d6 @(轧€兀??隣齹齚鼲?/:n((:pn@@
h﨨6@(h黴點? '''(?:pn@@
6@(;'': n((?:p!n@@^齣慆悬6@(悬p]?? 悬p]?)?pzd$
4d
?d""c88##棹$?28棹:?瘊'? ?@?`?€?狖'利'帑'? ?@?`?€?狘'@?`?€?狚'例'帻'? ?@?`?€?轧'''('@%d$
d
d6>瘊@(轧€兀??隣齹齚鼲隣鼆黗麫??麪麁鸴鸃???/:n((:pn@@
h﨨6@(點帱?8<:p&n@@`d$
4d
?`
0
<
,>8f%棹潸:'n((楮禚$
4禚
?楮
0
潸
,l棹濑佞:剥(n茭帔$
4帔
?茭
0
佞
,l濑*f轧%hb€?帱﨨2棹濑)d`<禚楮潸帔茭佞6
@(轧帱黴點?€?轧'?*8<:p'n@@`d$
4d
?`
0
<
,l8*#濑棹潸:(n((楮禚$
4禚
?楮
0
潸
,l棹*#扎 *f
28濑棹扎)d`<禚楮潸6@(轧€?v8<:pn@@`d$
4d
?`
0
<
,l8?/8)d`<5@?c8<:p,n@@`d$
4d
?`
0
<
,>8f(%帱b- n)d`<6@(z
:p.%帱b@/0n0q點??€?轧'?*8<:p'n@@`d$
4d
?`
0
<
,l8*#濑棹潸:(n((楮禚$
4禚
?楮
0
潸
,l棹*#扎0*f
28濑棹扎)d`<禚楮潸6@(轧€?g8<:p,n@@`d$
4d
?`
0
<
,>8f(%c剥%0?b1 n)d`<6@( q點x
'''(?:p2n@@
6@(c8<:p3n@@`d$
4d
?`
0
<
,>8f(% ?b4n)d`<6@(q點pc8<:p3n@@`d$
4d
?`
0
<
,>8f(% ?b5n)d`<6@(
黦p??a@6??7???a@6代代您?
您裏8您?*酤d$
4d
<l酤??d):pn@@d$
4d
?d5@g?8d$
4d
?l8l忐*#棹???棹8d`
h
<:p n@@`d$
4d
?`
0
<
0)d`<5@h<:pn@@`d$
4d
?`
0
<
0)d`<5@?d$
4d
?dd$
4d
?dk(p?%:剥%8d$
4d
?>8f@%忐龘@?b(9您﨨d5@h
<:p n@@`d$
4d
?`
0
<
0)d`<5@h<:pn@@`d$
4d
?`
0
<
0)d`<5@?d$
4d
?dd$
4d
?du(?%:狛%:pn@@#8*#棹l忐*f(%忐龘@?b9您﨨28棹6@(d8<:p:n@@`d$
4d
?`
0
<
,>8f(%:剥;% 燓?)d`<6@(cp%黤剥% 燓?h<:pn@@`d$
4d
?`
0
<
0)d`<5@h
<:p n@@`d$
4d
?`
0
<
0)d`<5@?d$
4d
?d9酤`d$
d
,`
>l酤??d`-''('@d$
d
?d6@(q7'('@`d$
d
8`
?)d`6@(?xd l瘙苞代 ?0?您忐瘘悬帱?俐?玄h?,8棹濑扎d`<禚楮潸帔茭佞@(轧€?`?@? ??帻例狚€?`?@?狘€?`?@? ??帑利狖€?`?@? ??瘊?
/__srp_7>5newmacrosi闤userform1g7thisdocument???`?(?`?90$!`?$i`?$q`?$?`?(?`?a/$? `?$
`?$9`?$a`?n????kb熬?????????????????????????????????????????????????????????????????l???礑b癴??xme?h@<?>
llllllll?`劉z ??`
a?d `
h?`劀`劗" 劙%?`##??`劀`劗`勈`勌 劙?%`勎`勑??`
,,?? 劙h% 勚?% ??`
?
??i儼€?0 `
""???
`
??`??`
? "`?k??
?`勑h`?忐`?玄`刲0?`?p ?`劋?`?8?`?p 瘘`?€帱€? ?@???p0?價x%?€? ?@???p0? 8x??@?x?p`&x€x ?0 @?@??p @?l @?p\ @?x 0?@?v ??@?xd @?4 @??$ @? h???
?????x0?€p p
h `"zx p ??0?(f@(z@??d (@?
` @?`
p @?0
@ @?p< @??8 @?h
( @?x
@?0 @? @?酤 @?瘙 h?@??棹 @?濑 @?x轧 @俐@?h剥 @?`狛 @??慆 @??€? @??p? @??`? @??p? @?@? @? 0? @?8 ? @?p? @?h? @?€瘕 @??帻 @??旋 @??例 @??褒 @??狚 @?
慅 @?(
€? @?@
p? @?x
`? ?@??p? @??@? ?,~.&>?@*?悬@??傈 @??包 @?狘 @?慄 @?0€? @?hp? @?``? @?xp? @??@? @??0? @?? ? @??? @??? @?瘥 @? 帑 @?8宣 @?p利 @?h胞 @?€狖 @??慃 @??€? @??p? @??`? @??p? @?@? ?@?(0? @?@ ? ?@?? @?x? @?瘊 @??禚 @??楮 @??潸 (@??帔 @??茭 @?佞 @?扎 @@ 您@?代 p0d@?苞 ?xd@?? ?€d??d?@? @?o ?d?fh
?0h搲n$*\rffff*0=4e89931f*\r1*#c5*\r0*#13*\r0*#2*\r0*#1*\r0*#14*\r0*#14*\r1*#91*\r1*#166*\r1*#d0*\r1*#c0*\r0*#f*\r1*#cc*\r1*#cd*\r1*#c6*\r1*#c1*\r1*#17b??€ "???"?€ ? € € f(€ rp€ ?€ ?€ ?2??0?@?x€ ?`€ "p?$?€ "?????
?(?8?x?`?
h?x€ ?€€ €?????€ €?????€ "??€ ??€ € d?€ r€ *p€ ?€ ?€ ??????€ ?
??$ € $h?p???
?€ ??????€ ??€ €????€ €€ ?€ b? €(?10?@?p?x€`?h?m€?e??????
?€ ????€ ??€ "???????? € "?(?0€8€@€h?,p?€?????"????
?????
?
0€ (@?h?"x???(???€????€?"?€ €@€h€p€x€`€h€p?,x?????????
??
??" € ?( ?0 ?fp ?"??
????
????(??
€ ?
€(
?0
?@
€h
?p
"?x
?`
€h
€p
?x
?€
?
????????
?????????€ ??
(?
8?h?p€ ?x?$h???
??????
?? ??
??
????
8?@€h?p?p?x?€??€ b????????€ ????€?????"???????
?
?(
?
8
?h
?p
?x
?
p
?
€
??????????????? ???(?8?h?x? `€h?p????????€ "??€??*??????€ "? ?(?0€ b?8?@€ € €h?(jp€ ?
x?7???????€ ?
?€ "?€ ?*??)???n€ 8?
h?`€ h?6&x????€ ?€?€??&n??.h€h?np?hp?
??h??2????€€€€€ €(?&/0?
x?2 h????€ ?:;?€ ??€ ?? ?(? 8?
@?p?x?`€ ?"h????&/???€ € ???r???
x?€?h????€ € ??0v?,ch?x? €?
??????h?p?.gx?
??2 ????????2c??
?2c0?h?
p?x€ ??????
??
????*??)???g?h8?*hx?
??
??$k????h??*h??
(?
8?8uh?€?2d???????€ €?€?? h??h?
0?9@?
-x?h?7p?€??€ € € € ??a"oh?@?xx?@控制在公文在封发生成正式文件后"打印预览"时才调用是否打印红头代码?kif activedocument.customdocumentproperties("状态").value <> "正式文件" then%2? goto everythingokros?end ifar?
是否打印文头? |?
weboffice:$z ~?icr 0!> @??autosoft 0b@bk?? j!l(€i?定位红头文件所在的书签并隐藏锞 ???? fldwentou? ?b@??selection.font.hidden = true???$@ ?!?(?? j!l(€? f(? 0!> @? <??autosoft 0b@6k?d?? f(?k€??x?xp ?!?a@z|x??p?'?o@?€?x0?>控制公文在封发生成正式文件后"打印预览"时才调用是否打印红头代码?kif activedocument.customdocumentproperties("状态").value <> "正式文件" then?# activedocument.closeprintpreview? goto everythingok?end if 0!> @??autosoft 0b@bk 0b@?wx? j!l(€ ???? fldwentou? ?b@??selection.font.hidden = false???$@ ?!?(?? j!l(€? f(? 0!> @? <??autosoft 0b@6k???x ?!?a@z|????o???]? 0!?!?'? ????'&d?]?8 ??? ?? ? 0!?%?! ?? ? 0!?%?!4'&z8k0?(?'&ki?p j!l??9? ?9?q?o????x?]??]??]??状态 0%?!4?显示修订?g|j 0!> @??autosoft 0b@bkp?autosoft?8 ??l 0b@6 (!?'?? 0(d ??? ??? ?b@?a?? 0(d? 0(??! activewindow.view.showall = true ? ((??显示修订?状态 0%?(4?autosoft 0b@b?autosoft?8??: <?l 0b@6???x ?!?a@z|????o?? ? on error resume next]?`]?x]??]??]??]??]???状态 0%?!4?显示修订?g|j 0!> @??autosoft 0b@bk(a?? 0(d? 0(??隐藏修订?状态 0%?(4??? afwordenv 0%2!4??
editcaogaok?
editgaozhik?createfawenk?creategaozhikt?autosoft?8 ??l 0b@6 (!.x?
?a?ks?autosoft?8??: <?l 0b@6n??????? ?!?a@z|????o???'?]?p]?p?b€ ???? ?.?kx? ?!?.? ??'? ???x k ??autosoft?x?k? ?$??? ?b@? ?b@????k? ?!?'? ??autosoft ?!??? ??? ?!? ?!??? ?!?.???0k(k ?!l?? ?b@??autosoft ((??【 ??】 ?b@?k?k???? ??,
??
避免死循环x?k€?xop????`?'? ?!???k@z8??0?'?i ???'? ??? ??? ?b@??b? ??'?? ?!?.? ???x?k? ?$??? ?b@? ?b@???hk` ?!?'? ??autosoft? ?$??
$?? ?!?!?b@?kd? ?!l?? ?!?b@h ? ?!?(?? ?!?(? ? ?!?(?k?k???? ??,
??
避免死循环xhk`?xop?0]?p?请输入修改人姓名?? (!?$ ' ?? ((?k?o???a"o????x?]??temp 0%2!4$??over?? 0( (!jb@b?'"zxkp? f(
?屏蔽页面设置,页眉和页脚设置 0!> @??autosoft 0b@bk?? afwordenv 0%2!4??查看文档?
viewcaogaokt????更新文档?createcaogaok?
editcaogaok?edittemplatekt?h? updatedockt?更新文档?]? ?fldqxxxfilename 0%2!4'?temp$ ?\ $? 0!?]?8?temp 0%2!4'?over?temp 0%2(4 0b@ ?temp 0%2(4?temp$ ?\ ? ? 0b@k]?p]?h]?€]??]??]?????notes.notessession$(.? ????(无法创建notes对象,请安装notes客户端软件!a@z??x
kp
?是否保存对文件的修改? ,?
oak for notes$z'* * ~??queryclose = 0???d? * .??'" 0b@z?k?k??状态$&?显示修订??
hiderevisions (b@*???notes.notessession$(.?k(??.&??
fldqxxxserver 0%2!4?
fldqxxxdbpath 0%2!4?
fldqxxxdbname 0%2!4 ?%0.& &???无法打开全息信息数据库[?
fldqxxxdbpath 0%2!4?
fldqxxxdbname 0%2!4?],请与oak管理员联系!a@z??k?打开全息信息所在数据库? afwordenv 0%2!4?edittemplate??? fldqxxxid 0%2!4 &%2. d€
??vwqxxxbyunid &%4.l l???无法打开全息信息数据库[?
fldqxxxdbpath 0%2!4?
fldqxxxdbname 0%2!4?&]的视图vwqxxxbyunid,请与oak管理员联系!a@z???k??? fldqxxxid 0%2!4? l%6. ???'无法打开全息信息文档,请与oak管理员联系!a@z??( k k ??fldqxxxitemname 0%2!4 %8.? ?????fldqxxxitemname 0%2!4 %:.?k??'" ?!<'"?
删除旧文件 "$>? @? ?!<? @bb @??k 0!> @??autosoft 0b@bk? 0!?\ ??
??over?temp 0%2(4?
viewcaogao? afwordenv 0%2(4? 0(d 0b@???? 0! ?%f.@d(?over?temp 0%2(4?
viewcaogao? afwordenv 0%2(4? 0(d 0b@?????temp$ ?\ ?%f.@kx?flditemnameflag 0%2!4?1 bh?? bn(?? ?x???? afwordenv 0%2(4?over?temp 0%2(4? 0( (!j!??? (b@ld? (!jb@bkxiph宓attribute vb_name = "newmacros"
sub closedoc()
call€ querycx?
end jttdfileprintpreviewhl on error gotohan0dlerf '控制在公文在封发生成正式文件后"?蛴≡だ?时才调用是否红?反?f'i€f activ?ument.cu0stom?properties("状态").value <> "?" th\en?€n僘v{t纇ingok
亊ifa=msgbox("n文??", vbyesno, "weboffice:")竩bnoo6亜廯€ytejontyp俆wdno? "寔unpro? ("au€tosoft"t锪
?2? ?a€window.乼@.showa€? trueg
'?ㄎ籄cal所?诘氖榍┎ ⒁貒 se
l?.buwhat:=wdboo€kmark, 仯:="fldwe皀tou@&'fo€whidde巒€rk#l col罏= rgb(2585, a?fals?options.潞draw锳卋j6s@"t<= 韘膥?@bowonlyform€fields,f锢欶zg_ ze_f?7%c
b8e*c€俽r:?胋.de0scri?cex黫tc? d?ah??嶢i??巆g厡??
岘邏!`p0!'%5?_?[q?賷??!?幥{?繄▓6埫鑦輫0, 0d?(
[嗙k?5偫|唭鍽?卐b _&?}?>ar?>t>?俷
fun鈔?get飡鋥0
憒byas s鄬ng) ?sdim iainteg{嘠&i癉<??.郈ount?4??wo
v唒"詋鸙漲 j~ ?怽 jp? 悞i?q1<oditem(j?.?= ?鐛?縬oi?o昤?u"n?ar ?)c?鳱ext??
?? ??3cv些 finalr璚i紅htgb廟 ?saandcoms隶邁 .f!`wb?a a?@m~ 駮?铣╨- 1straut蝖p?1?my??e????尦p孟€允拘薅﹕瞅 ? o€(攥攥?,'飂u伕 涂? passwo黵d@憄掄戳?suser?applica?m.eq<
??匽ehomekey uni挴sto坮y,@ten?`wdmovⅵ轮s卸o?h?僃
x?'?b??oa???蠌?讁#_._??>撏/t愖n鄌rese€?鱤?on
/n薤f啲鄊?€=sg嗍e???竹?`?桹?飇q@>q3?d鈚?datd?`??襩?w?integer
dim myrev as a0isionhautosofts宼r€ing< notes0va riant2if activedocument.@customproperties("状态").value <> "显示修订" then exit 楽ubyktel ontypawd|noe<?桿npract ("u")end if?call` hide??show渟 = 0fals?print!$? "愐貍?
侺乸?o渞ror厐鑣€?nex勍sel€m ca宻e
k聄ble@gafwordenv卙?b"editcaogao"? b€zhiacreatefa竁en??? ?伳p passw@!$:=噃, a{:=wdallowolnl伆庐s?@?applic刟t€?ver伖? > 9埮g@f纜viewfin糰l葐€re膥f蝸c溣5noreset:=true?formf餴eld?a$胻羵goto everyth霴k
err_han dler:?ms gbox ?.d纄scripa#!?gn)€baq鄎 su繼(dei繼0a v 鼔b?!?a?o€ while ?wc '`7i亗0?s鬳t儢1b
fa螭v f ?@醓??i 1?€ぃis n蝟?f"&do??strauth蟕rwf崯 ??e?s?ok(?)`m%??move0righ媮?le鰂l參in@?#??麎b.c'*!峤g!咥畠ranga撸狼??丅1p'?€1.index"#
?!蔶 ?処€'!3d?`"bm5n7 ?.逭3????" 闅usern鴄me g?乥羅?at? "【?? ??????2e > 30? '避免死循环?37w loop`k?
fun賯~ ii/貒)?趰胿perrhpsd?t-€???
(希?b?
fwrq?atq卭t ?homekey unipawds tory,p憈e躰dp1=s dot達m?q?q?? o=?!?oj??\h?_jf92???i??ig4_: trim(elstr)袸chr(1?)_r?睳.舎鷖?j€檂? #廯?邌? c,f?w??c??fo!給lor%vwd`black??.?ikethro鴘gh?植?;,bu]rlin袽w鈊?nonc故?麊x罦2螶螶蜫?比o~s頙sub d(rxg?d€謝g]?= input袠$("请?淙胄薷娜@诵彰?`?o^@^硹?1疛ara??q?a?o纁closebb?qup1蔢pu猙啻 臠 g(kx x唳d? ??夸??l?蔜em謕迳?0巖l[s?saved ('?9?window?2c??刢,`q???o秙.vpirus?銧r?帘我趁嫔 柚茫瑦己嗤页脚?$1g??5?_餞? ? activedocument.unprotect ("autosoft")
end i"f,sel怌ase
刅ariables("afwordenv"€).valuex'查看文??d"view€caogao"qgoto everythingok'更新??createa€, "edit
`templ#_ ?`upd€
亙.gupdatedonc???:v dim filenamex asp str€z=歠ldqxxx:f€$n€$潄3if@ trim(€玦€ron$("t€l") & "\"c€?) <>?full? the巒嘙0?str????az??寷葕辽 = "o€}萟?sav?w?e1?'?@qb:=\, fileformat:=w€dformat問锪(i蚜a峷谰?,|ntg%傽?i3vvcurdbvq p?set n`剆?get圤bj ?""`n?.?sessi"ll*llll?ll?<` @??autosoft 0b@bk?? 0(dn?o??? f? j9h n9l r9p n9t x9v n9z ^9\ b9` n9d h9fq0 p j!l(no|?attribute vb_name = "thisdocument"
孊as?normal.vglobal!猄paclfalsereatablpre declaid濼ru
bexposetemplatederiv$customiz凜? dim x as @new ev圕lassmodul€bp)- sudb 厴_clf()
call€ queryc?
end?
?
open? if get僈-properties("状态")紫允拘薅? then;€[application.run ("hiderevis9 s"丯丟if亙set x.崂word??c??cint( vera) > ?0!??侫f翄t?sele宑t繪楢ct纉羺=.variaf€=af?env")€l亗?@
"viewcaogao_€瓉?l@qtaprw::="autosoft", noreset:=羳, type:=wdall€owonlyf?@fields?c?腅偟g両s@_? <> wdno?@蠱?unp魊o/(?膔d塼脛showf個=?剅????*v
羂?乀with opald!a.ins`tedtext怣ark wd?underlin`h?color"byautho謗d etls罋kethro8ughsz?ed侠3n&2no*n?
edl?s??pouts xb郩e_i!d
??@&o?c4oma箂?qsb爾oon攏to黵i`炩垼1s`磤>>v?丆#wi@ndow.v t.b!
括【wdmixxed?琋ˉe_vba_project??eventclassmodule"\1 project?oprojectwm??蘟y ??*\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{0d452ee1-e08f-101a-852e-02608c4d0bb4}#2.0#0#c:\windows\system32\fm20.dll#microsoft forms 2.0 object library*\g{810ab8ec-0794-4abd-8f17-8c61b0d2b61a}#2.0#0#c:\docume~1\owner\locals~1\temp\vbe\msforms.exd#microsoft forms 2.0 object library?e
忇?`孧?&*\g{2df8d04c-5bfa-101b-bde5-00aa0044de52}#2.3#0#c:\program files\common files\microsoft shared\office11\mso.dll#microsoft office 8.0 object library*\cnormal*\cnormal搲n?*\g{1cf542e0-d988-11cf-b485-00805f98face}#6.0#0#d:\lotus\notes8\notes32.tlb#lotus notes automation classes
搲nb?thisdocument064e89931fthisdocument`?0enewmacros0=4e89931frnewmacrosf?籇 eventclassmodule0<4e89931f eventclassmodule震0?userform10;4e89931f[userform1娟hqhh0=响仜fす.>l觗0??麐畫
w鐑忲n/&j?贻蠚g跺wi囗c爜挛&?€??t@u?formatword祂`vba麾`win16羱`win32`mac巢`vba6?`project-甡stdole揱`msformsc`officeu`?normal哓`?lotus揱thisdocument<瀈 €_evaluate賎xo`eventclassmodule?`document_close7\`
?querycloset鬬
document_open翂`?getcustomdocumentproperties~`application?`run_衊app縯`version∨`activedocument覾` variablesn`value銴`protect譮`password鹞`noresetg`wdallowonlyformfields?`protectiontypeτ`wdnoprotection` unprotect?`
?showrevisions`options`insertedtextmarkn`wdinsertedtextmarkunderline燻insertedtextcolorn8`
wdbyauthor*``deletedtextmark嬏`wddeletedtextmarkstrikethrough撵`deletedtextcolor
`revisedpropertiesmark`wdrevisedpropertiesmarknone鸸`revisedpropertiescolor瓓`revisedlinesmark缝`wdrevisedlinesmarkoutsideborder|躟revisedlinescolorし`wdautokv`
commentscolorp宍 revisionsballoonprintorientation.`!wdballoonprintorientationpreserve鹫`activewindow?`view蠭`
revisionsmode擅`wdmixedrevisions釅` newmacros甹`?closedoc誤?tdfileprintpreview澟`
errhandler}`msgbox桼`vbyesno漙vbno?`showalli耟 selectionz甡what酑`wdgotobookmark`fontu`color2f`printdrawingobjects琏`everythingok3騚erro奰description?`printpreview讳`?closepreviewaw`closeprintpreview#耟propertyname黛`i``customdocumentproperties迻`count0v`ja`item讂` ?viewfinalz`showrevisionsandcommentsl燻
revisionsview鯑`wdrevisionsviewfinal3]` strauthor鷃myrev篳revision深`wdallowonlyrevisionsw2`strusername蛨`username\鎌homekey窙`unit仧`wdstory?`extend?恅wdmove歾`?show鮜printrevisions
?hiderevisions鰅`dt齖`intrevcount?`autosoftstr?`notes灤`?hide9z`err_handlerl`myrev1?`nextrevision$卄?isrevok燬` moveright惕`moveleftv揱next1"`author鼜`range?`index窨`typetext醍` errhandle玓`next2#`trim@颼chrk~` revisions輁` rejectall<)`
colorindex鱼`wdblack:黗
strikethrough"躟 underline笊`wdunderlinenone`?drxg墫`xgrs頯inputbox?`?docclose=`savedd蒨virusprotectionod` updatedoc?` filenamex?`environ,`fullname袨`tempstrx軱`save捫`saveasf;`filenamej胉
fileformat熤`wdformatdoc屲`qxxxdoc癹`vm`curdb?`qxxxdb'` getobjectz胉response棳`
vbyesnocancel鑡`vbcancel'頯getdatabase筐`getdocumentbyunid?`getview驌`getdocumentbykeyβ`getfirstitemt韅createrichtextitemy鈆embeddedobjects?`isempty
鵣obj懡`remove媳`trackrevisions熍`embedobject籪`replaceitemvaluej` documents?`quit9甡app_documentbeforeclose賁`doc槃`documentj觍cancel駱`class籤€documentbeforeclose?` userform1)謄userformn`_b_var_trimmt`_b_str_environ篱`€_b_var_wdformatdoc钔`€_b_var_response 刞
€_b_var_obj`?s[h? "@??????????????????????????psss?a?0?r6"?p(n0{fcfb3d2a-a0fa-1068-a738-08002b3371b5}@0%*€-4@n`?xkp(?)僎???%i僒€$€???%0凗 %?0?`@€?$?€? )?€€ 凲x?€%?"xpx@hx 凲xp€pf% x8?????0?0??h,0搲n*\r1*#17c*\r1*#17e$*\rffff*0<4e89931f$*\rffff*0=4e89931f*\r1*#c0?8<
€
€ € "? ?
?(?0?8€ € h] 蚰"?0 "??x?'tkho@8s?attribute vb_name = "eventclassmodule"
淏as?{fcfb3d2a-a0fa-1068-a738-08002b3371b5}
|global豐pacaifalsedc€reatablpredeclaid?cexposetemplatederiv?customizepubli@c with倴s app as `word.€€a皌ion塲.?varhelpibd€z-1
?pcae sub?_ docum€翨e@foreclc(繠yval €?, cancel?boolean)
if q`ueryc31p the€e ?= tru笶nd?if
??#id="{574e9be0-3fba-4740-9d26-e5a022bf0566}"
document=thisdocument/&h00000000
module=newmacros
class=eventclassmodule
package={ac9f2f90-e877-11ce-9f68-00aa00574a4f}
baseclass=userform1
helpfile=""
name="project"
helpcontextid="0"
versioncompatible32="393222000"
cmg="0b09d2625666566656665666"
dpb="8b8952e2d3e3d3e3d3"
gc="0b09d26253635363ac"
[host extender info]
&h00000001={3832d640-cf90-11cf-8e43-00a0c911005a};vbe;&h00000000
[workspace]
thisdocument=0, 0, 0, 0, c
newmacros=0, 0, 0, 0, c
eventclassmodule=0, 0, 0, 0, c
userform1=0, 0, 0, 0, c, 22, 29, 1070, 627, c
thisdocumentthisdocumentnewmacrosnewmacroseventclassmoduleeventclassmoduleuserform1userform1}t ?
microsoft forms 2.0 窗体embuserform1牜咎搴?牜咎搴?f?&o?compobj?aedded object?瞦version 5.00
begin {c62a69f0-16dc-11ce-9e98-00aa00574a4f} userform1
caption = "userform1"
clientheight = 3120
clientleft = 45
clienttop = 435
clientwidth = 4710
startupposition = 1 '所有者中心
end
?
?fmicrosoft office word 文档
msworddocword.document.8?瞦vbframe?compobj?m