ミマ爍ア>?? &(????%k=?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????チ[? ソ,(bjbjャ岦68ホホモ???????キCCCCC????WWW8Lロ\Wザ7ィ゚"-a> ォ⑨e ??????$wW「ZU-C3aa33UCC-4=Uキ!キ!キ!3?CC-⑨キ!3⑨キ!キ!ェ?0|o1,????PヤGユヒチマWウ|サ0sHSU0ザヘ0「抻/ ミ抻$o1抻Co133キ!33333UU? ク333ザ3333????????????????????????????????????????????????????????????????????抻333333333 :  cgq 鑞a起y cknxkX儔,ghTh CONTROL Forms.TextBox.1  CONTROL Forms.TextBox.1 `$N)R3u3u  FORMTEXT      ムSfR T  FORMTEXT      3uコN  FORMTEXT      a$ e?k欖澤  FORMCHECKBO 包?*g喙INfN~{0 FORMCHECKBOX 9hncN)Rユl杣スeニ~R,{51agёト凹[ ?Bl N3uロ臭稲O9e0  FORMCHECKBO 包?*g喙INfN~{0 FORMCHECKBOX 9hncN)Rユl杣スeニ~R,{44agёト凹[ ???Vカ[蚰ニ匡NCg@\晒 FORMTEXT     t^ FORMTEXT   g FORMTEXT   蘰ムSⅧё  FORMTEXT      仙wfN?ムS㌃戎  FORMTEXT       ? ?ロ臭??k0b$ e?k?ケ[㌃ T㌃-NёMOne0ck0MRe0ck0Tc$D柳NnUS YHhёチf㌃ T? FORMTEXT      "$VXZ\^ャーイニ?ヘシゥワ枚s`厄TH=.=jhsヨh6OJQJUhsヨh6OJQJhsヨh6OJQJo(hsヨh:サOJQJo(%jラhsヨhャ{?CJOJPJQJU&j2 BV hsヨhャ{?CJKHUVo(hsヨhア3CJOJPJQJ%jhsヨhア3CJOJPJQJU%jhsヨhャ{?CJOJPJQJU j3 BV hャ{?CJKHUVo(hsヨh.`ヘCJOJPJQJ%jhsヨh.`ヘCJOJPJQJUhsヨh:サCJOJPJQJo(ヲリwk dh$Ifgd6$ббdh$If]б^бa$gdGddkd$$IfT僕ヨ比?ヨ?%?%????????????ヨ0??????ヨ????ヨ????ヨ?ヨ????4ヨ la概 ?、P$If`?ニネハヤヨリレ         " 6 8 F H J X Z r | 洄ノ゙スイズイ?゙ノ゙スイス舷゙イz゙スイn_TIhsヨhgjOJQJhsヨh}rワOJQJjhsヨh}rワOJQJUhsヨh:サOJQJo(#jhsヨh6OJQJU'hsヨh6KHOJ^JaJmHo(sH#jhsヨh6OJQJUhsヨh6OJQJhsヨh6OJQJo((jhsヨh6OJQJUmHnHujhsヨh6OJQJU#j+hsヨh6OJQJUリレワ vj dh$Ifgd6dh、<$Ifgd」Vzkdキ$$IfT剖4ヨ倍ヨ0?%t v#ヨ0??????ヨ??ヨ??ヨ??ヨ??4ヨ Uaf4概   H vhdh、<$Ifgd6dh、<$Ifgd」Vzkd/$$IfT剖4ヨ之ヨ0?%  v#ヨ0??????ヨ??ヨ??ヨ??ヨ??4ヨ Uaf4概H J X d tddd、x、x$Ifgd:d、x、エ$Ifgd:zkdマ$$IfT剖4ヨ罵ヨ0?%  v#ヨ0??????ヨ??ヨ??ヨ??ヨ??4ヨ Uaf4概| ~ ー イ エ   ( * , H J L メテクヲテ墺巡メテクrテ啾UAa&j? hsヨh>*OJQJUhsヨh。>*OJQJ jhsヨh。>*OJQJU#jQ hsヨhdOJQJUhsヨhgjOJQJhsヨh}rワOJQJhsヨh:サOJQJo(#jュhsヨhdOJQJUhsヨha=OJQJjhsヨha=OJQJUjhsヨh}rワOJQJUhsヨh、5^JQJ\{(jhsヨh、OJQJU 、 ヲ ィ ェ セ タ ツ ニ ネ ハ フ   ?メ゙ニイ゙?メ?抵メ?g[Gg&j{ hsヨhS/>*OJQJUhsヨh?A>*OJQJ jhsヨh?A>*OJQJUhsヨh:サ>*OJQJo(hsヨhカ>6OJQJo(&jゥ hsヨhw>*OJQJUhsヨhヒR\>*OJQJ&jモ hsヨh>*OJQJUhsヨh。>*OJQJhsヨh:サOJQJo( jhsヨh。>*OJQJU jhsヨhヒR\>*OJQJU   , . 0 D F H R T d f t v ~ ? 、 ヲ ィ ?メニオゥ雰オメth]QFQFQFQFQhsヨh?~OJQJhsヨh?~OJQJo(hsヨhYVスOJQJhsヨhYVスOJQJo(hsヨh:サOJQJ+jhsヨh?lチ>*OJQJUmHnHu&j; hsヨhwU>*OJQJUhsヨh?lチ>*OJQJ jhsヨh?lチ>*OJQJUhsヨhカ>6OJQJo(hsヨh:サOJQJo( jhsヨh?A>*OJQJU jhsヨhマx>*OJQJUd f t v nkdャ$$IfT剖4ヨ??ヨ?%??%ヨ0??????ヨ?ヨ?ヨ?ヨ?4ヨ Uaf4pヨ ??概 、<$C$IfgdYVスgkd $$IfT剖4ヨ斐ヨ?%??%ヨ0??????ヨ?ヨ?ヨ?ヨ?4ヨ Uaf4概v ? ヲ ィ ェ ャ LCC $Ifgdァkd`$$IfT剖4ヨ??ヨ\?nb%?レ? ????? ?????& ????ヨ0??????ヨ????ヨ????ヨ?????????????ヨ????4ヨ Uaf4pヨ ??概 $$Ifa$gdxkGャ ョ ー イ セ >&OCC d$Ifgd9Yァkdr$$IfT剖4ヨ飯ヨ\?nb%?レ? ????? ?????& ????ヨ0??????ヨ????ヨ????ヨ?????????????ヨ????4ヨ Uaf4pヨ ??概 $Ifgdィ ー イ シ セ ヤ ヨ &&&*&,&.&8&:&<&>&@&ンムナウ・操dウbナウ・N?dウナンChsヨh:サOJQJ&j2hsヨhエ\z>*OJQJUU6jhsヨhエ\z>*OJPJQJU^JmHnHo(u jhsヨhエ\z>*OJQJU&jhsヨhエ\z>*OJQJUhsヨhエ\z>*OJQJo(#jhsヨhエ\z>*OJQJUo(hsヨhエ\zOJQJo(hsヨhタJ/OJQJo(hsヨh:サOJQJo(hsヨh~OJQJo(hsヨh~OJQJ ?チf㌃YHh? FORMTEXT      0d$03uコNbN)R絲t:g?~{W[b?ヨv炳  FORMTEXT      ?Vカ[蚰ニ匡NCg@\Ytaチ  FORMTEXT       FORMTEXT     t^ FORMTEXT   g FORMTEXT   蘰 FORMTEXT     t^ FORMTEXT   g FORMTEXT   蘰     e ck fN PAGE  PAGE 1 100006 2010.2 >&@&f&?ヲ&ホ&q`┓??$If]┓`??gd089$ & F$Ifa$gd1Zス ?$If]?gd2 $Ifgd2gkd$$IfT剖4ヨ肇 ヨ?%?%ヨ0??????ヨ?ヨ?ヨ?ヨ?4ヨ Uaf4概@&D&d&f&h&|&~&?、&ヲ&ィ&シ&セ&フ&ホ&ミ&メ&??????? '''''''.'0'2'6'8'<'>'R'ワヘワサヘヘワゥヘヘワ力僅ワyヘ僅ワgヘ僅ワ#j;hsヨhャ{?OJQJU#jhsヨhャ{?OJQJUjhャ{?OJQJU#jヘhsヨhャ{?OJQJU#j#hsヨh089OJQJU#jhsヨh089OJQJUjhsヨh089OJQJUhsヨh089OJQJhsヨhOJQJo(hsヨh089OJQJo(&ホ&ミ&<'ィ'yjR$???$IfVD??WDR^??`?a$gd089 $IfWDF` gd2kdケ$$IfT剖4ヨ煩 ヨ0?%ヨ0??????ヨ??ヨ??ヨ??????ヨ??4ヨ Uaf4pヨ????????????概R'T'`'b'd'x'z'?????、'ィ'ェ'ャ'ョ'イ'エ'ク'コ'セ'タ'ト'ネ'ハ'フ'メ'ヤ'ヨ'リ'?????洄メ゙ヌオ゙メ゙ヌ」゙メヌ專藷藷藷暑?v?j義Z`Z義 hB?a0JjhB?a0JUhB?a@?CJOJPJhB?a@?CJPJhB?a@?CJPJo(hB?ah"8jh"8Uhsヨh:サo(#jYhsヨh089OJQJU#j」hsヨh089OJQJUhsヨh089OJQJhsヨh089OJQJo(jhsヨh089OJQJU#jhsヨh089OJQJU#ィ'ェ'ャ'ー'イ'カ'ク'シ'セ'ツ'ト'ニ'ネ'yqoooooooomodhgdャFbkd $$IfT剖4ヨ乃ヨ0?%ヨ0??????ヨ??????ヨ??ヨ??ヨ??4ヨ Uaf4pヨ????????????概 ネ'ヤ'ヨ'???((( ("($(&(((*(,(゚dhgdャFb ??&`#$gdf$@&a$????'(((((((*(,(橳褞杦レメ睾ニhsヨh:サo(h"8h4jhB?ao( h4jhB?ahB?ahヨnテ0JmHnHujhB?a0JU hB?a0J 4&P 1?2Pー? ーニA!ー"ーS#衰$心%ーーSーq 姓ラDd イ  c ???A?ソ ??3"ソ`ソ???2?Q'Cf券ィ,M戚験Q:@??D `!Q'Cf券ィ,M戚験Q:@L??テ?xcd濺``Vcb``b紳 ff臍`メワ@q0窮苑¢ネ禿*Rヘネt狢ーャ#L#伊 トF\ 1? 2 d゚oヲ/?チ @ ロ牌ン:‰L駑!ョ?GオnL9Qレロゥ素r。.P5ネNNヲ???c3ゥh帳oーBィァ?~IFf2 .チ~1y 瞋・エム/=ィ3??*UョA?ョDd イ  c ???A?ソ ??3"ソ`ソ???2拇ホ F[゙Rワィ。X??ヤ `!拇ホ F[゙Rワィ。X?ヤ???xcd濺``ホb```d ,@フフネチタ 、ケ僉" #P3?Ⅱ、?鯊`Y=F フbb1ケ? $ニタ6hトセ゚L_?Cト'?カ180(晗u?纖メロB\7セuイ/ケ。ナpcハ稼?リ9ル4_ u↑Avr2????uニ??A祥`ⅹミ、$$If!vh5ヨ?%#v?%:V 僕比?ヨ0??????,ヨ5ヨ?%/ヨ  ????????/ヨ ?4ヨ概D????@3uN)R3u_3uCursor$$If夜?!vh5ヨ 5ヨv##v #vv#:V 剖4倍ヨ0??????)v+ヨ,ヨ5ヨ 5ヨv#/ヨ ?/ヨ  ?/ヨ ?4ヨ4ヨ Uf4概D?????ムSf T N)R3u_ムSfR TCursor$$If夜?!vh5ヨ 5ヨv##v #vv#:V 剖4之ヨ0??????+ヨ,ヨ5ヨ 5ヨv#/ヨ ?/ヨ ?/ヨ  ?/ヨ ?4ヨ4ヨ Uf4概エD???? 3uコNbN)RCgコNモY Tb TN)R3u_3uコNbN)RCgコNモY Tb TCursorワ$$If夜?!vh5ヨ 5ヨv##v #vv#:V 剖4罵ヨ0??????+ヨ,ヨ5ヨ 5ヨv#/ヨ ?/ヨ ?/ヨ  ?4ヨ4ヨ Uf4概、D????eCheck1e?k欖澤_9hncN)Rユl杣スeニ~R,{51agёト凹[_D蔓RョD????eCheck2e?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_D蔓RヤD???? ムS㌃蘰_t^e?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_蘰g_t^Cursor invalidYearヨD???? ムS㌃蘰_ge?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_蘰g_gCursor invalidMonthメD???? ムS㌃蘰_蘰e?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_蘰g_蘰Cursor invalidDayタD????d仙wfN T e?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_仙wfN戎CursorシD????@ムS㌃戎e?k欖澤_9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN_ムS㌃戎Cursorウ$$If夜?!vh5ヨ?%#v?%:V 剖4斐ヨ0??????,ヨ5ヨ?%/ヨ ?/ヨ ?4ヨ4ヨ Uf4概イ$$If夜?!vh5ヨ?%#v?%:V 剖4??ヨ0??????,ヨ5ヨ?%/ヨ ?4ヨ4ヨ Uf4pヨ ??概$$If夜?!vh5ヨレ5ヨ 5ヨ 5ヨ& #vレ#v #v #v& :V 剖4??ヨ0??????,ヨ ???? !"#$3????',ノ*+-0./192:45678????;<j=>?ヌABCDEFGHIJ????LMNOPQRSTUVWXYZ[\]^_`abcdefghi????フ????mnopqrstuvwxyz{|}~?Root Entry???????? タF@臭ユヒチマ)タ{Data ????????????WordDocument????????68ObjectPool????????PcEユヒチマ@臭ユヒチマ_1447169075 ????メ毅? ェ`PcEユヒチマPcEユヒチマPRINT????????????TCompObj????sObjInfo???????????? ???????????????? !"#$%&'()*+????-./????1????????????5678????:;<=>?????ABCDEFG????IJKLMNOPQRSTUVWXYZ[\]^_`????bcdefghijklmnopqrstu????wxyz{|}~? &    タタタ. 2 ?@"コレフフuロ p@エナ*リ畔u?フuケ(f5- ?????@MS UI Gothicエナ*リ畔u?フuケ(f5--------------------------------------------------------------------------------------------------------'???? ????メ毅? ェ`Microsoft Forms 2.0 ホトラヨソEmbedded ObjectForms.TextBox.1?イqtxtXml`@H?タタタ???8???syspara=<?xml version="1.0" encoding="UTF-OCXNAME ????contents????????????|_1447169074???????? メ毅? ェ`PcEユヒチマPcEユヒチマPRINT????????????,ワ8"?> <e?kfN> <N)R3u> <3u/> <ムSfR T/> <3uコNbN)RCgコNモY Tb T/> </N)R3u> <e?k欖澤> <9hncN)Rユl杣スeニ~R,{51agёト凹[> <D蔓R/> </9hncN)Rユl杣スeニ~R,{51agёト凹[> <9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN> <D蔓R/> <蘰g> <t^/> <g/> <蘰/> </蘰g> <仙wfN戎/> <ムS㌃戎/> </9hncN)Rユl杣スeニ~R,{44agёト凹[?仙wfN> </e?k欖澤> <e?k?ケ[> <e?ky z?^="1"> <㌃ T/> <㌃-NёMOn/> <e?kMR/> <e?kT/> </e?ky? </e?k?ケ[> <D柳NnUS> <R{|D柳N z?^="1"> <D柳N T/> <^\'`/> </R{|D柳N> </D柳NnUS> <N)R絲t:g?~{炳> <~{炳/> <~{炳蘰g> <t^/> <g/> <蘰/> </~{炳蘰g> </N)R絲t:g?~{炳> <N)R@\Ytaチ? <aチ怨Qケ[/> <ミcⅧ蘰g> <t^/> <g/> <蘰/> </ミcⅧ蘰g> </N)R@\Ytaチ? </e?kfN> 5エ?ム朶O j    タタタ. 2 ?@"コレフフuロ pリhリ*リ畔u?フuホfN- ???'??CompObj ????0sObjInfo????????????2OCXNAME ????3contents????????????4 ?? ????メ毅? ェ`Microsoft Forms 2.0 ホトラヨソEmbedded ObjectForms.TextBox.1?イqtxtCheck@H?,タタタ???レ???mustfld=3u,ムSf T,3uコNbN)RCgコNモY Tb T,N)R絲t:g?~{炳_~{炳;mustiffld=ムS㌃蘰_t^$ムS㌃蘰_g,ムS㌃蘰_蘰#~{炳蘰g_t^$~{炳蘰g_g,~{炳蘰g_蘰;forbidenfld=aチ怨Qケ[;5エ?ム朶O??煥漑hォ+'ウル0??エタフリ  0 < H T`hpxィ 0ウフミcxfbzs.dotuser2Microsoft Office Word@@(ラ・ツFネ@PLネヒチマ@PLネヒチマkh5ヨレ5ヨ 5ヨ 5ヨ& /ヨ ?/ヨ  ?/ヨ ????????4ヨ4ヨ Uf4pヨ ??概$$If夜?!vh5ヨレ5ヨ 5ヨ 5ヨ& #vレ#v #v #v& :V 剖4飯ヨ0??????,ヨ5ヨレ5ヨ 5ヨ 5ヨ& /ヨ ?/ヨ  ?/ヨ ????????4ヨ4ヨ Uf4pヨ ??概ョD????YHhチf㌃ TD柳NnUS_YHhチf㌃_YHhチf㌃ TCursorョD????YHhチf㌃D柳NnUS_YHhチf㌃_YHhチf㌃Cursor$$If夜?!vh5ヨ?%#v?%:V 剖4肇 ヨ0??????5ヨ?%/ヨ ?4ヨ4ヨ Uf4概「D???? N)R絲t:g?~{炳_~{炳 N)R絲t:g?~{炳_~{炳CursorD????naチ怨Qケ[ N)R@\Ytaチ雲aチ怨Qケ[Cursor$$If夜?!vh5ヨ5ヨ#v#v:V 剖4煩 ヨ0??????5ヨ5ヨ/ヨ ?/ヨ ???/ヨ ?/ヨ  ?/ヨ ?/ヨ ???4ヨ4ヨ Uf4pヨ????????????概カD???? ~{炳蘰g_t^N)R絲t:g?~{炳_~{炳蘰g_t^Cursor invalidYearクD???? ~{炳蘰g_gN)R絲t:g?~{炳_~{炳蘰g_gCursor invalidMonthエD???? ~{炳蘰g_蘰N)R絲t:g?~{炳_~{炳蘰g_蘰Cursor invalidDayエD???? ミcⅧ蘰g_t^N)R@\Ytaチ雲ミcⅧ蘰g_t^Cursor invalidYearカD???? ミcⅧ蘰g_gN)R@\Ytaチ雲ミcⅧ蘰g_gCursor invalidMonthイD???? ミcⅧ蘰g_蘰N)R@\Ytaチ雲ミcⅧ蘰g_蘰Cursor invalidDay$$If夜?!vh5ヨ5ヨ#v#v:V 剖4乃ヨ0??????5ヨ5ヨ/ヨ ???/ヨ ?/ヨ ?/ヨ ???/ヨ ?/ヨ ?4ヨ4ヨ Uf4pヨ????????????概1TableS????チZSummaryInformation(????9ーDocumentSummaryInformation8????????????@ミMacros????????1PcEユヒチマPヤGユヒチマ??ユヘユ?痘+,Dユヘユ?痘+,ー X`px? ?ィィsipoメ ワ8チ XMLLoadedDocGuidEdition IsTemplateィ 1.0.207/2013-11-13 14:53gwssiTemplateVBA????????PヤGユヒチマPヤGユヒチマdir????????????HfrmSup????@amodDya????????????K? カ?0* pHdィProjectQ(@=ュ l ?・T J< rstdole>stdoleP h%^*\G{00020ー430-C 0046}#2.0#0#C:\Windows\SysWOW64\e2.tlb#OLE Aut?omation`ウNormalウN?CrmaQ?F ? ?* \C 3T?Offic?Of?icH、?嘯!G{2DF8D04C-5BFA-101@B-BDE5?gAjA?e4?2??コgram Files (x86)\@Common \Microsoft Shared\OFFICE14\MSO.DL L#ケ 11.0 Ob∵ Li`brary'?zMSF@Cs>?MSFDHs3@FD452EE1-E?8F?A-8-02608C4 D0BB4册FMl20L'B @rフ&/;"1タトモ}? テ?0}#0ツヮ#タ ??0ァ? 佳A6EDA51A6-AD03-4DA9-A0@B2-EB5?11FFAF弑sers\Johnny\AppData\Local\Temp\Wor0d8.0?c8.e(hp? ????"x? ?????? ????"?? ????? ー? Xリ? ????? ????ミ????8]@ !Tキャ'd??Pャ'k??@ ??!?!d A@?? ??A@r%o??X ??A@rxo??p@ノマア?ェ0」ャマツア?ェ1??w]8]P]h]? コ!タ!Nカキ「テ﨤ニ $%シ!タ!N コ!タ!カキ「テ﨤ニ $%シ!タ! キ 「(、タカノォ 、'ィ'?? コ!タ.?? コ!タ!N'ク ?!N ィ 'ミトソヌー 、 コ(dカマヨミA@コ ヲャ8y strTag = thisdocument.Range(thisdocument.FormFields("キ「テ﨤ニ").Range.Start + 13, Selection.Range.Start).Text% strTag = strTag + ""イM. strTag = strTag + Me.TextBox1.Text????& strTag = strTag + ""y strTag = strTag + thisdocument.Range(Selection.Range.End, thisdocument.FormFields("キ「テ﨤ニ").Range.End).Textキ ク ミ $%タ!シ(タ゚Td??y strTag = thisdocument.Range(thisdocument.FormFields("キ「テ﨤ニ").Range.Start + 13, Selection.Range.Start).Text% strTag = strTag + "". strTag = strTag + Me.TextBox1.Text& strTag = strTag + ""y strTag = strTag + thisdocument.Range(Selection.Range.End, thisdocument.FormFields("キ「テ﨤ニ").Range.End).Text thisdocument.FormFields("キ「テ﨤ニ").HelpText = PutFlagValue(thisdocument.FormFields("キ「テ﨤ニ").HelpText, "Tag=", strTag)キ ク ミ $%タ!シ(セk??@, thisdocument.FormFields ("キ「テ﨤ニ")A@ツキ 「(、 「B@ャd??リカエヒケヲトワトソヌース゙モレフ隯エキ「テ﨤ニ」。 ョ 8 カイルラ睫セA@6k??i??o??xリ] ゙ ??!$h'ワ スォエーソレノ靜ェラワヤレラ鏞ーo??QSetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE????ネ????リエAttribute VB_Name = "frm@Sup" 錚ast0{178A2559-EE24-4B4A-AE373A12336710}{DF4B7B9B-FF48-4F6B-8620-88A6061@C742B} ネG lobal?pacoFalse 海reatablPredec$laIdムTru BExpose0Templa?teDerivCustomizチ汽 P Sub cmdAdd_Clic@k() Dim suFlag As Integer If opt?ソ.Valu}/ ThenG= 0 Eq 1nd IfEJscript Me.T?extBox1,% CUnloトad? Eタa8QuitK8 ub?A Function I#(stPrTxtDS・n?g, ModeH) 'ノマア?タェ0」ャマツ8痰StrLe@郡?RngStarong6D5タ`?ヒ?テf?C ?fSele?.Rang$e.テ>=タgisDocument.FormFields("キ「テ?﨤ニ") 猤チR ?<ゥ ?AppXaW.ScreenUpdy?ng?チDコ?CL= ??トS!Set tmpツ` "s?= ?*= 、'+ タ-`' gチS??xt。Kck?G?3ツE= 1}?'チe! :?h亙sd5「(tI7 + 13,ウ2)禀 s+ タ"?滌モ t vbCr@itical?イ?ルラ睫セ0Guqユx}}UseセrムP?/??」`; ヲInalizeゥ四ngDesk?TopHand` w゙= FindW0ow(vbNullS‘.Cap疥 テ' スォエーソレノ靜ェラワヤレラ鏞ーplPos ュ, HWND_TOPMOST, 0(SWP_NOMOVE Orツ モSIZEsU Dヤー????L.-Sl??カ????????????????????????x??ME??????????゚????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????(`??????????? zィ????????????????????????????`В??????????bソノ`???????????タ ?0????????????????????????????`В??????????`??????????? :`???????????????+????????????????????p??????iユ???????????????フ僴???????????b adィ????8????????????ィp0????(ィ????8????????????ィp0????ィ????????????????????0???????????????????????????????????????????????????????????????? リ・T゚?ハ? " ? ?(?0?8?@?HP6` &ク.0PXx?? ????0ィリ2? ????(0H x6ミ0 0@p0タ0? ????   0 @Pp?? ? ? "ク? $? ? ((? $P? x? (? (タ? (? ? (? H? &`? V? "? :? H? 4`? T? :? 0? 4@? x? F? リ? ?  ? ? H@ ?  ? H? ?  ? B ? *H ? <x ? hク ? 0 ? 6P ? 8 ? .タ ? F ? 88 ? *p ? ? ? (タ ? B ? 0 ? HH ?  ? ィ ? タ ? 4ミ ? ? ? ????" 0?@?H?P?X`hp? ィクミ"リ (? ????? 48?zp? 6? D( p0*タ4 ( 8? ???? X0x&ィ0ミ   @ HX p ??ィー? &ク    (0P? ????? $X"????? ?????タネ $8"@hp "?(ネ  0 H Xx? ?? ????タ? ????? ネ"??? ????  @PXh ? ー(タ & &0 X? ????hp?ィ? ????? ー"タ?ネ?ミ?リ? ????0@H Xhp? x? R,? ????  @P p? ???????ク? ????? タB ? @X????h フ晴モイケユ?トレネン8]タ]]] ]@]Xキ $!「(、カ mark_BuZhen $%P!タ!シ!ワャャ 'メカmarks03_イケユ?トレネン_イケユ?マ'Bカカ狢クア荳?閒晴モア?ゥ $%PB@Hカ mark_BuZhen $%P!タ!シ!ワャ?? Fムフャムワ コB@D???? ホムフャムワ コB@H????d??ィ Fムフャムワ コB@D?ャ コB@J?? PムN コB@L /k??Xヲ コ!タムタ ツムl コ!シ%セ.: B メ :(????カイケユ?トレネン_イケユ?マ メカ _ホトシ?テ﨤ニ :(ト0 Fムフャムワ コB@Rヲ コ!タムタ ツムl コ!シ%セ.<カlocationInFile メ <(カイケユ?トレネン_イケユ?マ メカ _ホトシ?ヨミオトホサヨテ <(トOM Fムフャムワ コB@Rカヒウヲ コ!タムタ ツムl コ!シ%セ.>カ beforeChange メ >(カイケユ?トレネン_イケユ?マ メカ_イケユ?ヌー >(ト Fムフャムワ コB@Rbソノヲ コ!タムタ ツムl コ!シ%セ.@カ afterChange メ @(ネ。カイケユ?トレネン_イケユ?マ メカ_イケユ?コ @(ト  :(X 4 <(X???? 6 >(XH 8 @(X???? Fムフャムワ コB@Rキ $!「(、??o??xフ晴モクスシ?''''Sub addFujian()%'''' Dim fld As FormField??'''' Dim MarkName As String??'''' Dim i As Integer??!'''' Dim oriFileName As String'''' Dim FileName As String'''' On Error GoTo L!'''' oriFileName = OpenFile(0)!'''' If oriFileName <> "" Then"'''' FileName = oriFileName '''' Else'''' Exit Sub'''' End Ifp'''' 'イ簗ヤハアモテ」ャフ眇サハアメェラ「ハヘ??P''''' strPath = "D:\workspace\Gwssi\0シッウノタ?゚ソヘサァカヒ\cpees-dtd\schemaExample\"??'''' If strPath = "" Then????4'''' MsgBox "ホトシ?ツキセカホェソユ", vbInformation, ""'''' End If.'''' FileName = getNoPathFileName(FileName)????N'''' If Dir(strPath & FileName, vbNormal + vbReadOnly + vbHidden) = "" Then4'''' FileCopy oriFileName, strPath & FileName8''''????.'''' MarkName = "marks04_クスシ?ヌ蠏・_クスシ?"'''' i = 1@'''' Do While thisdocument.Bookmarks.Exists(MarkName & i)??'''' i = i + 1'''' Loop''''?? ??'''' If i = 1 ThenA'''' thisdocument.Bookmarks("クスシ?ヌ蠏・フ晴モア?ゥ").Select'''' ElseA'''' thisdocument.Bookmarks(MarkName & (i - 1)).Select'''' End If;'''' Selection.MoveRight Unit:=wdCharacter, Count:=1@ #'''' Selection.TypeParagraph?? 6'''' Selection.TypeText Text:=" 。セクスシ?テ﨤ニ。ソ "タ b'''' Set fld = Selection.FormFields.Add(Range:=Selection.Range, Type:=wdFieldFormTextInput)*'''' fld.name = "クスシ?ヌ蠏・_クスシ?" & i0'''' fld.StatusText = "クスシ?ヌ蠏・_クスシ?" & i??2'''' Selection.Start = Selection.Start - 28''''' With thisdocument.Bookmarks?'''' .Add Range:=Selection.Range, name:=MarkName & i??2'''' .DefaultSorting = wdSortByLocation#'''' .ShowHidden = False????'''' End With????!'''' fld.Result = FileName;'''' Selection.MoveRight Unit:=wdCharacter, Count:=1?????? '''' Else????B'''' MsgBox "ヘャテ鉸トシ?メムエ贇レ」ャヌ?リミツム。ヤ?, vbInformation, ""'''' End If'''' Exit Sub''''L: .'''' MsgBox Err.Description, vbCritical, ""????'''' ''''End Subカp????]8]X]x] b'`ャ'メ ` メ $!P%db?????? メャ 'メケ??X メャ f $%PB@H????d??( ` メャ  $%PB@H^????k?? Fムフャムワ コB@R コB@hp????- Selection.TypeText Text:=" 。セクスシ?タ獎ヘ。ソ "%ヲキ?k Set fldType = Selection.FormFields.Add(Range:=Selection.Range, Type:=' wdFieldFormTextInput)????/ fldType.name = "キヨタ犧スシ?" & i & "_クスシ?タ獎ヘ"> fldType.StatusText = "クスシ?ヌ蠏・_キヨタ犧スシ?" & i & "_クスシ?タ獎ヘ"﨤ニ」カ 。セクスシ?テ﨤ニ。ソ ムd コB@jヲ コ!タムタ ツムl コ!シ%セ.エカキヨタ犧スシ? メカ _クスシ?テ﨤ニ エ(P!ワカクスシ?ヌ蠏・_キヨタ犧スシ? メカ _クスシ?テ﨤ニ エ(ド キ エ(lL $カcode= Vカ; エ(カ 。セクスシ?ハヤ。ソ ムd コB@jヲ コ!タムタ ツムl コ!シ%セ.nカキヨタ犧スシ? メカ_ハヤ n(カクスシ?ヌ蠏・_キヨタ犧スシ? メカ_ハヤ n(ト \カ キ n(l.hカfile= \カ; n(k??ク キ n(p??ィ コ!Nャ6 コ(Nd $!P? コ!タムタ ` メムC@セ t9rキ9vq??H  fldType.Result = fujianTypeメ Xカ X エ(Xメ?k?? Zカ $ Z n(X^==k??ミ Fムフャムワ コB@R o??ィ カッフャシモヤリクスシ?」ャヤレシモヤリxmlハアオテ//キ「ィ]]] カmarks04_クスシ?ヌ蠏・_クスシ?'Bャ'メ B メ $!P%dbア莊ススレ メャ 'メニイケ?? メャx2Naカクスシ?ヌ蠏・フ晴モア?ゥ $%PB@Hd??タ B メャ  $%PB@H^ャk?? Fムフャムワ コB@Rn= G コB@hカ カ 。セクスシ?テ﨤ニ。ソ ムd コB@j wi? コ!タムタ ツムl コ!シ%セ.カカ クスシ?ヌ蠏・_クスシ? メ カ(カ クスシ?ヌ蠏・_クスシ? メ カ(ト コ!Nャ コ(Ngh $!P!? コ!タムタ B メムC@セ t9rキ9vq??p カ カ(X` Fムフャムワ コB@Rヒウミナo??8 ノセウ?イケユ?トレネンodeInd8]x]カmarks03_イケユ?トレネン_イケユ?マ'Bャ'メ B メ $!P%db}"-1 メャ 'メ ケ??ィ メャ 'メ/_ メャG|jn ? メャ? B メ $%PB@H??P コB@|a??VカlocationInFile メ $%PB@H コB@|?? カ beforeChange メ $%PB@H6 コB@|? カ afterChange メ $%PB@H コB@|t%d?? B メ $%PB@HbB@d コ!~B@|k??Xo??Pノセウ?クスシ?ウニィ]]]ノカmarks04_クスシ?ヌ蠏・_クスシ?'B$ャ'メ B メ $!P%dbA@ メャ 'メ ケ??ク メャ 'メ v メャ, "イ|??k??イ簗ヤハアモテ」ャフ眇サハアメェラ「ハヘ!K strPath = "D:\workspace\Gwssi\0シッウノタ?゚ソヘサァカヒ\cpees-dtd\schemaExample\"カ クスシ?ヌ蠏・_クスシ? メ $%シ$'ne B メ $%PB@H_B_va コB@|ne Fムフャムワ コB@D ィ$ コB@| ( : A@|??h」゙` b! 8 A@6==o??@ネ。イサエキセカオトホトシ?テ﨤ニソユハアXM0] カGzjuZhen カ\$ 'メワャ メャG 'Fzj  メャ $'i????????????オAttribute VB_Name = "modDya" 'フ晴モイケユ?トレネン Sub addBuzhengNR(fi?ehAs Sng, loca?tionInF: 2before@Change .after )  Dim fldfn0Form Field lo)bcaMa,rk桔?i?In teger ThisDocument.Appli.ScreenHUpd㌻g?ォFミalsei  Bookm?;s(B"_BuZ?ア"().R*.?s.Count / ? + 1?X∂1"03_?マァ?カ狢クア 荳?猤|アヌゥ?Selec"tIf ?= ?enC?C.MoveLeft unit:=DwdタSac?2 B;:=:マ Up。F Line EF\ョ2?Inser`tRowsナ^ヒCollapse xDirタN@7ツ3DStarトSEnd 栗fCSetDコ = ヌF~Add(B?=ヌ, T?ype:= _3チ$チwdBヒチTe?xtInputトユツヤ.n?G& iヌ#テtusAタU"-J ?`"_ホ?トシ?テ﨤ニdL?Gチ;Righ?;b z  ツ { l麸e "?"。f!タ!f!ヨミオトホサ?テ??!0]、A燉?!?!?!dbc&!魘 マ?? ・ヌー? w}? ?エ? ? ? da' ?メ `  コ Ifn.Resu?tj?ゥLォQF?0Fノ4ィ?ヌ$r6Wj_?mTru瀘閃?て?スシ:??'@ムェu`jian(pHA'?D~ャz&JT繼yコori。?}:On Error GoTo Lゥ= Ope9B?0ル ?si<>x ""エp&Q &= ネテl:Exi|t モqa鋲v'イ簗ヤハアモテ」ャフ眇サハアタメェラ「ハヘ?strPathQ^D:\workspace\Gwssi\0シッウノタ?゚ソヘサァカヒ\cpees-dtd\schemaExampe\タ.F@H? MsgBox "當ツキセカホェソユ", vbI麩p「mB、,ーTsデ8getNoQ ]5(フ?y(オ & ENalpvbReadOnlyツHidde ""l請@,c ???f`、?E (0・ロEna臣led?;Faニ??rt?-- ?4#:With@oアイチ 。 オア|: =陲iDefa?ultSort@ wdaByLocBShowH瀛ddenネa 腮>.Res??モt1テvマ? アPツ8,1#ケ?y?ウ ラaapat?カッ@フャシモヤリ漸」ャヤレアxmlハ`アオテ衛?炸XML(u掃?訐# aac狭渝ウ6p^窩04メ]?r[a ?「z????ソメ?????*??? ?R ("ア A フ晴タモア?ゥ"?? ?10O??? ??p??????晦.??チ「\A〝a操A ?eRo@3V O?ア?.J?ソW2アp9fW?r 21マV?ム%? ?L- 28ウ??L箕 ?L1ト 7Lソ??L?L0.?L?a 3LaヲB!フAO_A_Aヤ「 S!ホ濂ノセウ?イケユ?トレネン P delBuzタhengNR@>殱 1@>ウ>3_ユマ釗>涸涸帆・?Й1ムミcミトd゚1OAWP゚<ン`ь??????????+8`???????????? ????????E `????????????x??????JJIi????????????????`????????? ?? ?????????ネ%`???????? ??`┯???????? ??`??????????`??????????`??????????? ????????`% ?????????? %`???????????`???????????`│??????????`в?????????? ャ`???????????? (?????? )????????H????% ?????????h%`┛??????????+ーP`???????????? ネ????iΧ??????????????? ┯????????$%`┷??????????`???????????`┛?????????? ト`???????????? ??????????サ ニー`???????????? ミ??????テiκ???????????iμ???????????)Δ????????0?????a%`???????????`???????????`???????????`┷??????????`??????????? メ@`???????????? ?????? ゙)χ?????????$%)ω????????8?????a% リー`???????????????????VViヮ??????????????? ?????????ク(% ?????????リ%`??????????`в?????????? ┯????????(% 、????????H%`???????????`???????????`????????? ??`??????????? H`???????????? ???????i????????????i????????? ???????`????????? ??+ィ`????????????  ????Mi???????????????? `???????????? ?????? Q)??????????$%i??????????0?i??????????????? ┯????????h%`?????????? `????????????ネ??????\i???????? ??????? (`???????????? ??????????l h`?????????????????????? p ネ`???????????? ィ??????!vi???????? ???????  0 `??????????????????"zi???????????????? \????!`????????` ?k??????????#`?????x?????`?????t?????`?????p?????ハ?????B??????????????ハ??B??????????????黴ネ?? ??@????????j圓XC????????????????j圖????C????????????????ェ?ヲィ??P@????????ハ勢ミミH??????????????ハ征X(H??????????????黴:?,???? @????????????ネ x????8@?0X?????????ミ????????????ネ???????? p????0hP ィ?@ リ? ィ????ネ????(Pク ク ??????0????????????????H????X????ク????ィ????ー???????????? ー????????????デ????????????????????,%j圓クC????????????????j圖????C???????????????? XMLLoaded? ??????$イ゙ャ?????ネ x????8@?0ク?????????ミ????????????ネ???????? p????0hP ィ?@ リ? ィ????ネ????(Pク ク ??????????????????????H????X????ク????ィ????ー???????????? ー????????????????p??????????????????????????????????????????????????????0!タ!????H!????????????????????????!???????????????????????????????????? !??????l???!`H%????!??@??`!h??? ?? @???X??? ?? @??x!T??? ?? @@?? "P??? ?? @??ィ!L????? @???"H????? @??リ!8??? ?? @??"(??? ?? @??8"??? ?? (@??ネ"??? ?? @??P"??? ?? @?????? ?? @??h"??? ?? @??@#??? ?? (@??ー"????? ???? ????P@???#????? @???ヤ??? ?? @??#ト??? ?? @??X#エ??? ?? @??(#、??? ?? @??ミ#??? ?? @??p#??? ?? @??$???? ?? @???|??? ?? @??????x??? ?? @??ク#t????? @??????p????? @???`??? ?? @??$P??? ?? @??????@??? ?? @??0$0??? ?? @?????? ??? ?? ????!$$ 0ク????????????0 ィ????????????????????`8????????????????????????????P ・T*\R1*#10b*\R6*#1*\R6*#1*\R6*#6a*\R1*#d4$*\Rffff*B]5447f6a5(*\Rffff*B]5447f6a5\0(*\Rffff*B]5447f6a5\1$*\Rffff*B_5447f6a5*\R0*#13*\R0*#f$*\Rffff*B^5447f6a5*\R1*#10a*\R1*#c6$*\Rffff*BI5447f6a5゚?ハ? l? p? *? ク? lミH? @H? H? 6P?  ー? タ リ? ?????? ?(?0?8?@?H?P?X?`?h?p?x?????? ?"タ??? ? ????? (? B@? h"  ?0 8 HX `p x?クミ? ????? ????? ? B? hP" ク?ネ?ミ?リ0  8Ph2? リ? 6B  @H?PXpx?? ?? ????? @ィ"      (? .8:hィ? 6タ? <? :8 x ? ? ????? ????? < "  ネ ?ミ ?リ ? ? ? ? ? ?    ( $8 ` ?  ィ ク タ  f ` x  ー ク リ   ?    < ? ????B , ` ? ? ?? ?ィ ?ー ?ク ?タ ?ネ ?ミ ?リ ? ?  ? ????? ????  (  @  P  ` h p  x ?  ?  ィ .ク  ($(P hィタ? ????ミリ8? ????P?X `pB  xーB  ク?ミ?リ   ? ???? ? ????? ????? (? DH? ????B  ????ィ ー? タリ4 0 H&X?  ? ィタネ? *ミ"     (? ???? 8 @PX?` hx? ?B  ???ィ ータリ (? ????@" H?P?X`$x?ク" ^ タ? ?(?0?8?@H `pーネ? $0H P` x" N ?????? 0&@hxィ ータ リ? ????B  ?(8@? ????B  HPXx?? ?? ????? ????? <ィ" ?0 (? 88p? ????B xー? ????"  ク?タ?ネ?ミ?リ????????(?@Xh x ? Nィ.&(Ph? Npタリ .8P @h ィ ネ   ?  0@X x*ィリ2 @*`ークミ  ( 0? 8X` ??ー?ク タミ<リ? :"  X?`?hp"x? クネ? ????B  ?? ? ?   ( 0  @  X (x ? &ー リ & !!(!0! 8!H!"P!"x!?!ィ!ー!ク!? ????" タ! ネ!リ!?" "0"8""  @"?H"?P"?X"?`"?h"p"x"?"??"ク" ミ"?? #4 #2X#2?ネ#ミ#リ#?$$$? ????"  $ $($ 0$8$ H$P$`$h$p$? ,x$" H ィ$?????%?%?%?(%?0%?8%?@%H%`%x%?%??%ィ%ー%タ%? ???? ミ% ?? ?????? ????? && 8& H&X&p& ??? ????? ?&?ク&タ& ? ?' "'@' X'h'p' x' "?'ィ' タ'ミ'リ' ? ?( ( (( 0(@(? ????H(`( x( ? .? ネ(??) )8) @)H)P)X) `) p)?)??)ー)ク)?タ) ネ)リ)?? ????"  ???? * * * *(* @* P*X*`*h*? ????B  p*x*?? ????"  ???*?ィ*ー*ネ* ミ* リ*??+? ????"  +++(+ 0+ @+H+ P+X+`+h+ ゙p+P,X,`,? ????" h, p,?,? ????" ?? ? ィ,ク,? ????"  タ, ネ,リ,? ????" ???--  -(- 0- @-H- P-`-h- p-?-? ????"???????-ィ-タ-リ- ?~D?"qx. q?. qタ.???????/f======================================================================================================----ク」ー貉ォモテコッハ?$created by wangchaoyuan@gwssi.com.cn????date 2008-06-26f======================================================================================================カ?/ スォエーソレヨテモレチミア昮・イソ」ャイ「ホサモレネホコホラ鋐・イソエーソレオトヌーテミ鐓$ャク?? ア」ウヨエーソレエ。オトイル]$ョア狆ュ ア」ウヨエーソレホサヨテマツスヌ]$ョ?] ]$カイルラ睫セネ]$カエ﨔睫セ@0^H^`^x^^ィ^タ^リ^^p?? ャ'「ャ'、??h] ?メヤマツイソキヨホェク」ー賚ィモテコッハ?]$カMSXML2.DOMDocument.4.0ィ]$カヒウミミ] X] ]$カ XMLLoaded???] ィフ晴モマツタュハ菠? ;ヤレオアヌーホサヨテフ晴モハ菠?ャイホハ?strNameハヌヨクカィフ晴モオトハ菠?トテ﨤ニ」サ??!bソノム。イホハ?oriFldNameハヌイホソシモテオトハ菠?リシ?オトテ錥ヨ」ャフ晴モオトハ菠?トム鰒、コッハ?。「クスハヤオネネ。ヨオモ?ホソシソリシ?マ猩ャカカ]ヲ コ!タムタ ツムl コ!シ%セ.カ エカ エ カ(d???  カ(k??  カ(ト イカG|j イ$ニG|j カ イ $%シA@ネ ホムフ コB@ハo??フ晴モホトアセハ菠?;ヤレオアヌーホサヨテフ晴モハ菠?ャイホハ?strNameハヌヨクカィフ晴モオトハ菠?トテ﨤ニ」サbソノム。イホハ?oriFldNameハヌイホソシモテオトハ菠?リシ?オトテ錥ヨ」ャフ晴モオトハ菠?トム鰒、コッハ?。「クスハヤオネネ。ヨオモ?ホソシソリシ?マ猩ャカク]@]`]xヲ コ!タムタ ヨムl コ!シ%セ.カ  カ( イカG|j イ$ニG|j カ イ $%シA@ネ イ $%シ!リ!レ!ワ'ヤ? メ?ャ ヤ メ イ $%シ!リ%レ! カ!リ!レB@セ? メ?ネ ホムフ コB@ハo??/ナミカマソリシ?ハヌキ贇レ」ャエ贇レキオサリヨオホェtrue」ャキェfalseノ゙ー]  $%シ$'キ'ニz???」゙x bB@dキ'ニi??X:スォソリシ?」ィホトアセソゥoriFldオトム鰒、ケ贇ネハヤクエヨニオストソア?リシ?desFld  !9 !9 !9 !9' .StatusText = oriFld.StatusText !!lムl !!ム !!ャムャ5B@ !!?5(?/ .TextInput.Type = oriFld.TextInput.Type5 .TextInput.Default = oriFld.TextInput.Default3 .TextInput.Format = oriFld.TextInput.Formatq???o??x5クンformカヤマトテ﨤ニコヘトレネンノ嵭ノxmlホトシ?」ャエヒコッハ?ホェヘィモテコッハ?]]0]H]`]x]]ィ]タノ゙[ル ヨ ィ$ .  カ\$ ャ $' ャ ャ $'ャ'メ  メャ$$b メャ 'メケ??@ ャ メャ $'  メ$'カ'< カ id=' カ'> B@  %.?? カ? $!シ  カ!ト カ$A@?ヌHカ//  %A@  B@[ル ヨ|??」゙ bB@do3createFormXML "c:\a.xml","110101キ「ティタ鉎??doc"リX As MSXML2.IXMLDOMNode ' Object]x]]ー]ミ]] ]( ]@ ]X ]p ] ]? ノ゙ャ カ_'*ャ カ_ 4'メ? ? !6 !8 : !<'k???ヌ メャKT   $@ B@>S??X メャb ャ メャ $カ_カ/$B'. カ/ .', ,ャ ,カ/$ ャ $'2 , ,カ/$ ャ $'0 , %." "$F$DカNOTHINGャ 0カ %@.( 2 %. ( B@>k??( メャ カ_ 4'メケ?? , %.   カ_$ ャ $ $@ B@>n??ィ」゙? bB@di??ク \ Objectャ カ %@.Hi??H@ j Object] ] ャ カ %@.  (d .@ di??リサ。オアヌーソリシ?オトトレネンシーテ﨤ニ=イホハ?fldNameキオサリヨオハヌオアヌーソリシ?オトテ﨤ニ」ャコッハ?キオサリヨオハヌオアヌーソリシ?オトトレネン'ク ]? ] ]ー コ!N'゙キ' Debug.Print Now? L?ャ $!P!ワ\' L $%P!N ゙ L $%P! ゙ h L $%P!'エ エ$ニ(t L $%P! $%シ$'J?z??xk??pk??h? L?ネシ Debug.Print Nowカ'エi??0#ククカィオトテ﨤ニ」ィname」ゥオトformfieldクウヨオ dネ ノ゙ カ!l.hャGKT T カ!V(TS??タ T カ(Xコ?n??ィ |??? 」゙ bB@do??? イヨスレオ翕﨤ニヨミhP ]ミ ] \'`? メ? `ャャ \ メ$$Gyj? メ?ネd \ メャ $$b'^== \ャ メ$'Zキチi??ク  ]@ ]` カc:\a.xml B@ホカ//キ「ティタ鉎? %A@larkトカc:\b.xml B@o??@ ? /Rスォスレオ翕﨤ニヨミオトヒウミナラェア莊ススレオ飜ヤ,スレオ翕﨤ニイサヤルア」チウミナ,モ?ndex2Nameハヌマ犢エオトケ?ウフhe] ]]]8]X ?!< ^$Z'<m ^ャR= ャ <カ %@.n= Gャ ェカ %@.ptxt ^ p(r% wi? p n!tB@v i0 nd.nodeValue = nod.nodeValue(i n ?A@xP n ? ?!zB@|" ? ?!zB@~. Highk??ー ?!?wdB@H ? n? ?!6遼チH nA@タカノォホェ?ヌp k??h o??` x*Bスォハヤミナマ「ヨミオトヒウミナラェア莊ススレオ翕﨤ニヨミ,モ?ormatNodeIndexハヌマ犢エオトケ?ウフ]]]]0]P ? ェ$$b'^ ^ャ }"-1ャ ?!< ^カ %@.n/_ n ?A@x6 n ? ?!zB@|? ? ?!zB@~ (`k??P ?!?a??V? n? ?!6?9「 nA@lR>e「%?ヌ k?? o?? p]? ?? !6ao ? B@>3?ヌタi??ク ノ゙ィ  ?!t%!r'r5?xz???」゙x bB@dツ * カ'i??X5クンformカヤマトテ﨤ニコヘトレネンノ嵭ノxmlホトシ?」ャエヒコッハ?ホェヘィモテコッハ?サム。ヤ?] $!ャ $!ャ $カxml' A@ケ`?2 MsgBox "ア」エ賚?マ」。", vbInformation, "イルラ睫セ"o??- ム?xmlハ?セン $!!dャ $'ange、殃??H8]]ー]ミ]]]]0]H]h]]?newthis]クnew_B_va]ミnew?キ $!「(、? ィ$ .キ (ヲ??キ (ィnamest  B@G============================ス篝ケユ?マ鍗レネンホェソユハアXMLミ」ム鯰゙キィヘィケ?オトホハフ筍」?カ mark_BuZhen $%P!タ!シ!ワャ`カ//イケユ?トレネン/イケユ?マ %.? ? ?!zB@~ャ`?k??G============================ス篝ケユ?マ鍗レネンホェソユハアXMLミ」ム鯰゙キィヘィケ?オトホハフ筍」or? ?? !6de9z` ?!8 : ?!<'YesNk???ヌャ $%シB@H&スォエヒセ茣蠏スヒミト」ー袒ミ  %A@leレ鸛? カ? $!シeeェミ`カ// カ/ カ!トカ_カ/$B %.? ?$FカNothingDocume  カ!ト カ$A@anged?? カ$ ?(dAddk?? =====================newf カ!カ カ!ャ =` カ!ャ$ワカcodevl カ!ト'?6ウ` ?カ _クスシ?テ﨤ニャ ldノ ?カ _クスシ?テ﨤ニカ _クスシ?タ獎ヘ$B'ii`d??  ?カ _ア荳?鍗ソテ﨤ニカ _ア荳?鍗ソエ惲$B'mandBak?? カ!カcode=$ェ'rvar_ カ!ャ$ワカfileeTy カ!トカ_ハヤカ _ホトシ?テ﨤ニ$B' frm カ!カfile=$ェ'ruFlak??H  %.?ipt@ ?$FカNothing_Click   rA@Mode、vd?? r ?(dtartk??リk??ミk??ネ =====================newpt?ヌ?カ//  %A@  A@ャshFMヤ  B@odキ $!「(、|??H」゙@ bB@dieldNa(o3createFormXML "c:\a.xml","110101キ「ティタ鉎??doc"`ャ4''''''''''''''''''''''''''''''''''''''''''''ノママツスナアstrE]P]pカ'ョカ//キ「テエヤ?﨤ニ %.?ハ` ┯キ「テ﨤ニ$ー'ョ ョカ` ョ$イ ?(dewMacrk??o??]]] ]8A@コカ'ョ $ エ7シl"5タ!Nャ 'ク? メ?ャ5Xャ ャ ク メ ク メ ャ $%タ5シ!セキ ョカ 5d カ 'ョ5シ!タキe ョカ 5d カ 'ョd?? ョ5d 'ョ!k??ミq??ネ? メ?ネィ q??ー ョカ カ$B'ョーソレノ靜 ョカ カ$B'ョ??!ニq??XA@ツ ョ'ーi??@Pキ 「(、??!ニA@コカカ 「A@ニカカ 、A@ニキ 「(、ャA@ツo??タ]8]P]h]?]ャ'フャ'ホ $カキ「テ﨤ニ7シ?? メ?ャ5X5タ!d ネ$ 'フホ フャ ー フ5タ!d ハ'ホ; フャ ホャ 5タ!N'ク ホ クャ フ クャ ホ $%タ 「A@メhapeカ クャ ホ クャ ホ $%タ(d??Hカ クャ フ クャ フ $%タ(d lngDek??0k??( フャ ホャGyjOV?ヌq??q??o??ー ヤ ヨャKTキ ヤ!シ(セャKTキ ヤ!シ(タn??q??o??%'''''''''''''''''''''''''''''''''''''@.;ヘィケ?xmlハ?センホトシ?コヘト」ー賽トシ?サケヤュフ隯エホトシ?,シモヤリxmlハ?センオスエーフ蠢リシ?]?]タ]]] Object]0]P]h]? $゙カG|j $~カ|???k??x ャ$キG|jノ゙XA@コキ $!「(、 ィ$ .キ (ヲキ (ィ  B@イケユ?トレネンオトカッフャシモヤリカ//イケユ?マ %. !'レ レャ ? メ?ャ レカカカカA@? メ?ネk??`クスシ?オトカッフャシモヤリ]カ //キヨタ犧スシ? %. !'レ レャ ? メ?ャ レ? ?? メャ %!6 ?!カホトシ?テ﨤ニ ?!d'y??k???ヌ?? ?? メャ %!6 ?!カクスシ?タ獎ヘ ?.?y??(k?? ?ヌ ?$FカNothing ?!dミミ A@カ'k??ミ? メ?ネk??クャ %6A@l? カ? $!シ カ!ト' カカ// カ_カ/$B %.? ?$FカNothing カ!lャF カ ?!dA@ カ!lャGe ?!d カ!V(Tk??タk??クk??ー?ヌィA@ト ワキ ャキA@k??xャャ $%タB@Hキ $!「(、A@ツ|??@」゙8 bB@d o??ー]0 $5 キ'A@コk??リ  7(T キA@ツk???q??o??H  $%!T'i??hィ]P]p? カ? ?!シ カ5ト'   $B9トq???ヌo??ノ゙ ーG|j 5`キC@ d??ーC@Nk???q??|??」゙ヲ カ-コワアァヌク」ャCtrlFormVisibleケ?ウフヤレヨエミミヨミキ「ノ嶸﨔」 カ エ﨔惲?コ b!カ。」 カ エ﨔靆コ b!カ。」 カハヌキフミエミミコトウフミソ  8 カエ﨔睫セ$6 ィk???o?? ョA@o??x(ノh B@ bB@do??@h .o?? ャネノ $キ9$5「!&!ワャ "ャKT (C@Bn??クd??ー (5「B@*k??q?? bB@do??x0]p]]?カ ヌゥユツネユニレ_ト',カ ヌゥユツネユニレ_ヤツ'.カ ヌゥユツネユニレ_ネユ'0 $ヲ % ,7シ!タ!d$イ$゙カ .7シ!タ!d$イ$゙カ 07シ!タ!d$イ$゙カ ,7シ カyyyy$ャA@ .7シ カmm$ャA@ 07シ カdd$ャA@k??q??o??????????KキAttribute VB_Name = "modPub" '=bhク」ー貉ォモテコッハ?created by wangchaoyuan@gwssi?.com.cn&d$ 2008-?6-26eエ?lic Declare Function FindW?ow Lib "user32" Alias "A" (ByVal lpClassタAs ツSハng, ? ) LongD DSetP os E;hwndEhWndIn÷,tAfterェx y ccホタwFlagsE?' スォエーソレヨテモレチミアカ・イソ」ャイ「ホサモレネホコホ ラ猤Aオトヌーテ?Const HWND_TO PMOST@イ-1A? ア」ウヨA エ。フ SWP_@NOSIZE@ &BH ホサヨテ MDOV 2 ForAppObj#5?ect gl bHint"イ?ルラ睫セ?リ#トn?errエホType ShenQingReタセ str架 Telチ"テ竪A?Countr? Citτ@JtCodeP Address_xProク ?etetE`Ua ニ*Enum FontΕチSupsc ,?Subツ?。{ヲt!ィ)" ?'メヤマツイソキヨdホェ?ヘィ?ェ6XML_OBJ_NDAM瓧"MS 2.DOMDocument.4.0[=SHUNXV。Aーヒウミ:P@?worBs タ=ヲ「?h?mF@k ?Loadedh炒rFrmチeU eフ晴モマツタュ@ハ菠?ヤ獺オアヌーaAテ1?qホハ?チNハヌ蹟クカィオトテオトテ﨤ニ」サA?ソノム。イ`o riFldテイホソシモテソリシB?ラヨ」ャム鰒、眤。「クハスハヤオネタネ。ヨオモ?@マ猩ャ < addTextI`nput( , Opチイ?ャヌ?Z"hf# )紵D8im 烋mFミield# `ュBZ= l?チ.fs.タZ(R?リe:=LSe, チW:? _$ 濆wdB g&DIfチ ? ?<> "" T?V??.nテチclseイT 6 IfウStat?s!``リ0メ Exit @3PNot isゥ`st f!(ァf) lseイ2Sヌチ ー`his5ア=sノS@?Key unit:=烱dLin@繊 ?['a'ホトアセモ+??/「0?/?/?/?/a5?/??/?/8/Dropown/ヤ/リZ_r/o-v」/i?I@ntegerXC渡?0on?0ng?0ル?0 80D ??4.?)・F マ% ??)?)15?)カ?)B^ム?) iC T,Dレ.オ.ListツE0yies.メyウ @ iー1 To?PC CAソー触`9ッ3ldA(iニ)メDSNexー<ウ?6?6ub?ナミカマ!/ハヌキヤレ」ャQキオサリヨオホェtrue」ャキfa2Jfエ^Cトq' S".)。Booleaヤ唇n Er@ror Gol_ウ A,イヲSCs0GetPureRe`sult(゚アJsンe)ヤ'm pTP SC祕 l:dr8r.CP ?/ FOテアIスォチ」Bィ!Jソゥ鉄オトアBケ贇ネアqクエヨニオスト袷ア?desv イqュT(テ?,ホ SJモWiー? P&".a)yMacス=エ8#.}b"hHelpDf.HOwn緝T&? @.?:k7イS.EitAx肺Dア?p゙fap":=?De,タィrmaw?fアaチV ヌW?d0v ァツ ン/.q`?$ キトアカut.Defau@lt ' .?TextInpFormat =? oriFldd fEnd W ith Sub 'クンfじヤマトテ﨤ニコヘトレネンノ嵭ノxmlホトシ?」ャエヒコッハ?ホェヘィモテ P@ublic G @create?ML(fileName As String, wPordF)魯im nodLsU2Objec閾イcNod ?l root Jケ?ID$U i ?Integer 1?bj 唄On Error G oTo lebug.P?t N?w Set ?X= C?$(拈OBJ_NAMEZ= Mid(! Q, In@,Rev"\") + 1E, 1, Len() ィ- 4ト i@?ト0o Whタm IsNumeric(?"i@)ト Alチ?チテLoopCoYC1ヌ? i??iζテM.loadK "<" & ?" id='?%& "?>".就l@ァタDトSelィニS?タケodeヌP ?チ Each △In ThisDDoc?Ont.ノF`ields トホCUYd@エe?.@Statusチ? GetPurehResタ?(@ ?N'??C axatIn(dex$ .ホ"/ニ?Save %x? DExita0 l:テ`.Cea?`?テ '* "c:\a.タ*","110 キ「ティタ鉎??.doc?0f孝uリnct`=?(#3ァr ,nd諮sVal"uネ? 'AMS?I2.I?DOM??ノ{E前?aKa ヌ」"tmp" `「1vnew`レcuVr゚ツer`Ir筬J塲sPath?!ゥ?gコk ?ルaハチォparenセt.ォG=罍B(??$aス, "|_"ト[aa討ヲ, vbBinarComィニyb<{炸ギ.Fv%yA `I f"?。Type⑮ODE_EL EMENTタ‘nヌ∮=」bas鈔W+q4If7ヌ?qノ? C? i2 0; appe|ndメ t5 $5?, ?1Els?a2Dナci <> ゙sナ#= Rタeplacef!゚#Cbメ@/)3?S3,アq^誰$ンS?bv$"??W`bj??y=チf・B=\gラ?UA(ア'())?"NOタTHING"o(ォ?Roゥ`$/モ[?`ソ ヌ? g ッ'? 1.ケ*(絣?e?5=4ユqソB2雇/?D_B ? o~y_~H?c,ツ。3&''qPB。?_ l?n fldN?ame =zn@ jIf isExistFormf?ield(I)dogetCurr2ControlvGetPureResult( ツ(F[s  レ)) O??Nt Fタunctio軽≧ IfNext t '!Debug.Prin`t Now?" 1'クヨクカィオトテウニ」ィL」ゥオトf?クウヨオ Public タSub seq Value■ Ads |, S tDgtOn Error GoTo leSelect Case チタ*.TypeGチE971  Ch?eckBox.=ヒ KEls?Lブ?yANテ*?BkタD l:Drr.Clearズツ'イヨスネレオ紜XヨミSナ` 僮ndex(,noΨSSN, "iNumSInタteger)V`Dim iHL覇ni= @マトgpタ= @h1 Step -??ミNot Is?$eric(MiVdE+)テム ΤoAゝぉiC%ニ3Biフ + 1・b??0j 1チ ` 偀(Ttes炙xml(タA#@objチ New MSXML2.DОM?40 bn熨s Iタ?N塵deL テ.Load "cp:\a. タhB62ツ織CCSingle("//キ「ティタ鉎?ヌ?@a4ve b ?ubm。pata Dツ9g ) 'スォ⑫オトヒウミナラェア莊スハヤ,イサヤルア哀チ,モ?ハヌマ犢エオトーケ?ウフC5a"b@r?BFRgPS@キ@?瓱attr@ ソ$チ? 5瓷=Jg?. D、fタ-ソ乕<> 0舷Set = D3creワat#8?Mァ "チ7 a%12, S?HUNXV, d.?蝠&)' wC臈A nd.A`%i4bu Z.牋!1dIptem 、?`'.タ㌃E `ニ AddAllC0hild?レ?, g チPa矍.InsertBe澑eRemov福b 。ZI、ヨタ0 リHas! sャ!HEachタ In?a.キg ャ1?GモqツXhBキ/L??r5ア3ミナマ「|ヨミ5テ\ 44 ??Aq ア?Тチ??註。D w?dO? ヌeテX W???94/4/4)4Qe4 &?f?ソ)g$ム Qソ)ソ)?ア?ネソ)Pナ!ソ)reソ)r ソ)勢?bs?S0?o)メ?@孥?Gワ:(des03, ori輟唇メ#od? w6??63ソ6?S.a瀾pendツ8g?ム ・?鉱%Obj?,SL`コ1樟?」  =XR?VR?2)ラVsfカO゚娚i承 キクン@カヤマ#エコヘトレネンノ嵭ノ?ホトシ?」ャエヒコッハ?@ホェヘィモテ  ?H S?Xmlile相` ?P?A gS ゥ= Q荘局ulla, Pkム旻ア - 3)}P8"`繋o0!mチ??empla(!」ナ Msg`カ "ア」エ賚?マ」。", vbIn!a!ヒ =イルラ璞フ睫セー??ソtWe"+オ(xA 'ム?ハ?セン」?`゙Htxtミ.T?ミ,| 9?_)&フ?(>fkP?Ls?tテ+c (6t・沼ケc?ュタヒm r椀otラID?SメチW゚ソ ┗OッC%`qinshQInlineShacユラチerr`OmP tmpp e 8'neC醴,0St0atus? Dim NodeValue As String 'new ThisDocument.Application.ScreenUpdb= FalsehSet xmlobj = CreateObject(XML_OBJ_N0AME)X(.valiKeOnPparse8P#resolveEx0ternn$lo?df get6`Templk'=ス篝ケユ?マ鍗レネン@ホェソユハア$ミ」ム鯰゙キィヘィケ?オトホハフ遺。」?If Bookmarks("_BuZhen").Range.FormFields.CPount?^0 e始??從od? QзSel婀?ノlツeヤ("//_ ̄qマ?┘?.麾ユ.RemoveChild  ?End If?CノC8 Eac「hチ Inо.ツ}チ#s*?Nチ*ATypA{NODE_?ELEMENTLE rootNamテA baseG瘟5NextCハg`(1).シ 'スォエヒセ茣蠏スヒミト」ー袒ミInde|x2B苗?ト`F@f_@\@@? b|" & @& "/Reカce(?.StatusTA?=, "_"/l")ネ| チYチ2(タO)@?Noth}K"ー-`{`f7$9, m GetPur?eResult!?iE諱"?!7??;HTeSU謾ナKHelp" <> ?1`Len(チ) > 4"ネ (LefB.e, :4?cゥU tm?pc5@ ?hBタ4Inウ(?クス?シ?テ﨤ニ"A?妤,ツ?チmツY= ?Gs  タ獎ヘ驪 O<-ソ_ア荳:?ョソ「!エ僴ツ?ミDチ#ロ=ツ 潼Flagツ*>{7= AEエ>f鑛leソ>pP/?ハヤ『_ホト??ラBソテキ/?ッIヘhネ?8GGOヲ?H? H,_ヌ?) Qj.?ヤHカob_r9g? ソKa宛K輕メf BtムIアgt浩?/"`ワgRef?hFMtテ ・kav? ア @レiソ攤Tru、戲xit Sub l:SErr.Cle?rア``z3 チタ 'テx。?c:\a.? ","110キ「ティタ鉎??doc" 'ノママツスナア Pr,ivミkQ &(BNyー属MS2?DOM蟄40D,ア?jXIーS」!?TxtS諜{モ=瀏C?ソ?痃エエヤ?]゚qLネInv1("チタ6殪*/DelCr63Qeq ` ,ト ub?ソ` FuncチソYsワtrBュ! w)-?R?ツ`ニアモ PPqBrrLongi〈Intege?$ mUnlock#:Wit^h ~wヘウ 「.珉*?(ル q1F = .セ3 + 1ホ3 iPzo 〝ケ? -シ 1ォ? (?+ i, ル 0?ワ 10! ーロSuperscrip?=o殺rコネ+ ""/"マ 。$t}ub_"@_d7Sb_ ゚ム?ソ`Q5u2/?EuqQ[!Q ~i7_J堝. ??rI均タチGトb>タ0ツ楔 End WithミLockDoc`GetInvName = tmpNod@eTxt フFunction Public Sub UpdateFiel?()窟pp:aX.Scree"nHingVFa?se'Unl }DeepSetFont "",/ Sリupsァ )b) ヌ)概ruД?ヌt?priv?kq7(strBegin As St?i, ? 6CfTypeъDim i Intpegerャ ?カR?ngStartong ? ヌ? I= 1Cチ チ This痼?men??℃チA.Formツ|s("キ「テ葈ウニ"9E @ ?;@ To Len(.Result A寔2= I"nタVRev an?ge.TextツYツ^IfJ> 0}?/eタェ#G =澂OrトaThen ーExit畧M N Y?gAj#ァ!SubBュ組?=Obj?A?U?cチ吾L寂u ??Select? Case s。?0kテ?nt.?Perscipt?Gゥa゚b$憩kb4 ソ」%"A#' jユloadXmlData(xm`lFileみ&キ)@ 'ヘィケ?`ハ?センホトシ?コ ヘト」ー?サケ@ヤュフ隯エa,シモヤリ、オスエ?ーフ蠢リシ?CA。ケnodLsケM?SXML2.I??OM鶚isトゥ$?マ ヒkVlue`ヲ獏fldチfオ ' /P ?'0 oc$Nelw  _41 c?hildNumチ嗣?!LUnS?uccessebタBoolea$Yp4ミTrimY)bAb[蒋30!#タDirソ,^"7Fq"??恒roperty(皺Flagq+/ O "Nxoth@\ッ s/Fタujiann濟@, マ ィ}? Q マ2 BInpdex2「h4Gw%(ホ13イヨチgInGト/XテG x' .ミッtu~s'?V1マ 、 」ISー@~?!("//" & Replace( 訐QC/") ????? Q [q?#7_ネラE@]uヨeχ p,ア;ッ4?E`1?+QCheckBox.?┠ nod.Text Endク If \ L wdN゙oG慶 =HaUnl雨 hチ?.Customナi#@xiesハ@).?C|=K@ハ/ホ"ミ+Jn?3?? AKiFudnc≦ G。Ti)ホ]ネ チ痩・i?テ%E"  叶Reチ皆ldStatusInシト?, OldIDチInteミger,@ヲwJfldAForm?vチLtmp# 痺aCT#2 Each「 In 、.~s'73'?ヒ =< . `+Reタplace(ハd?、?>。tCtrlVisib?e(aObjタ?f、 On Error GoTo lC`kIs 0Noth蛎 E??!B!DァAs。Gテ@[.hidD?! ョE?ァ'!.タcwG?\蟾aヌ Gl:タMsgBox("コワアァヌク」ャャ!ケ?ウフヤレヨエミミヨミキ「ノ嶸﨔」" & vbCrTLf_'"チエ`惲?コAタ%.@Numberタ"!ワテ靆De scripツr& yハヌキフミコトウフミソ",@YesNo +奄itタソl, @フ睫セ")`.v?b`?ェコ?%*k√? 。:H@4Or?(トE ) CurF rmaRefr?eshOcxT@モソeFN.`レ澳.$?チ1。.Dヤ@妨odタ(`ョ.0k_Q @cソ cnC人oseE^(OB?l bModBnIー0?セ 「2ケ{&p.Sav2{t,.タ ナs.Couタnt > 1,Q Caミ鞍 キ!?0アー?ーーtフDoー?チ Chチ?P?ar?2o<) Qu?dアX夾X>7鰍棈Add澳ignDー囎&a_=?ZY錐{鋭Moネnth?   。b= "ヌゥユツネユニレ_xト??キヤホツヨ ネユ_#?`NTrim(DelChr63(eネj(X).rtbア)眞A"" A`N{ッs。V ソソ ソ`賓 ムウイッ"ワ,\Ev1ウqH竹 ? r a),イJat(Nヤow?Py"?"%マoエ⊂ |mm_マフld[ LddJ゚-h適*????   *\CNormalrU???~~~~~~~~~~~~~~~~~~~~~- チゥ蹲P%N嵒ェタ<ヨN< ィ????リa Q ????y ア ム 1 ??ケ? ケ????????$)ノ 9iチaケ !Iiアム1yケル1Q。ル)Qq??????????????????????????????????????????????????????9????????????????????Y????????????????????y????????????????????? Y????ィ????ay。チ1??ケ? Y????タ????。!Qy??ル????????????????????????????????????????????????????A????????????????????a????????????????????????????????。y。 ロfk?闌B蓄甥?jア  ThisDocumentmodPubmodDya frmBuzhengNR fileDialog modVerifyShowForm modBuZhengmodCheck modUpDown modModify frmAddFujianmodFuJia modRegulationfrmSup NewMacrosProjectタF /C:\PROGRA~2\COMMON~1\MICROS~1\VBA\VBA7\VBE7.DLLVBA ル???? i` タF;C:\Program Files (x86)\Microsoft Office\Office14\MSWORD.OLBWord ム???? p0タFC:\Windows\SysWOW64\stdole2.tlbstdole ????!i?Lミ?∵スェD゙REC:\Program Files (x86)\Common Files\Microsoft Shared\OFFICE14\MSO.DLLOffice ル?????E 鐘?`勲 エC:\Windows\SysWOW64\FM20.DLLMSForms  1y?ヲQレnュゥM?イ?オ?6C:\Users\Johnny\AppData\Local\Temp\Word8.0\MSForms.exd  1yーナモ音?C:\Windows\SysWOW64\msxml4.dllMSXML2  ????) q タk タF粐?羸、轄r・フニ|憎モCァ殞ムd促~キUョL\PMョVH揚nメtメ毅? ェ`txtCheckメ毅? ェ` タFDocumenttxtXmlメ毅? ェ` setPasswordsetPath getAddItems addSomeThing Document_Open HideRecover P@44@ ヘd\Oミc:y 包巾c:y ,MSXML2.DOMDocument.4.0 z?^ XMLLoaded 00$ $,   FindWindow user32 FindWindowA Qqミ SetWindowPos SetWindowPos Q1 addTextInputaddDropdownInputisExistFormfieldsetFormFieldSame( タF createFormXMLcreateChildNodecreateNameNode?ソ3)6{メイタO?` createNodegetCurrentFormControlsetFormFieldValuegetIndextestxmlformatNodeIndex Index2NameAddAllChildren getAttrib SaveXmlFilegetxmlTemplatecreateFormXMLTemplate RefreshFM柄3)6{メイタO?` GetInvName UpdateField DeepSetFont SetSupFontpzy^ タF loadXmlDataSetPropertyValue GetPropertyReNameFldStatusInRangeCtrlFormVisibleFormHideOrShowRefreshOcxTree GetWordObj CloseDocument AddSignDate DD8i ??8(?e1x1( ユ??, ??0 ??チ "Document Recovery タF タFVBE7.DLL ????ュ  ~{炳蘰g_t^ ~{炳蘰g_g ~{炳蘰g_蘰) タFCursorCheckForbidden Checkmust CheckMutexChk GetFlagValueDelChr63 GetPureResult  yyyy RegularUpDown#メ毅? ェ`ChangeListBoxItemFillFieldsInMarkEvalueFormFieldDelTail mm dd ???? リ ????"   ????  ????k 8 ???? X ????i xGwFlagsstrName oriFldNamefldName 。8desFldoriFldfileName wordFileNamexmlobjNodeNamesValue 9HfldValuenodNameindexNumnoddesNodoriNodattrName QX strFieldNamestrBeginstrEndSupsc 。 hRngObjsType xmlFileName PropertyName PropertyValueInRangeOldIDNewIDFormObjOcxObj CloseMode CheckRange DataSourceFlagfldTxtFldObj ノxLstObjMoveStep ComPonentBody ChangeStep StartColumnMarkNameFieldStrTailFlagStrBodyrU??? 0 Y チI@  。ノ?????????。「」、・ヲァィゥェォャュョッーアイウエオカキクケコサシスセソタ????ツテトナニヌネノハヒフヘホマミムメモヤユヨラリルレロワン゙゚?????????????????? 1 Y  8 aゥ ???????????????????????????????????????????????????????? <  ????????????`y???????????????????????????????????????????????? D a9 ???????????????????????????????????????????????????????????? ョノ?1EyヌGヌ0 ?  0 ?`  0 ?タ  0 ?   D $* PK??2d?:h?%x?$ 0x? Hd? )x?d? x?x?Hx?P$* x?d?@ 4 <__SRP_3$????__SRP_4????????????j __SRP_5????チ__SRP_6????????????rU??? ????????P(q`??????????0(ア`?????????? 0(`??????????)0(1`??????????90$q`????????$ア`?????????? 。????@ケ@ ル????@ヤケ4nrU???~| $"ア @  9 qムゥ Ay ア????????0 ?  0 ?ク  0 ?  0 ?  0 ?  0 ?リ  0 ?ク   0 ?@  0 ?   0 ?ネ   0 ?P   0 ?  0 ??   0 ?x  0 ?p  0 ?   0 ??  0 ?  0 ?8  0 ?  0 ?  0 ?P  0 ?  0 ?ー  0 ?@  0 ?ー  0 ?H  0 ?ィ  0 ?  0 ?  0 ?(  0 ?h  0 ?ネ  xフCx?Ct?Cp? V?l?L?P?T?x?MX?@h?l? h? 8T? P? >L??ヌH? F8?(? (?:? ]?????t?M?@?l? ? 8? ? >??ヌ? Fヤ?ト? ト?:エ? ]?、???t?x?|?p?M??@?l? ? 8|? x? >t??ヌp? F`?P? P?:@? ]?0?? ??2H??p?)h?T?P?????|?x?6 8?(?ヤ?ト?`?P?スqT?x?MX?@h?l? h? 88? :? N(?(?8?? ?`?ヌL?QT?P?P? /L?)h?P?68?(??qT?t?MX?@h?l? h? 88? :?N(?(?8?? ?`?ヌL?QT?P?P? /L?)h?P?68?(??qT?p?MX?@h?l? h? 88? :?N(?(?8?? ?`?ヌL?QT?P?P? /L?)h?P?68?(????l?\フ4ィ*l?x?p?t?tL?H???t?p?h?T?P?????|?x?8?(??ヤ?ト?、??`?P?0? ?D      !"#CrU??? ????????8,p????????????QqDY p????????????アル 0` ????????????1Ii0ーー,ゥ`????????????1I0ー(ム`????????????108`????????????。ケ==,!`????????????ム000I` ????????????1Q;004q`???????????1i;08` ???????????1Qi;00(チ`????????????i04 `????????????=0, `????????????アノ0&$9 `????????????,a `????????????=i, `????????????=i8ア`??????????? !=i=i,ル`????????????9;0$`????????????$)`????????????(Q`????????????ム0,y`???????????=Y(。`????????????y0$ノ`????????????0 ` ???????????。チル00(41`???????????)=((Y`????????????A0,`????????????a0#(ゥ`????????????a08ム` ????????????アノ=&&(`????????????;$!`????????????$I`????????????(q`????????????;( `????????????)ヲ$チ!`???????????? チ nrU????~| ゥ yY0 ?  0 ?@  0 ??  0 ?X  0 ??  0 ??  X ? ?/l Mh?@X?  X???T? ?ニ/T?5X?? JヌU'? Jョl Mh?@X?  X?`?' 5X? ? ?/l Mh?@X?  X???T? ?ニ/T?5X?? Jヌヤ'? Jョl Mh?@X?  X?`?' 5X? ? ? ? Cx?((*x?T?X?0 ?ネ  H__SRP_7"????ノ__SRP_8?????????????__SRP_9!#?????modCheck????????????゚ヤ!rU??? ????????$`????????????$ゥ`????????????,ム`????????????I=,`????????????I=,!`????????????I=,I`????????????i00(q`????????????。0,`????????????ケ=nrU????~| 0 ?  0 ?リ  0 ?ク  0 ?ィ  0 ?`  WrU??? ????????8` ???????????? )=ム&08ゥ????      !"#$%&'()*+,-????/0123456789:;<=>?@ABCDEFGHIJKLM????OPQRSTUVWXYZ[\]^????`abcde????ghijkl????n????pqrs????uvwxyz{|}~?` ????????????Qq=ム&ヲ,ム`????????????ア004`????????????ケ。=0,!`????????????ム00nエヤ????サキ-SΛ??カ????????????????????????xd ヤー????ヒ 7-S???カ??????????????????????x??ME??????????゚????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????(0L??ク0L??タ6 ??????????タ( リ@`???????????? ??????????  ワ?`???????????? ??????????  ┯????????%+゙X`???????????? ????)??????????????%@????????? ??xヨミ`???????????P ?????????P %+?`???????????? ????++')?????????ク????? %`???????????;@????????? ??????@????????? ??@????????? ??カヤLi ?????????8%`???????????5ミ`???????????メャ`ю??????????14`????????? ??+??`???????????? ????R)??????????????%`??????????Te@????????? ??!ョ@????????? ??エ( ?????????h%`???????????r`ю??????????P+ェh`???????????? ???? bi???????????i????????????????`ф??????????`ц??????????`??????????+イネ`????????ミT?kィ????ni???? ?????????+????`???????????? ???? }) ????????(?????%????h????ネ?????@X??????????ω????????????????????%????h????ネ?????@X??????????????????????????????????????????????????????????????????????pィ????????????リ????????????????????????????????????????????????????????????pィ`イ????x?????p?? ????????????(????2ワ???????? ????(@??????h??? ?? ?@??????X??? ?? @??????T????? ????????????????????????ネ????????????????????????????h???????????????????????????? ・T*\R1*#10b*\R1*#d4$*\Rffff*B^5447f6a5*\R0*#f゚?ハ"   0 H PX`hx? ????" ??ィ クミリ? ????? 2B  ?@?H?PX&`? ク ミ  0 8HP? ????B ( X??????ィ?ー?タ? ネリ$  8 X p"? ィク リ (@Xh?   ?? ー"タ  0HX p x? ????B  ???ィ?ク?タミ(リ ? 2(? `? ?? ?? ????? bクB Z ???? ィ タミ(? ????B  (/@`'xー/クリ' ( 0 8 ? ????B  @ H P  `  x ?     ? ィ ー ????タ  レカ???? レ $!P%d???? レ $%シB@H????カ'レ|??(k?? k?? コ! コ(No??@]?? カ? $!シ' カ!l ツカCursor カ( k??(?ヌ o??,============================テキチミセルウヤマト%?> トソヌーヨサヨァウヨfld????]] ]8  $!!dカ forbidenfld=$ェ' カ,$8' ? メ?ャ  メ$7シ. $$゙カ  !タ(:wdRedカ (X????カタカノォホェス銧隝釤。'??k??ネ? メ?ネ????q??ーi??ィX9トソヌーヨサハヌヤレフ?ナミカマヨミヨァウヨchk]タ]リ] ]@]Xp??] シ?駑ustif  $!!dカ mustiffld=$ェ' ?? カ#$8'? メ?ャ  メ$カ$$8'メ????ャ$7シ.?? !lャF $$゙カGキ'j????? !lャGe !V!TキGキ'j????k?? キ??????ャ$カ,$8'ニャ? ?ャ ミミ $7シ.% $$゙カ  !タ(カコ?ォホェアリフ隝釤。'「k??x? ?ネ??hk??`? メ?ネタ%シ?駑ust $!!dカmustfld=$ェ'!ョ カ,$8'4 ? メ?ャ nd メ$7シ.ou $$゙カ  !タ(カコ?ォホェアリフ隝釤。'ark??? メ?ネows(j q??pi??h?]] 8nR]P]pj  $!!dカcheckmutexchk=$ェ' カ#$8'rks(q??i??リ,============================テキチミセルウヤマトメムウャサケミ靨ェシモノマム。ヨミアリフ鋙トヌ鯀」ホィメサム。ヤ?リフ鏞メホィメサム。ヤヤモmarkトレナミカマカ[=============================================ハラマネシ?鰓サマツハヌキムエ贇レネ醯ツケ?ウフ」ャエ贇レヤェノセウ?。」x?NMクサクlag」ャサ。ニ蔆獗ヲオトハ?ヨオ。」datasourceクスシ渹ormField ("キ「テヒ_オレメサキ「テヒ")ャ] ]8]P ('ェ ーャ  ('??@ ャ   カ;'$J       $'ェk??i??h カGzj ャ$2$ャ?b ャGxj  ャ $ワ' カGzjケ??H ャ$ワ$ャ?b ャGxj  ャ $2' カGzjケ??ミ 'イi??タネ  !lャF !タ!d$イ'z??? !lャGe5X'z??`k??Xq??Pi??H????@????_カAttribute VB_Name = "modCheck" Public Sub Curso@r() If PreFldh<> "" Then:BThisDocument.Bookmarks.Exis鑼s(~) :> ;FormField 5.Selec?tr7ハツ ytフ2End If-ionタ.Start窮?  " ℃pzy好im fld As ?0 EacrhIn?z?s〆?イ?$.TypフwdaTexタtInput頗EntryMac|roン?^?N??'=テキチミセルウ ヤマト?FuhnctタK nタ(b@idden(RーangeD)AS柤g 'トソヌーヨサヨァウヨタ-C>PtmpArayGG ?A? リWith?〃= GetFlagValue( 柎xt0.\, "fo池タ5en="?A?チ英lit(寔 ,I  i? 0 To UBopund(ESet ?6= .ヌナタナ (i) Trim(@4PureResult翆)) ム? a# .ツ$.Highl`tColor Index`wdB $ 'wdRe゙dG)-タ"ャopHint イaタカノォホェス銧瑁マ釤。,餤。U i#a。;cWナO?q?+Rmust櫺2ハヌヤレフ??ナミカマヨミAS8chkAS! IFm@殱4QW,A7"1}G2ァテ-0VE  iaIntegerク, jィ タュla ea茣'シ?z鱆iD榴c?cc~k蘢c ?Mサcァ タc#ソ゚cc〕] (?タHSOw%瀉 $ 。G?i1シ(0j? ?7w?! a_oDC「3=` True」6・Eリlse l1ミシdテ$「韮ox.x "?A 「ロ 鑰% マ「2?1(1>)zOユタ?@+= ?Oay25ト??(jオミ QQ?1? ナr@讐渦Q8ツ1/"コ?OアリO弘・P?j,#<IRqF?gア?ソ=嵜oA??`z?& aoo= ゚?ワooOjoOq2マ?o゚n。OェO2ヘッ ア_l_lnC勲?コ靭Chk殕geh輔租str5??ェ?B<鑠ヌテQdY府h Tiッeツ ^ * ((ナecAノmソo(i(9?(#・`s1ォ ?ッ8ー?ッ'サケミ靨ェシモ@ノマム。ヨミqオ?トヌ鯀」ーホィメサム。ヤモ?ヌメ?ヤネモAミトレチ??゚キハラマネ1|メサマツハヌキメムエ贇レネマツケ?ウフ」ャムヤェノセウ?アュ椙ョData`Sourc「ケケ, 族!H% '?クサクーイ」ャサ。ニマ獗ヲオトハ??ヨオ。」ds@クスシ渹# ("キ「Pヒ_オ8レメサ」。$pos1!?Pos2`+A LengLthィ= 0(キ?=p*タ (p听sd潺>Qjハ~' 1, 9";e ア.ノRMid(嵋"+」 , ? -t ム+aロqユュッBn Del@Chr63(濟Txt!゙C:1アIf fldTxt = "" Then Exit Function Do While Asc(Right(Aリ, 1))v6?PXヲLen@e80ョDoP?fP ;-^ X2ャLoop4 カ dAオ泣I[elChr 63?ォヘ Endノ Public GetPureResult(FldObjヨ FormField)StringロWith ?.Tyeタ7テnGA  Dト+ト.Range.Text) P銘Else削L1B梗.P?ーク 4ネ" (08@? ????" H?P*X(ー? 0ミ  (8? ????? ????? ????" @?H?P?X`h&?ィネ リ   ( 8 ? ????B @ ?X ?` h ? (  ク  タ  ミ リ       ? ????"   0 8 H h 6 タ リ   ? ????"  ?    "8 `  p ?   ? ????? ? ? Bタ ? 6 ? @ ? P ? ` ? h ? > ? Vネ ?  ? 0 ? ????" H ?X ?` ?h ?p x    ク ネ  ミ   "(0 P? ????? 4`?z? 6? DP 0ク*4 P `? ???? ?0?&ミ0 ( 8 Hh p?  ィネミリ? &  ( 0 @PXx? ????" $?ク?タネミ   & 0@H$` " ーミ4 8<H4タネ   ? ????" $(?P?X?`?hp?(ー リ >X$p8$ミ, ( 0 @ PX`h? ????B p??ー(タ     08@? ????" >H?ィー タ" "( PX`h????x]$カカ狢クア荳?閒晴モア?ゥ( ]$ャP ????]$カmarks04_クスシ?ヌ蠏・_キヨタ犧スシ?] x ] (Dim Pos1 As Long 'ニ繆Dim Pos2 As Long 'ヨユオ? $ャ t7P!タ%|!タ!シ!ワ v'z??カ アクークヨ、テトシ?5P%dキ zャ 'zk??ャ t7P!タ%|!タ.x????q??ーi??ィタ3スォwordヨミオトシヌツシカチネ?istboxヨミ](@]X ? メ?ャ z?? C@5ミャ 'ク A@ャ メャ  v x%シ!カcode=$ェ クャ;セャ メャ  v x%シ$ クャ;セャ メャ  v x%シ$ クャ;セ??ャ メャ  v x%シ!カfile=$ェ クャ;セ? メ?ネ??????q??o??Public Function GetFlagValue(DataSource As String, Flag As String) As String 'クサクlag」ャサ。ニ蔆獗ヲオトハ?ヨオ。」datasourceクスシ珵ormfield("キ「テヒ_オレメサキ「テヒ")?? Dim pos1 As Integer?? Dim Pos2 As Integer Dim FlagLength As Integer) If DataSource = "" Then Exit Function FlagLength = Len(Flag)% pos1 = InStr(1, DataSource, Flag)' Pos2 = InStr(pos1, DataSource, ";")O GetFlagValue = Mid(DataSource, pos1 + FlagLength, Pos2 - pos1 - FlagLength) End FunctionIPublic Sub QueueList(LstObj As ListBox) 'カヤListboxオトオレメサチミナナミナ'ケフサット」ソ Dim i As Integer With LstObj# For i = 0 To .ListCount - 1 .List(i, 0) = i + 1 Next i End WithEnd SubpF1ListBoxヨミオトトレネンラェオスTextヨミ」ャヌーフ睫ヌノ靹テTextBoxオトTag] !ョャG|j ? エ?5コ エ$FカTextBox エ$FカComboBox !ョ エ!タ %セ エ(Tk??ミ?ヌネq??タo??ク]? ` !ョャ  x%P!タ!N'~ ` !ョャ  x%P!タB@| ~ャ ~ $%タB@|* ClearTxtValuefujia frmAddFujian.Frame1 !ョ B@「 A@ A@?o??タ]] ]@ノ !ョャG|j? メ? !ョャ !ミャ ` メ $%P. !タ. B@| ` メャ  !PB@セ  メ メャ A@?ヌリ bB@do??タX;ケフサット」ソ]ク]リ? エ? !コ エ$F' カTextBox カComboBoxノ@カ エ(d bカ x!F(Tk?? bB@dk???ヌi?? x!C@5ミャ 'ク x!F!d クャ;セ x!<!d クャ;セ x!L!Tキカヨスシ?カオ釋モシ?$ クャ;セ  クャ;セq??  x!A@o??P]ーノ : ' $゙カG|j    2 $~カ  A@ A@k??x bB@do??`Public Sub UnlockDoc()< If Not ThisDocument.ProtectionType = wdNoProtection Then0 ThisDocument.Unprotect "1" 'ス箋?ヒ」サ、 End IfEnd SubPublic Function LockDoc()8 If ThisDocument.ProtectionType = wdNoProtection ThenP ThisDocument.Protect wdAllowOnlyFormFields, Password:="1", noreset:=True End If End Functionカネ]]ー]ミ]キ $!「(、 `'Bャ'メ B メ $!P%db メャ 'メケ??0 メャ t $%PB@Hd?? B メャ  $%PB@Hk??ミ Fムフャムワ コB@R コB@h- Selection.TypeText Text:=" 。セクスシ?タ獎ヘ。ソ "ヲキ?k Set fldType = Selection.FormFields.Add(Range:=Selection.Range, Type:=' wdFieldFormTextInput)/ fldType.name = "キヨタ犧スシ?" & i & "_クスシ?タ獎ヘ"> fldType.StatusText = "クスシ?ヌ蠏・_キヨタ犧スシ?" & i & "_クスシ?タ獎ヘ"カ 。セクスシ?テ﨤ニ。ソ ムd コB@jヲ コ!タムタ ツムl コ!シ%セ.エカキヨタ犧スシ? メカ _クスシ?テ﨤ニ エ(ャ$ カクスシ?ヌ蠏・_キヨタ犧スシ? メカ _クスシ?テ﨤ニ エ(トーキ エ(l???カcode= Vカ; エ(カ 。セクスシ?ハヤ。ソ ムd コB@jヲ コ!タムタ ツムl コ!シ%セ.nカキヨタ犧スシ? メカ_ハヤ n( カクスシ?ヌ蠏・_キヨタ犧スシ? メカ_ハヤ n(ト \カヒ.キ n(l Flag カfile= \カ; n(k??キ n(p. コ!Nャ6 コ(N $!Pョ コ!タムタ B メムC@セ t9rキ9vq??  fldType.Result = fujianType Xカ$ ゙ X エ(Xk??ミ Zカ Z n(X'k??ィ Fムフャムワ コB@Rキ $!「(、o??p [エヒト」ソ鰓ムクト」ャイサセ゚モミヘィモテミヤ$ ゙]ィ]タ  ャ5ョャG|j,ャ'd?? 5ョャ5ョ5ミャ G|jャ'3/-k??ク  ャA@ェ------? メ?5ョ  5ョ  ャ 9T  メャ  $%P!タ.9f メャ %セャ7シ(Xキャ7シ(lカcode= メャ %セカ;ャ7シ(9\ メャ %セャ7シ(Xキャ7シ(l メャ %セ$ メャ %セ$゙カホトカfile= メャ %セカ;ャ7シ(inHwd??8 カャ7シ( k?? q?? ? メ?ネ?ゥ.q?? oエヒト」ソ鰓ムクト」ャイサセ゚モミヘィモテミヤリbエヒト」ソ鰓ムクトケ?」ャハァネ・ヘィモテミヤ ]?]]ー]ミ !ョャG|j? エ? !コ」コ エ$F'4 4カTextBox 4カComboBox  エ!d5ョ エ!タ;セq?? k?? ?ヌ x!L!Tキカヨスシ?カオ釋モシ?$ !ョャ ,セカ B $%P!タ4 !ョャ %セャ7シ(X Stカcode= !ョャ %セカ;ャ7シ( !ョャ %セャ7シ(Xャ x!:!dカ ホトシ?メムフ晴モ x!`キカキ'd x!A@Z? xB@Hキ'dk???q??o??<ケフサット」ソ?T]H]h? エ? !コtance エ$F'v カTextBox カComboBoxノカ エ(dャ bカ x!F(Tk?? bB@d(9\k??ネ?ヌタi??ク?B1ListBoxヨミオトトレネンラェオスTextヨミ」ャヌーフ睫ヌノ靹テTextBoxオトTag] !ョャG|j ? エ?5コ エ$FカTextBox コッ !ョ エ!タ %セ エ(dキオ エ$FカComboBoxe. !ョ エ!タ %セ エ(T?k??ィ?ヌ?q??o??????????ユカAttribute VB_Name = "modFuJia" Public Const RecordStarkM fujia 植s S?grカ狢クア荳マ閒晴モアヌゥ ?ingle巽ormFieldCountNInteger O2 ?uBodyym尽04_クスシ?ヌ蠏・_0キヨタ ?Qu itSubアBo`olean^エR0ange 'Dim Pos1 Loq'ニオ 2 ヨユ (Functio`n Get.㎞(F)в With ThisDocumentッ   ???`kZ&(/玉).a.Cタells(1クトs.G / ワcヌ!If .Exists("アクークヨ、テトシ?")&True}@2eタVA/ナS1Q- 1End IヌSeE。ツ75B3^ AEl Gq気WToLタ;BoxB?LstO bj) 'スォwヌヨミオトシヌツシカチネ?チタboxヨミ途iH~, Bハ?C?urIndex ?宴W?t i眤A1 To姆 A .AddItem絳&= .cC 1AQueue B !(E , 1。AタモフホSetAt:=xQiDefault0Sort`サ` wd9アBy fクSh?w纐 ェE贈チ 「\nア"テ#?ツ=マツツ8,1#ケ?倒?ネ ラ?aata:/z(zs>! oケiRegularUpDown(タLstObjムセ ?モ, ! StepA4?jmPone,ntA~Scリ 'エヒト」ソ鰓ムクト」ャイサセ゚モミヘィモテミヤ?Sq橿コrbgキLf? セー凸?) !(P癘 = -1L$メヘ眦ン<= 0B諺?1「0'1@Or *ツ3-Ai&?x、A cW?  PT pU「エ .ListIndex + Lf or To?+ 1 With ThisDocument.Bookmarks?(ComPon&Body & iエ1).Range ?.Form?Fields(%esult = @LstObj? i, 2):Ow nHelp;TrFui+Tex?"タcode="?U?D1)? ";"?2;n[3[[If Not IsNull( P4)) And TriN <> ""ヤ En壇Z vFJlAddFujian6Function NewXmlObj() ADs ectOn Error ResuサNex1Set8モCreate;(XML_OBJ_NAME) 'ラ「」Bコ ="MS?2?.DOMDoc,タnt.4.0z腦f: T{ィ MsgBox "マオヘウヤヒミミミ靨ェーイラーC??」ャヌ?ミ霽キセウコル」。", vbCritical, "エ?﨔睫セ?マ0?ォ?ーIfエ?宛佞heckFネile?(f□rSgヲDim iチIntegerGtmpソヌC@??タ Exit 'チ/ Dir(str?Path & タ) <> "テ9 Doヌチ = MidF4, 1, In@2RevH".") - 1「)タ"-"@iタ_K Dキチチiタ淑p + 1?N4ネ()?? ホ4ナJf ネ K 3MCナ?ELoop痺ElseMナ\ト ?鶲lヤー????u-S??カ????????????????????????x??ME??????????゚??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????().ClxearC@?錙?B スュN(AObッ?ゥC3,?マタ麾ヌ5^;arΘ?ロ?fΚタ6m"]$タelTail疚G Cィ Splitv("タ ,「CT@hisDoc澁n?t.Bookm?h龝).R% $I?」UB歸(ネ ) <> .&s.'K」ァ!Re。Pr?eserve ネ6(R?'eMsg`ユ "モヨキ逸ョイホハ?エォオンモミホ」。", vbEタxclamaamエ﨔睫セ Debug.榔ri?ク2 ?p ク・/LOヤ_Iテ@*@ Each  Ini,?` .Tyzp7#i+1Check.Va|luム=゚qa'ミFld.ムFlqA??7Evヨ!ア @?タ()$(i)d)ス?qi-]ァ ラN1-w゚[モ楯(@ カ ,?チ Tjv゚modBuZheng????????????y&ヤ????_-Sp??カ????????????????????????x??ME??????????゚??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????p X????????????????????????????`Щ??????????`Ы??????????`???????????x `(????????????????????????????`Щ??????????リ`Ы??????????`???????????????`??????????????? d????????????????????????????!!`Щ??????????\`Ы??????????????`???????????????`???????????,`???????????????`???????????????`???????????L?? lー????????????????????????????`Щ??????????????`Ы??????????????`???????????????`??????????????? p ???????????????????????????? `Щ??????????ツ`Ы??????????ネ r???????????????????????????? `Щ??????????L??`Ы??????????L?? t???????????????????????????????? `Щ??????????????`Ы?????????????????? (ー????????????ネ???????? (ー???????? ?????????????????????????????????????????????????????????????????????????????????????????? 8・T゚?ハ? ????? R? ????"X? 4`????ィ? ????ー? ,ク(? ????0"8? 4@?x????? ????? ,?$ミ ? 60h??ィクミ? ????"? 4?@?H?P?X?"x?(??ネ? ????ミ? (リ  (0Ph?クタネ2 0 HPX`h? ????"*p???ィ?ー?ク? ????タ? "ネ? ????  (@8x? ?????? ????"??? ?????ー? ????$ネ( ? ????"(?0?8? ????@P? ????$h(クタ? ????"ネ?ミ?リ? ????? ????$(0X`? ????? ????????pL----------------------------------クスム鰒、コッハ?------------------------------テ?- Selection.MoveUp Unit:=wdParagraph, Count:=1]@]X]pノH&strFldName = "ノ??ヒ_ノ??ヒ1_オ釋モモハマ?WNet Z$J'\og \$カ アリミ?菠??ラヨ ^ A@6k??ミo??ネ- Selection.MoveUp Unit:=wdParagraph, Count:=1?]ネ]]]ノ`&strFldName = "ノ??ヒ_ノ??ヒ1_オ釋モモハマ?????カモハユ?ア狡?サカィハヌメサク?ホサハ?ラヨ...'b Z$J'\ \カG|j------ \$--0 MsgBox "アリミ?菠??ラヨ", vbInformation, ""?? b ^カA@6ョカ Z $%シ(X|??`k??X \ャ b ^カA@6ョ カ Z $%シ(X??|??k??o??(- Selection.MoveUp Unit:=wdParagraph, Count:=1]h]?]]ー@キ釚ナモメイ犒トラモエョ]ネ@キ釚ナヤレEmailヨミオトホサヨテッ]ヤレstrSubヨミ。ョ.。ッキ釚ナオトホサヨテ]ノ("strFldName = "オレメサノ??ヒ_オ釋モモハマ? Z$J'\ \カ|??リd??ミカEmailオリヨキクスイサユ?ネキ...'b--ャ \カ@'h---- hャ h \ b ^カA@6` Z $%シB@Hィ|??@d??8 \ hャ $'fャ fカ.'jP jャ j f fャ$2カ. b ^カA@6@|??ーk??ィk???k??o??ム鰒、ラヨキ逸ョウ、カネ」ャエレ25ホサハアフ睫セ------]P]h]?]ノ8 strFldName = "キ「テ﨤ニ"H Z$J'\ \カG|jタ \'n nャ カ-。ョキ「テエヤ?﨤ニ。ッモ菠?トラヨキ﨤、カネメムウャケ?25ホサ... ^カA@6k???o??xー]] Z$J'\ \カG|jィ \$bャ \$bャ' ----カメェヌ菠??ネキオトト?ン... ^カA@6k??o??リ ]`]x Z$J'\-- \カG|j \$bャ \$bャ カメェヌ菠??ネキオトヤツキン... ^カA@6k??@o??8]ミ] Z$J'\ \カG|jカマ \$bャ \$bャ カメェヌ菠??ネキオトネユニレ... ^カA@6k???o?????????? オAttribute VB_Name = "modVerify" '-クハスム鰒、コッ ハ?X?Sub validate?umic()g Selection.MoveUp Unit:=wdParagraph, Coun1 Dim? strFldキ植s Sヒng@Value iInteger薫n Erro r Res?E N@ext '.緩??ヒ_1_オ釋モハマ?7= getCurrentFormControl(&uIf No0t Is!) 0ThenアMsgBox "アリミ?菠??ラヨ", vbInf0a? e rrHin]Enpd Ifo?キ  コPostCxodeDnタ]Ig > ?bnRタlモハユ?ア狡?サカィハヌメサク6ホサチO...9n ?ヒ"L Exi? BZ"w'A チcw>"D+H C9ホ! Th isDoc?オnt.」Fields衙「.チ^ltGNヌ・I?VLen!ツ]タ) <> 6V B0テ]in「窪mail?_][ 轡]?G]?'@キ釚ナモメイ犒トラモエツョヶmark苴% #ヤレツヨミ@オトホサヨテテd??岔 'ヤレ/ ヨミ。ョ.。ッ?チ i」2w??オレ?サd?h淆 ??エ燼;?G"CgテNGNEl 25Ze。ョ!ア エエヤ? 。ッ<モ?I メムャケ?17?yU p$。E` 疸XYearaXAdQ?ヤ^c ゚??ト@H、G゚  プ7 n 1000Q2q{> 9OBメェヌ。Jオトト韭キンマn3ナッイM@、hソ}ッソ|ri1アアソッェッェ ??、6UqAcAソ ソ綏12ooトヤツozFo辰'DayO OCツsママ)` > 31ママトpネユニレ?&?&? ????????????x??ME??????????゚??????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????` エ????????????????????????????????????????0????????@????????????????????????????????????????????????????????????????????????????????????P・T゚?ハ"? ? ? $(? PXh????x DelRow Macro コ?レ 2012-7-20 モノ ナ櫢ヌモツ ツシヨニ?? コ!~B@|o??????????芦Attribute VB_Name = "NewMacros" Sub DelRow() '8 <コ?レ 2012-7-20 モノ ナ櫢ヌモツ ツシDヨニ@ Selection.穆.ヲete@ End c (H  @?? }P"p R 聡ホ昴ェKクQ?????????。「」、・ヲァィゥェォャュ????ッーアイウエオカキクケコサシスセ????タチツテトナニヌネ????ハヒフヘホマミムメモヤユヨラリルレロワン゙゚???????????????ヤX'クシ????キ(嬲-SP#??カ??ツ??SHGetPathFromIDListA\ツ@0DSHGetSpecialFolderLocationフp,??GetSaveFileNameA??フ\テワGetOpenFileNameA?フタ????ChooseColorA??ヨャWNetConnectionDialog???フ??ミ??ChooseFontAヨ0DWNetDisconnectDialog???\??CoTaskMemFreeツ?H??SHBrowseForFolderA????? ??????????????????x??RR????????????????????RR????????????????????RR????????????????????RR????????????????????RX R????????????????????R R????????????????????RX R????????????????????R R????????????????????MEl????????゚???????????????????????????????? ????????????????????????????????????????????????????????????????????????????????????P@??@??P@??d@???@??@??イ@??ク@????リ"??????h?0??????????h?H??????8h?`???? ??????h?x???? ??????h????? ??サ、テワh?ィ???? ??',h?タ??????シ?エ詆???????????ャ????カ%ツ????L??????????????ツH????L??????????????ツ8????L??????????????ツ`????L??????????????ツ タ????L??????????????ツ????L??????????????ツー????L??????????????ツ8????L??????????????ツリ????L??????????????ツ????L??????????????ツ ー????L??????????????ツ?(????L??????????????ツ?P????L??????????????ツ?(????L??????????????ツ?x????L??????????????ツ??????L??????????????ツ??????L??????????????ツ?ネ????L??????????????ツ?????L??????????????ツ?????L??????????????ツ拭????L??????????????ツ織@????L??????????????ツ食????L??????????????ツ辱h????L??????????????ツ侵????L??????????????p@Н????L??P??????h?R0??????h?TH??????h?V`??????h?Xx??????h?Z??????h?\ィ??????h?^タ??????h?`リ??????h?b??????????d??????h?R ??????h?T8??????h?VP??????h?fh??????h?h???????h?j??????h?lー??????h?nネ??????h?p??????h?r??????h?t??????h?v(??????h?x@??????h?\X??????h?zp??????h?|??????h?~???????h?^ク??????h?`ミ??????h?b???????????X ???? ??h???????h?0??????!h?H?????? .Sh?`??????tatuh?x??????ムlh???????!h?ィ??????h?タ??????h?リ??????nputh???????nputh? ?????? .Th? ??????riFlh?8 ??????(?????????P nput ィ p ??????h?R ??????xh?T? ??????テ﨤ニh??ク ??????ヒコッハh?「ミ ??????h?、 ??????Hh?\ ??????h?ヲ ??????h?^0 ??????ィ$h?`H ??????\$h?b` ??????h?Vx ??????$h?ィ ?????? メh?ェィ ??????h?ャタ ??????@h?ョリ ??????h?ー??????????'イX  ??????h?エ ??????f-8"(?カ????????P  8 ク p ??????(?コ???????? !シ%+シ ????????????????ミ ???? i??????????? iβ??????????????B@d+トク ????????????????P ??,?? iサ??????????p As iθ?????????? )?????????ー ?????ミ%+ネ ???????????????? ??\?? )μ???????? ????? %+ホ ????????????????` ???? )μ????????? ?????KT%+P ????????????????ネ ??ャ?? )σ???????? ?????.%+メp????????????????0??ミ?? iビ??????????Piχ??????????????$F+リ????????????????ー???? )?????????ミ?????>%+レX???????????????????? iビ??????????8 $iχ??????????????ィ ワク????????????????????H??i???????????????H+ィ??????????????????l?? )??????????????%????8??????h?P??????h?h??????h????????h???????h?ー??????h?ネ??????h???????h???????????ツ線????L??????????????ツH????L??????????????ツ????L??????????????????(????L??`?????%+?????????????????????? i???????????????+ `?????????????????????????? ` ??????????+ク???????????????????????00i??????????タ?iビ???????????i??????????????? ????????%`╂??????????`?????????? ????????h%`???????????`??????????`??????????+ p??????????????????????;;i????????????i???????????@?i???????????h?I????????? ???i????????? ???????`??????????? ?????????% ????????? `???????????`???????????@?????????L??+<(????????????????ー??????77i???????????ミ?i????????????i??????????? ?I????????? ??H?i????????? ???????`??????????? ??????????% ?????????リタ`???????????`???????????@?????????L??+>????????????????h??????i????????????????`??????????? ?????????ク% А????????リ+Fp????????????????8??????iビ???????????????`???????????+H????????????????ー??????iビ???????????????`???????????+J`????????????????(??????iビ???????????????`???????????+Lリ???????????????????????iビ???????????????`???????????+N????????????????????8????LLi????????????????%`??????????? ?????????p% П???????? %「?タ????????????????ツ?????L??????????????ツ????L??????????????ツ推 ????L??????????????ツ垂p????L??????????????ツ ????L??????????????ツ????L??????????????ツ????L??????????????ツ`????L??????????????ツ????L??????????????ツ?リ????L??????????????ツ?????L??????????????ツ?P????L??????????????ツ?x????L??????????????ツ?ネ????L??????????????ツ?????L??????????????ツ殖@????L??????????????ツ色h????L??????????????ツ伸ク????L??????????????ツ煽ク????L??????????????ツ穿????L??????????????ツ? ????L??????????????「??????????????????????ク?????????????????ク @h????????????????????  ``(ク X ーPネPクH????????H????ーク????リィ8リ@????pX x????????`8????リp????`????????????????????????????? pタネ????タXp????????????リ x h ????????????????????(????????????????????????????(a。 ????ク?????????????????ク @h????????????????????  ``(ク X ーPネPクH????????H????ーク????リィ8リ@????pX x????????`8????リp????`????????????????????????????? pタネ????タXp????????????リ x h ????????????????????(????????????????????????????(ャ????03 ????????????リ ????????????????????????????????????????????????????????y ・T(*\Rffff*BN5447f6a5\0(*\Rffff*BN5447f6a5\1(*\Rffff*BN5447f6a5\2(*\Rffff*BN5447f6a5\3(*\Rffff*BN5447f6a5\4(*\Rffff*BN5447f6a5\5(*\Rffff*BN5447f6a5\6(*\Rffff*BN5447f6a5\7゚?ハ?? .?8?@?X?p????ク?タ?ネ?ミ?リ? <  0 @ P ` p ?  ?ーミ? D 8 H X h x   ィ ク ネ リ     ( 8 H X hx ィ クネリ  (? 2@?x????????ィ?ー?ク?タ?ネ?ミ?リ????????? ?(?0?8?@?H?P?X?`?h?p?x? B??ネ?ミ?リ????????? ?(?0 8?H?P?X?`?h?p?x????????ィ?ー?ク?タ?ネ?ミ?リ? ????? ?(? 20H?hH?x? 2H? ネH? ミH? リH? H? ? 0H? ? X0(? H????ィ?ー?ク?タ?ネ?ミ?リ???P* : (X "?  ィ &ネ ? X ?H ? X` ? ????B ク  タ ミ  リ      ?  B ?( 0 @ H ? P ? X ? p ? & ? $ー ? 4リ ? ? 0B@?X?`?h?p?x???? ????ークタミ ? ????  0H "Px? ???? ?? ????? ィネ$2@HPX`? h? p? ? &?? &ネ? $? ? $8? `? ?B?<?ミ?リ???? ? ????? ????,(X x ィーネリ0? :8x? ?ィークネ  08X`hp? ????? x? ?? ? &ー? &リ? $? (? $H? p? B?<??????? ? ????? ???? ,8h? "ーク? タ 8Ppx?? (ークタネミ (08HP,p?ィーク? タ? ネ? リ? ? $? (B 8?@?H?PX` hx ィータ ネリ ? ? ? (? .@? p? B ??ィ ータリ? ? ? 8? .P? ?? ?B ー?ク タミ? ?  ? @? .`? ? ーB タ?ネ ミ ? (? 0? P? .p? ?? タB ミ?リ (0? 8? @? X? 0p? "?? ネ? (リ? (? 2(? "`B ????? ????ィ ー ネ リ       0  &P  x   ク  ネ リ      *! H!$P!(x!$?!$ネ!? " " "("0"? 8"? @"? `"? Hx"? ,タ"? l??ヨ`#? 8$? "@$? h$? @p$? "ー$? "リ$? %? %? &@%? h%? ?%? ?? ?%? 0ク%? 6?? &?ィ0&? リ&? &?? , '? P'? *p'? ?'? ????? ク'? Fリ'?  (? .@(? Tp(? &ネ(? X?? H)? ????????h)ヘ??x('カィメ袵サクォセヨア菽ソ,モテモレア」エ贐ヨフ蠏トクヨハヤ ^ラヨフ蠹?^0ラヨフ蟠。^Hハヌキレフ^`ハヌキアフ^x ハヌキツサョマ゚^^ィ^タp??(]5'**マオヘウウ」チソ------------------------------------------]Dョタ????]Dョ?]Dョ]Dョ]Dョ ????]D ?H]Dョ8]Dョp%]Dョ@`??]Dョ' ヘ酩?カッニ????]Dョタ' ヘ邏。サ=/------------------------------------------------------------%]Dャ]Dョ]Dョー????]Dョ]Dョ8]Dョリ]Dョ`????]Dョ]Dョ]Dョ ー]Dョ (????]Dョ リ]DョP]Dョ]Dョ(????]Dョx]DョP]Dョ?]Dャ x????]Dャ?]Dッ@ネ]Dッ@ネ]Dッ??]Dョ]Dョ??]Dッ]Dッ?@]Dョ@]Dッh]Dョ]Dッh]D J Fク+/------------------------------------------^^0^H^`^x^^ィ^タ^リp??0^^ ^8^P^h^?^^ー^ネ^^^^(^@^X^p^^?^ク^ミp???</-----------------------------------------------------------^^^0^H^`^x^^ィ^タ^リ^^ ^ ^ 48 p??ーX ^p ^ ^? ^ク ^ミ ^ ^ ^ ^0 ^H ^` ^x ^ ^ィ ^タ ^リ p?? /-------------- ^ ^ p??X ^p p??ミ+/------------------------------------------ヲ ヲ +/------------------------------------------ク    p*/=======マヤハセカマソェヘ釋ハヤエカヤサーソ?===========ヲリQ/================================================================================Xヲ/ク ^8^P^h^?^^ー^ネ^p??ヲ$?ヒ??O?+??ケ??I?ノ/ス盪ケヒオテ? hOwner オテユ篋ヤサーソトエーソレオトセ莖 pidlRoot ヨクマ耘」ヘ鏸ッタタオトラ鐱マテ豬トホトシ?シミオトキ鈆ミア pszDisplayName モテモレア」エ贊テサァヒ。ヤトホトシ?シミオトマヤハセテ遧トサコウ衂 lpszTitle 莟タタカヤサーソトア? ulFlags セィ莟タタハイテエオトア?セ(シ鋧ツ) lpfn オアハツシ?キ「ノ摠アカヤサーソテオトサリオッハ?オトオリヨキ.ソノスォヒ?雜ィホェNULL lparam ネィメ蠱ヒサリオッハ?,ヤェエォオンクリオッハ?オトヨオ iImage As Long ア」エ賤。ホトシ?シミモウマ?オトサコウ衂lFlagsイホハ?(シ鋧ツ:)]Dョ-スハミ淸ッタタホトシ?マオヘウホトシ?シミ]Dョク-(タ﨧テユ篋オヌソヨニモテサァメヌヤレヘマチレセモオトモカアミ]Dョ-ヤレム。ヤヤサーヨミマヤハセラエフャタク]Dョ-キオサリホトシ?マオヘウラ賺ネ]Dョ -ヤハミ淸ッタタシニヒ羹褜Dョ H-ヤハミ橆ホタタエ。サ昀トシ?シミQ/--------------------------------------------------------------------------------]!ラヨフQ/--------------------------------------------------------------------------------ィ ャ ャ' ャ e 'd?? ャ 'k??i??]H  '  ' i??ーホトシ?シミム。ヤヤサーソ コッハ?:SaveFileイホハ?:Title ノ靹テカヤサーソトア?ゥ. hWnd オテエヒコッハ?オトHWND. FolderID SmBrowFolderテカセル(トャネマ:ホメオトオ酘ヤ).キオサリヨオ:String ホトシ?シミツキセカ.タ?ラモ」コヲ `]] ]8]P]p]]? 'ャ?ャ$ $ \'  r9 $'ニ rマ ニマ $ト  !コ!エ9k?? 6 $ \9 ャ ャ$ 9d??ーカ ヌ?。ヤトシ?シミ:ャ$ 9k???$ 9q??h $'セ/キオサリヒ。オトホトシ?シミツキセカ セマ マ$シ  ャ$ ャ $ ワ' $ ゙ャ$ 2カ\G カ\'j 'd??ーカ'k???i??ホトシ?ア」エ豸ヤサーソ コッハ?:SaveFileイホハ?:WinHwnd オテエヒコッハ?オトHWND BoxLabel ノ靹テカヤサーソトア?ゥ. StartPath ノ靹テウシサッツキセカ. FilterStr ホトシ?ケ?ツヒ. Flag ア?セ.(イホソシMSDN)キオサリヨオ:String ホトシ?テ?タ?ラモ」コヲョッ カ*.*|*.*カカク]ク]ミ]](]@]ャXノ $$ ゙ャ $ャ$ 2カ\G $カ\'$j $ 4 2 $ ~カ 4!6'$k??p d??h 4!6'$k??P &$ ゙ャカ*.*|*.*'.k?? &カ|$8',? メ?ャ , . メ$, :'.?ヌネ 3/-------------------------------------------------- ハ 9T 4!V9V "9x $9v .9fャ9l : :9~ 0ャ$\9n 0ャ 9p5n9r 09t ハ9R (9\q?? ハ$ネ'* * ハ!n ハ!p$ ワ' d??? カ' k?? i?? ホトシ?エェカヤサーソ コッハ?:OpenFileイホハ?:WinHwnd オテエヒコッハ?オトHWND BoxLabel ノ靹テカヤサーソトア?ゥ. StartPath ノ靹テウシサッツキセカ. FilterStr ホトシ?ケ?ツヒ. Flag ア?セ.(イホソシMSDN)キオサリヨオ:String ホトシ?テ?タ?ラモ」コヲョッ カ*.*|*.*カカp]p]]ィ]]]ャノ $$ ゙ャ $ャ$ 2カ\G $カ\'$j $ 4 2 $ ~カ StartPath = App.Pathk??H d??@  StartPath = App.Pathk?? &$ ゙ャカ*.*|*.*'.k??カ'. &カ|$8',? メ?ャ , . メ$, :'.?ヌ ハ 9T! .hInstance = App.hInstance "9x $9v .9fャ9l : :9~ 0ャ$\9n 0ャ 9p5n9r 09t ハ9R (9\q??ネ ハ$ホ'* * ハ!n ハ!p$ ワ'< <ャャ <ャ$ャ $'<d??Xカ'<k??Hi??@ ムユノォカヤサーソ コッハ?:GetColorイホハ?:キオサリヨオ:Long,モテサァヒ。ヤトムユノォ.タ?ラモ」コ(]]?]タ ミ 9T 4!V9V @ D$B9Zャ9\ ミ9Rq??P ミ$P'* * ミ!X'>d?? ャ'>k??i??マヤハセモウノ莽酩?カッニヤサーソコッハ?:ConnectDisk'イホハ?:hWnd オテエヒコッハ?オトエーソレHWND.(ME.HWN)キオサリヨオ:=0,ウノケヲ,<>0,ハァーワ.タ?ラモ」コ]X r$ r $メ'*d?? ャ $メ'*k?? *'Fi??マヤハセモウノ莽邏。サ巐ヤサーソコッハ?:ConnectPrint'イホハ?:hWnd オテエヒコッハ?オトエーソレHWND.(ME.HWN)キオサリヨオ:=0,ウノケヲ,<>0,ハァーワ.タ?ラモ」コp]ミ r$ r $メ'*d??ャ $メ'*k??i??カマソェモウノ莽酩?カッニヤサーソコッハ?:DisconnectDisk'イホハ?:hWnd オテエヒコッハ?オトエーソレHWND.(ME.HWN)キオサリヨオ:=0,ウノケヲ,<>0,ハァーワ.タ?ラモ」コ]H r$ r $レ'*d??ャ $レ'*k??i??リカマソェモウノ莽邏。サ彧リサーソコッハ?:DisconnectPrint'イホハ?:hWnd オテエヒコッハ?オトエーソレHWND.(ME.HWN)キオサリヨオ:=0,ウノケヲ,<>0,ハァーワ.タ?ラモ」コ`]タ r$ r $レ'*d??ャ $レ'*k??ミi??ネラヨフ衽。ヤヤサーソ コッハ?:GetFont*イホハ?:WinHwnd オテエヒコッハ?オトエーソレHWND.(ME.HWN)キオサリヨオ:SmFontAttr ス盪ケア菽ソ.タ?ラモ」コ" Dim mDialog As New SmDialog" Dim mFontInfo As SmFontAttr+ mFontInfo = mDialog.GetFont(Me.hWnd) Set mDialog = Nothingリ]@]X]x P ! R$B9 !9 !9 !9q?? リ 4!V9V $G 9Tj N 8 < D 9\t !$G !ャ 9、j !G5ェ @ 9ェj !$G !9ヲj リ9R P$T9「q??  リ$'* * P! D$B (t ! ! :ャ $ ワ (リ リ5、ャ  (H キオサリラヨフ蟠。 !5ェ @ (H キオサリハヌ/キレフ5ェ > (H ハヌ/キアフ P! (H ハヌ/キツサョマ゚ P! (5ヲ (????q??k??リ 'Ni??ネホトシ?エェ.(エ、タタホトシ?ケヲトワ) コッハ?:BrowFileAイホハ?:Pattern ホトシ?タ獎ヘラヨキ逸ョ,StarPath ソェハシツキセカ,IsBrow ハヌキ嵭ノヤ、タタ&キオサリヨオ:[ネキカィ] ホトシ?ツキセカ.[ネ。マ猤 ソユラヨキ逸ョfタ?:Me.Caption =FileBrow.BrowFile ("ヘシニャホトシ?|*.JPG;*.GIF;*.BMP|テスフ衾トシ?|*.DAT;*.MPG;*.SWF;*.MP3;*.MP2")ヲタ??トPublic Function BrowFile(Optional Pattern As String = "*,*|*.*",' Optional StarPath As String = "C:\",' Optional IsBrow As Boolean = True) As String On Error Resume Next: If Len(Trim$(Pattern)) = 0 Then Pattern = "*.*|*.*" P_FilePart = Pattern?? P_StarPath = StarPathx? P_IsBrow = IsBrow FrmBrowFile.Show 1 BrowFile = P_FullFileName End Function' 'マヤハセヘマチレセモ'コッハ?:ShowNetWork*'イホハ?:FrmCap エーソレア??Labction フ睫セア?ゥテ?/'キオサリヨオ:[ネキカィ] ヒ。シニヒ羹愑﨤ニ.[ネ。マ猤 ソユラヨキ逸ョ.'タ?:ヲス?Public Function ShowNetWork(Optional FrmCap As String = "ヘマチレセモ",' Optional Labction As String = "ム。ヤニヒ羹愑﨤ニ.") As String ShowLan.Hide ShowLan.Caption = FrmCap& ShowLan.LabNNCaption = Labction???? ShowLan.Show 1# ShowNetWork = P_NetReturnVal?? End Function?? !#ネ。イサエキセカオトホトシ?テ﨤ニ@Public Function getNoPathFileName(sFileName As String) As String Dim i As Integer( If sFileName = "" Then Exit Function??N i = InStrRev(sFileName, "\") 'ネ。sFileNameヨミラ靃メテ豬ト。ョ\。ッオトホサヨテ」ャエモ1ソェハシ???? If i = 0 Then Exit FunctionQ getNoPathFileName = Mid(sFileName, i + 1) 'スリネ。ラヨキ逸ョ」ャエモイホハ?ホサヨテソェハシオスラ鋓 End Function????????MカAttribute VB_Name = "fileDialog" Option Explicit ''カィメ袵サクォセヨア菽ソ,モテモレア」エ贐ヨフ蠏トクヨハヤ Pubh Type @SmFont゙  ワAs 「SOg 'Cテ#Size #Integer!#エ。%Bod$Boolean$ 'ハヌキコレフ%ItaOM(ミアU?nderLin;マツサョマ゚テ?〇keou< Color Long WinHw6n2 E♀ Dim M_Get∴遠''**マオヘウウ」チソ?&?サriva?Const SWP_NOOWNE?RZORDER? &H200HIDEWINDOWB 8 NOACT?IVATE 1 (MOV2?REDRAトUPOS潛TIONホ1モ クSIZ?モネ@4QPSHOWH@47RESOURCETYPE_DISKA 'ヘ鄲ヌ?カッニ ハ ?PRINT 2テ @エ。サ兤ヨ/gyO ヘNoErr 「= ?CSIDL_DESKTOP"TPROGR8AMS」- テCO?NTROLc3sケBERcホ.PPONALb 5F?AVORITE 6STARTU?7SRECEd0?ENDTOb93BITBUC4KEC9AヤaME4NU" B1DI眤TORYbッjテ$織RIV11 タNETWOR膤姉テテ`HOODC エ6F ;#-1t6TEMPL烙、ョ6LF_PFACEdr3nM?AX_PATHタ26oPF_INI@TTOLOGbT?UCテ-40&n` IXEDPIT CHONLテ(400REFFECTPITALIC_チ}?pヲBOLハD1ォCFー E」[8?アNOSタCRIPTS臺?Cー!SCALBLEf!@櫓ENヌo%F_aQ(HELS54マF_4BOr(ミ Or  )櫻゚L !s ーOSECOXLORアuモ~l炬u\ct蛯?テhーwO\wn焜ーャIrance騷Srgb@Resultッl?pCustb~sム??冬」flag?lQDatalpfnHooklpTempl3烟羽 Gи飽PILENAME?苳L?s h?・lpstrFxilts=o?O5nMax1ォ nI0凅ッソツ?。ミ fitlソー オC[ Init0イD?i寵゚タ?t?!?eOffse2'4ッGExtens!ケタ,.「 Def?Pn チ(ム(2 ?(e('沂/= >ト^ネ+fHeigh? lfWidthッ!lfEs?capemenoム`Oria「ヘNA'P?メlfHトytve9 づl?フk(eOuツBフCh8arS3ュPreciョlipOヨ ?Qu@マtyスPitchAndFamilCタFace\レ*? (}:H4ヌ8Ze0/Zs /Z6 hdcチ?lpLog%モロ9瀛Poin歔??b?^ヌ\シ>3"@3s?[ribU7p`szSty櫑ムn1"゚? MIS SING_遂GN@ァToDQrMinチキ?Long nSizeMax As ネEnd Type '/- Private> SH@ITEMID喞bコabID(?&Bytャ D!BLIST芭k?d5] ャDeclare Function\GetPathFromIDList Lib "shell32.dll" Ali@as "SHA8" _Х」(ByVal Pid&l’?, psz>rtringr??添SpecialFolde灑Locag]・NhwndOwne侔?n^F:t?M?n@bSaveFileNamemcomdlgLmL @l(pOpenf?nタサOPENFILENAME荏ublic ?N`?A#I *リNCHOOSECOLOR?Choo?seColorB}テcチチr uWNetConneJc甅D Oogm|prヅト\I⑥テ\dNw。挨? n テFONT^Font(チ! ' '/=マヤハセカマソェヘ釋ハヤ?エカヤサーソ???Disc????ソ"トュア8Sub CoTaskMemFrbe$holeナg$pv?X"SHBroタwseFor艱クィ臭?7艦ェ(lPテInfo!BRO?WSEINFO()g?'#カho髱cpa?エRoote、sツz?playb 6S「オ」l?クTit le ulFlagsk lpfnA,ParamkipImag γ ゚ス盪ケヒオテ?Kマhテキオテユ篋?Zオトエーソレオトセ莖ヒ&ヨクママ」ヘ鏸ッタタオトラ鐱マテオトホトシ?シミオトキ鈆ミアフ モテモレア」エ贊テサァヒ?ム。ヤ?テオトサコウ衂k。 ア?窿{ セィ。ハイテエオトアヨセ(シ鋧ツ)m  オアハツシ??キ「ノ摠ア、??リオッハ?オトオリヨキ.ソノスォヒ?カィホェNULLュイネィメチヒサエ,ヤ?ェエォオンク?0オトヨオサ; ムモウマ`tイホハr?r :)'7ミWー隠IF_RETURNONLYFSDIRS = &H12'スハミ?!QマオヘウモF_DミUGOBELOWDOMAIN2'タ禔S$ヨオヌソヨニqメヌヤレヘマチレセモオトモシカアミF_STATUSThEXT4 C'Lヤレム!ヨミ?ラ`エフャタク_UFSANCESTOd8q'キオサリ! ラ賺ネ?F_モ>FORCOMPUTERツ1000 '5シニヒ サ朎リPRIN ナ2チモモホタタタエ。サ氿沚 DiLm 5NSmムAttr 'ラヨ|フ裃ケ_ > Wニイ`湘]牀ue(wIdツツInt0egerhWム If < 2 ThdenウR K@0。Else71O?聴@。wソ+ 4、猯If > チTE タA Repturnq競ヒsX ツ 1dwRtJ\D= sOr :R~SAミp  f'c%ナ2ソ AK:7EッaB:トノ?ヨテq5ソQヌゥニ.q hW`苑aエヒ」OHWNタレ'3ID Sm!uテカセル(ト@ャネマ:ホメ審トヤ)?ヨオ:?n C ツキセカアタタ?ラモ」コミSウqo#(Opム」ーミ?,鬼R Hfサ・O?l?メミ P{??B?iRIロ1?;璢Ak,ヤuw ミッF? チ8 : 1= A= s$(255, ?Chr$(0)?c With B吠チイ.4? 。叱 nFolder = GetXValue(Fid)祢f SH?Special廰ocat@ion(Byd タhwnd, ェ@, IDL)カNoError Thenィ?.piタdlRoot#*.mkid.cb"End If.pszDisp?layName4String$(MAX_PATH, キ2ケLen(Title) ネ> 0 ?l*'& Chr$?0Else) "ヌ?。ヤトシ?シミ8:" ? .uタlFlags8?ゥReturnType(8【Withh P逗SHBrowseFDorセ(Bi'/キオサリヒ。オトAツキセカ?PathFrトom?ッistヨ+{k) Fテ$?L`eft$( tn?\FトI) - 1№#タtタRighタ @Trim$(ニ), <> "\レ" ヌ&A0?タGC"FチGd""ツト[ARFunbcゥ '?AHア」エ豸ヤサーソコッハ?:S@aveFil@x'┫ホタWinHウ÷オテエヒ タオトHWND@ @ BoxLabel ノ靹テCオトア?ゥ.チStartチ^タウシサッ’Q@ter@S A%ケ8?ツヒ@? ア?セ.(イホソ?シMSDN?X'+8ヨオ:タ セテタ?ラモ」コ Public ナ= 7(E5As ?Long, _a%禿 ョOp?al'Cタd= ""ソo?n? ゚gG$`?.*|`_@叩!l ?Varian?H4 Or? &H20)。C!Dim Rca。#%pOpenf`Cn瘢タ OPENFILENAMEFstr1( ッ i Const チ唯uff?r_@ GTHタ]256 aOn !罘Resu燼Ne|xteタm彙m?)?n敝r緖&タg駲?Di`」ヲ, vb ectory +?Hiddezn。セ"テ|!?g = App.チc、au?#スhュァニE?~=+ス"1?。ァ。1。aplit ゚ls`, "|"ツ埖ョ i?ヌo UBond(「。ツ& チ1(i)?チvbNull0Chara%7'/゙-,テ 崖。ナ「+.wn?мナI澂anc∵A/ホh'?ptr頻N碆Init?タ_LsヤキnsIPndexタ1\DfExq:氓 タ? 4, 閔?nMaxッ6ーkマャ。ア~trG5>FuctxSizム ア*レ? |.f$=K?s? ?I塲\ム?ミ0 LソH靖c|:ァ ,;%? 9殼要 p 甓mエェサvテマソvソvソvソvソv玽ui$=ソvrbr%ソv?ソvソvケvナ ソvソv"B?ソvpfナpソvヨ?ヌRユセォ@艾ソvソoヲ2Pケv8ソvイコ。-ソvコ)1rソvm?廼ソvAUソvソv奸ソvrタゥソvf ラfソvq8#ーFソv= VO"\2ャPケpV$(8ソvセv'「マ@Gマvイ ウ=3?Aネ0ヨ #゚vRp゚v、ワユrチッwr?ッwッw1チbッwョwヒ/t /tnd伸A?0.6s#?tQUea??t談?tx静g???a  ?ta0?t0?襍.lpstrFile = String(MAX_Buffer_LENGTH, 0) .nM axタ、 - 1RカTitタレ#SO?uctSizュLen(p Openfスname」flags ムF?End 晋ith RcリGet:ヌN$If ?Then?}?Left?m, 開?O!?Mid(, ?1, Inq( Chr(0))C〓 Else秋"? sIf ?Functio?^' 'ムユノォ@カヤサーソコッハ?:??Coldorタイホタタキオサリヨオ:Long,モテサァヒ?。ヤト.タタ?ラモ」コ Public E (how?ner As チニ)?DimチSEpChoosec"A CHOOS@ECOLORC?ustom?(BリByt@チs A ?ィ.hwndO? = テ$ネInstanc$App.詆ナlp羨?dConv(H", vbUnico棈Q?軒?t鉷ヲA(ノ7B 磁@<ナ_@ヲノ .rgbRepsultチ#ネ豪 -"vWGマヤハセモウノ莽酩?0カッニ I`#neタctDisk`DbIhW`オテエヒaMオトエーソレHWND.(ME.@'、M=0,ウノケヲ,<>0?ハァーワMH 瀁[al ?%M\N?'IsNumeridc() |ジNetト ?gDialogB, RESOURCETY?PE_DISK2;?0カ%!v 3h?RcアxI1エモ。サⅨ1Pタク`>?11'敷b ?6 ? ??PR鍼NTソ1nト9ュ1ネテト1ィカマソェケ`タ_クconaaan?)ホsィ ゚/゚/ndソ0ッy ソ0ソ0 ア^=ソ0?マヤkノs/ケ?リケl7ッ/oHoH@ooH゙ ッ/uリ゚/dッH嵩?゚/゚/ッH?H゙QKフD゚/^カH゚/ニ3ラ8ヨフ螻??pgFoBn芳WinH?w 'SmチAttr ス盪ケア鞴チソケ_'@ !。m?。New S瀁IInfo歛ヌG= ツ.$ (Me.Ak0D1uSetUNo?hーアソナケ終 ? ト{q 1 s?FONTpLo稟5LOG ァエg.lfFa|ce。ッタ 拶.〟アa薩romョ?C PIta。?= コS?Underクlinア L??タ ikeOut轢 :ou'Q[Q?3涼cニ淆ソマ?SQレ:、 ハヲ、m衒CF_BO TH + INITT整STRUCTEFFECTSテNOSC?RIPTSEL\: メユ iPoi?%モ^ * 1ラェGpzBod「I ト.nqTypネ?+ BOLD_q(?。双 7頼カu ーェキ<.lタoオ斉。?ウ R?ル3= VタarPtr(54ク?゚#2TW8ナク<?x、ソ」Qハ4 &P `砺ヨ?.g8ナc?;猝NullChar嶺iエ With pChooseFopnt ー TInfo. Size = .iPoint/ 10 f'キオサリラ?ヨフ蟠。ャ?odU(.ncType And BOLD_FO?NTTYPE)cVハヌ/キレフWItalicZITALIC% .'?ミア?Un@derLin<(pLog〆.lfM l? ? ?マ ツサョマ゚弋Stタrikeouゞ*! Out)Color.rgbs Eァ トIfヌGet2?| チFunction '?ホトシ?エェ.(エ、タBタチケヲトワ?''コッハ?:Bro wFileタ イホタPattern  タ獎ヘラヨキ逸ョ,Star?h ソェハシ?ツキセカ,Is ハヌキ嵭ノタチ蹟オ:[`ネキカィ] .[ネ。マ猤 ソユ タ?:Me?Capチ* = チ. ("ヘシニャ?|*.JPG;*.GIF@BMP|テスフ「蜆DATMDSWMP3B2b"A9Pub#? (Oal ?HAs {ngタT"*,*タ*", ~_@+トイHJC:\fTタBoolean?!Tru8e)  On Err?HRes?ume Nex??トIf Len?(Trim$())? 0 TheO= "*.」 ァ P_。0Partゥ=?&cCノ= GFrm%0.Show 1g!_FullqANamヾL[チ'マヤハセヘマpチレセモ?Z NタetWorka?? M エーソレア???Labbd フ睫セア?0ゥテ?ォW ヒ。シニヒ羹瓏テ﨤ニ更"タXmLhヌL??"?・戰 :&M* ム。tヤ"ォF$BLタan.Hida*ャ=? C,@NN?ヌ% );??`ReturnVal??ネ。イネサエ?ト痞?β?getNo?SrhE(s%㌶/!Dim iIntger 瀑ヌ?b"テdExit KィェAi?In???vg, "\/'ネ。F ヨミラ靃メテ豬ト。ョ\。ッサヨテ爛ャエモ1aゥga ?sQn Midル i + 1ムl'スクリネ。」V10ホ@‰オスラ鋓= ヤー???? w-Sィメ??カ????????????????????????x??ME??????????゚?????????????????????????????????????????????? ??????????????????????????????????????????????????????????????????????????????(?リ "0 X`hp? ????" x????ィ?ークタ( "( P`p4ミ? :? Z8? 8? ミ? V$8 `p? ????" x?????ク タ ミ (リ? ????B ? ?(?0? ????8P$h ?ク? ????B タ? ネ リ ( @Ph p x ? ????"?ィ タ? ????B  ( 0 ? ????B 8 ?@ H `  ?   ? ? ????" ィ ?ー ?ク  タ ミ     @ H  P ` ????p ]$カmark_BuZhenStart`]$カカ狢クア荳?閒晴モア?ゥ]$ャ0]@ニ縟Cance](ヨユオ????x $ 7P!タ!' 7P!タ!Nャ '????  7タ!シ!ワ ニ'q??i??ク.スォwordヨミオトシヌツシカチネ?istboxヨミ] 8P ? メ?ャ メ毅?C@5ミャ 'クホ A@ ? ?ャ ニnW????  メャ  ニ   $%タ%シ$ ク ;セHelp? ?ネ????? メ?ネィ???q??o??h(カヤListboxオトオレメサチミナナミナ]ミ ? メ?ャ5ミャ メャ メャ;セ? メ?ネ_14q??po??hA1ListBoxヨミオトトレネンラェオスTextヨミ」ャヌーフ睫ヌノ靹テTextBoxオトTag]p !ョャG|j ? エ?5コ エ$FカTextBox !ョ エ!タ %セ エ(dk????ヌq??o??キir] ]8]Ph]?]? ' !ョ ニャ ' キ !ミャ? メ? ニャャ8 ヌ蠢ユオレメサミミ メ   $%タ%シB@|'b--? メ?ネ@ !A@「 !ョ B@「|??pk??h    $%タ%シ!タB@HG.Delete h コ!~B@|f !ョ B@「jP4 For j = LstObj.ListIndex + 1 To LstObj.ListCountb ^T Set tmpRange = ThisDocument.Bookmarks("mark_BuZhen").Range.Rows(j + 1).Rangeホサハアフ矜1 ReNameFldStatusInRange tmpRange, j + 1, j Next jP ReNameFldStatusInRange ThisDocument.Bookmarks("mark_BuZhen").Range, j + 1, jカ mark_BuZhen $%P!タA@、メムウャ A@ ^カo??タ](]H]`ャ'ヲ? カ? ?!シ\カ カ ヲャ 'ヲb5ト'  ヲャ ャャ $ィ9トq???ヌo??x]]](カイケユ?トレネン_イケユ?マ'ョ ェ ョカ$B'イ イャ イカ_ャ $ワ'イ イX'ーネ??ネキ ェ ー ャ$B'ィi??@@]ィタ シ'セ$Jィツ メ カaィト セャ 'セ????ィニ セ ク コ'セ??ィネ セャGxj??ィハ セ????ィフ メャ 'メ????ィホkィミケィメ セ'エ??ィヤ メ'カ????i??`0 $! カ1 $B@D% ス箋?ヒ」サ、k??o??p $!  Rカ1ムTキムV $B@P??k??ミi??ネー]? エ? !コ???? エ$FカTextBox????カ エ(d????k??h?ヌ`i??X0]ク]リ B@ !ミャ 'クH? エ? !コ エ$FカTextBox^???? エ!d ク エ!タ ,セ??k??ク?ヌー A@o??????????キAttribute VB_Name = "modBuZheng" Public Const RecordStarkM As イS?ngl"_pEBtxEndtカ狢クア荳?閒晴モア?ゥ 5d9@????q??o??xX ??A@rエ!do??X F!dカカクスシ?タ獎ヘモェソユ」ャヌ?。ヤ?..A@65キ'Dz??k?? <!dカカクスシ?テ﨤ニモェソユ」ャヌ?菠?..A@6????キ'Dz??クk??ーi??ィ]8]P]h DキG|jA@コ L!TキG L!'Zj?? N!Tキ?? N!'Z ??!:!d$'?? $|'?? : 'J ??!:!d$~カ ??!:!`キ5ョ ??!:!dカ ??!:!dカnone ??!:!dカ ホトシ?メムフ晴モ14 ??!:!d JA@Pk??X F!d <!d Z A@Qエヒエヲミ靨ェシモチ楨箏トイホハ?d??カ ホトシ?イサエ贇レ」。 8カエ﨔睫セA@6??A@ツ|??k??リd??ミ ??!L!'Z F!d <!d ZA@モミホ。k??A@ A@Rセ"??キ ??!!ミャ ??!, mFieldカnone ??!:(d+ A@A@ツ ClearTxtValuefujia Me.Frame1|??」゙ b! 8カA@6o??リ? ??!!ミャ キ ??!リ(p ??!!ョャキ ??!リ(pk??xd??pキ ??!リ(pk??Xo??Pタ Me.txtFilePath.Text = "" ??!< ??!F!d9dC@シャ9>5d9@q??リo??ミ ??!A@VA@ホo??ィ@ ??!!ョャキ ??!ヨ(pd??pキ ??!ヨ(pk??Xo??P?A@コ ??!!ョャ ??!%セA@X ??!A@Z x!A@\A@A@ハA@A@ツo??ミタA@コ ??!ャ `A@^A@ーA@ホA@ツo?? F!dカカクスシ?タ獎ヘモェソユ」ャヌ?。ヤ?..A@6|??@k??8 <!dカカクスシ?テ﨤ニモェソユ」ャヌ?菠?..A@6|??k?? ??!:!dカ x!:!`キカホトシ?ツキセカホェソユ」。 カエ﨔睫セA@6|??k??A@コ ` ??!!ョャ  ??! ??!A@bA@ホA@ツo??@@A@コ ??!ャ `A@^A@ーA@ホA@ツo??? dキ|??リk??ミ ??!!ョャG|j ??! ??!A@f ??!!ョャ ??!%セカヨスシ?キ ??!L(Tキ ??!N(Td??@キ ??!L(Tキ ??!N(Tカ ホトシ?メムフ晴モ ??!:(dk??A@A@ーA@ホo??リタ ??!5ミャキ ??!メ(pキ ??!ヤ(p|??k???5ョャキ ??!メ(pキ ??!ヤ(p5ョ5ミャ eキ ??!ヤ(pキ ??!メ(p5ョャ eキ ??!メ(pキ ??!ヤ(pd??キ ??!メ(pキ ??!ヤ(pk??クq??ーo??ィ N!Tキキ j(`キ :(`キ ??!l(`k??Xo??P@ L!Tキキ j(`キ :(`キ ??!l(`k??o???]タ ゙ ??!$h'ワ スォエーソレノ靜ェラワヤレラ鏞ー$ cmbitem.AddItem "ラィタ逸惕﨔ッヘミハ?カニ萢鄕スシ? FB@ ??!A@pA@ ??.ョo??リー.ョA@ツo??R'SetWindowPos lngDeskTopHandle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE????ク????SカAttribute VB_Name = "frmAddFujian" 沓as?{11F92724-3428-4A73-B1AA-5FA600A46E3A}{A7CA4390-2E4945-9C62-E7236255322D} dGlobal惨pacAoFalse 海?reatablPredeclaIdラTru BタExpose0Template DerivCu@stomiz汽 P Sub ?ーBrowser_Click() Dim oriFile!セAs Sネng = OpenI(0If <> "" Then0Me.txtPath.T8ext?ц+ End IfテWit|h ト ?A&A.SetFocusAlStar0!Leng?= =(ト.AA AタH 鮫CancelKLUnloLadタ' ub?U Function CheckEm@pty() UB`ooleaトE?McタmbitemナC舟sgBox "クスシ?タ獎ヘモェソユ」ャヌ?。ヤ?..?@ャCチヌニ?Ex?t%FA;EZ"gCY「#テ﨤ニ?ハネ?#c)・'"1*?aWConfirbmoWDes甄A,S閒VチZftZbB竓M"*bZ ??瓠`ckDocテタOpA?Button _ZhiJ??Vクalu痺aテfhウajCaB 3 Dタ ?z #。?ク  ツ?= getNo+『Ap(py?L(ニ1hナ6= strr8& ナg`*D琶rメ c弘r?.Visi(イソB.' ?  A熕?none" 9ホトシ?メムフ?シモヘ?a?Coフpyヘ發, ト" vナa・縅ew ノi? z, ??E<'エヒエヲミメェシモチ楨磧オトイホハ?gE7゙%M?チイサエ贇レ」。", vbCritical, "エ暲ホ睫セ闢A?ohea jh`埴? ゚6an.?,迴DWxtノcmdDelCtrlウTxtTo?NewList /,,@ 。p\10klepctedチ,FCount - 1セ)ハ[ーU-ds""(モRefreshタOcxTre`?ユV'ムCgr@ "Hモ `Fr@?3 l:$Err.(cri?<ーq?「P;s'?6/ > 0フ9タ .Enア?酉 1マtInネdex?-1ワ= t貰1 '?マハqE9k"?0o@禿緒?」。 ユy 辜汨?汨 ?a汨Z 汨ネ、Pイ%??AN?pModfy34「ェZo$'??>=$e.q3ifyッ$m?d? x" ! `/?諌?Aロ?。_V8ヌ 1NA「 , 2タタRecordウ髻n )ヤ.LWLマ ソE カEVc!own?h_iReguミミUpD?チ!オ, 1, MarkBody蹌 ーVcmp?&$a1 >I タヒ ?ーDOクシヒOクOク!0サl?Oカana念カ$蛄?1ソOカKカ_F?0ニ?ア糾!ノH欄カェ3 オ a。ツキセカメネテE 絈aaャ?アソ オ @2ーウockDoc  RegularModifyFormFields MarkBodyfujia & Me.Lis tBox1 Index + 1,チ4FrameJシcmdエefyPCtrl$L鮻nd Sub Privat e 2Up_C@lick()2Unl ウiエUpD?wn ? -? サA~cm0ーLm NIf Quit?d = Truタe Then2?pExitピzInf?ォ=c?  @ToText/ヒテ.(?, 3)@."ヨスシ?"フ. OptionButton_ZhiJian.alタ9?チ6M D? z Fals鋹C EFムM、|ハ&txtFilタePath.チP=ホトシ?メムフ?シモ"D%ネg??e>lGョ禅エノ ?Wi?゚C0 ?」 ャ ?竫?.ノ8a¨ ! }Gw持#jのClbl&oVi|si@V/Vノs*butBrowse?.メチaW゚譎{_憎イ  U #Initi alize?Dim lngDeskTopHandle As Lo ng3(゙= FindW0ow(vbNullStrネinggCaメadz#' スォエーソレノ靜ェラワヤ レラ鏞ー'SDet」Pos, HWND_TOPMOST, 0(SWP_NOM?OVE Or モ0SIZEU '4cmbite@m.AddIp "ラィタ逸惕?﨔ッヘミハ髞^チ^ニ萢鄕ApRecordTo?TwS189b C?urFrm M?nh({思QueryClose(Cancel!Intタeger, 1這XコNoth`S ?pヤt????x-S??カ????????????????????????x??ME??????????゚????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????PSP????S????S????S????"+/BK C TxtToNewList Me.Frr ?,AA?V1RefreshタOcxTre?pチO?Bad   A?f。dlhCan8celヌh・dCplearBVlue!リ0o(/4Recor=チ. ?" dD8ownZ」TdItフem!E, `3$2 ?四「Inde - ?"#<甌mUp!#?ラ@Modify Dim ctl As ControcトXCur?I@ntegerc F?or Each"ヤInヌ9.dsFQ@抖ypBョ( )AョAッ?U" Or チCombo「? rim t「 クaケヒミAキマ﨨サヤハtミコ。?ク% .?SetFocuHナォスヲィセa?・タNテーg#WithI#= w"??  "meFッrFB (U ,2ag!pラ Q? G Vッ3=タ!1-?+仝(L?tm-0 マ0 OGム1Fld= * Sing le#??mFie`ldCouY?i碣01 ToB廢vT&タ喫sタh?ument.R痣(Th(Book?marks("a_BuZ燻Sta0rt")`nd,Xクスシ?ヌオ・フ晴モア鶚ヌゥV2).ヲsγ ヨ+ i),?=,0。  i ? 拇UpoォKマW0qヌW-ラW%lママX%'{' +%[カ'Q 婪゚ ェU QT侒A91)A~蚌!ンm胙?]efyア_?? Iaイアッ.Q1?D"B,S+zウ1タ?p?叛ム5S。k?yU5T5 8r0P,en#? ソ?  < #フE0ム? |゚リマqM_ ゚ロ>  ?*ラ゚エ「!ム?mP8O5 ャマ iアA' i,?O+ WU+?pU5#!>=N 0ー?ィ Gゥ餡 A) 湜アャム6ョア () If Me.ListBox1@Count > 0 T8henィ彡mdDel.Enabled = TrueB露nddexP-1 QFalsREnd fbE < 8  Sub Private  UserForm_Ini?tializeDim lngDeskTopHandle As 0LongG= FindW?ow(vbNullS@tring,?Cタaption┰!' スォエーソレノ靜ェラワヤレラ鏞ー Set?PosD, HWND_TOPM@OST, 0SWP_NOMOV E Or SI ZE?RecodToD c ボ0Ctrlテタ$ C?urFrm@tM@i拔QueryClose(CancelAPInteger, ModツUDЖJNoth@Qテ LockDoc?Dj(ヲJ p d-S??カ????????L??粐?羸、轄r・フニ|憎モCァ殞ムd促~キUョL\PMョVH揚nメt????????????x txtCheck, 1, 0, MSForms, TextBoxtxtXml, 0, 1, MSForms, TextBox~キUョL\PMョVH揚nメt粐?羸、轄r・フニ??ME??????????゚??0?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????S"????S????S"????s????>"????L????????L????L????????L???? ????<4??<8??<<????o?? #8クンヘ篆醵。ヤトイルラdヨエミミマ獗ヲオトイルラャヤモマ鍗ソ。「ノセウ?マ鍗ソオネノネ , $B@D.ス箋?ア」サ、 B$Fカ ア狆ュイケユ?トレネンKTA@Hカア狆ュクスシ?KTA@Jカノママツスヌア鵺T LB@Nn??8 Rムl ,ムTキムV $B@Po???A@ZA@\o??タノキカDocument Recovery $%^(` bB@do????????????Attribute VB_Name = "ThisDocument" 沓as?Normal.VGlobal!ェSpaclFalse 「CreatablPre declaId杁ru BExposeTemplateDeriv$Custom izГ?Control¥txtCheck, 1,? 0, MSFs, TextB経x甑 Xml?'Dim strPasswo?rd As S?ムng '-アリミ?オマヨオトコッハ?ケ?ウフクィア」サ、テワツ Sub sDet!(pw") )= @タ End ??ノ靹テクスシ?エ豺ナツキセカ PublicCth(fil`ePathヌ8I?f RightF@Z) <> "\タ" ThenC A!鯣= &チ A$栗fテ@Dirネvbタector軽)チuヘMsg@s "ユメイサオスノ?" タ""IC"」。", vbCritica@y"エ﨔磬ハセ@+I#0タ>ヌ-ノOハケモテミツオトミ霽モCs÷’getAddItems(タネO 'クヘ箚ソオトイルタラ。マ獷?チ タ狆ュイケユタ?トレネン,。4,ノママツスヌア?ab8」@add心omeタ|nga Keyヒ ンヘ?篆醵。ヤidヨエミミマ?モヲ」ャマトソ。「ノセウ? !オネOn Error Resyタ Nh#」ゥ?タUnprot?鹹?*`'ス箋?XQSelC。畢゚。dLb"?、4aShowBu~ZタM`oァ'0F~J#?・fタrmSup.。 #/"/PDType:=wdAl?lowOnlyA汁Field熄蛄:=?=, norイe?y:=テ?` ャ(getAttrib4ヌ`desNodー`oriNod音`attrNamezЯ getNamedItem俵` ャ(SaveXmlFileg` xmlFileName;?FullNameミ杼ャ(createFormXMLTemplateeウ`ャ(getxmlTemplate`txtXml飆`inshツ\` InlineShape薈`errMsg` tmpNodeNameV~ tmpStatus|玽 Application・*`ScreenUpdating! `validateOnParseO`resolveExternals?藾 ャ(GetFlagValueU? RefreshFMヤ` tmpNodeTxthオ` ャ(GetInvNameェ`ャ(DelChr63撒` strFieldNameVユ`tmpRngfホ`RngStartF` ャ(UnlockDocR.`FontU` Superscriptウ港 SubscriptV゙`ャ(LockDoc貌` ャ(UpdateFieldK` DeepSetFont壬`strBeginCa`strEnd玽 tmpRngStart` tmpRngEndハ`RngEnds蓜 SetSupFont{ `RngObj?`sTypeYq` ャ(loadXmlDataヨ荏childNum)チ`LoadUnSuccessedg`Trim@? ャ(GetPropertymナ` SelectNodesgヤ`LengthYト` ャ(addBuzhengNR,`Itemラz` ャ( addFujiannew喚`ャ( EvalueFormFieldボ`ャ(SetPropertyValue輾` PropertyName` PropertyValue」@` ShouldLockj$`ProtectionTypeヲモ`wdNoProtectionュ・`CustomDocumentProperties゙冒ャ(ReNameFldStatusInRange`InRange、歔OldID?`NewID` tmpStatusTextW`ャ(CtrlFormVisibleワl`FormObj?`hide9z`vbCrLfッャ`Number」-` Descriptionセ `vbYesNo拜vbYesa?`ャ(FormHideOrShow=P`ャ(RefreshOcxTreeレ鸛 RefreshTreeェミ` ャ(GetWordObj?`OcxObjzナ` ャ(CloseDocumentカ` CloseModeリ歔Saveddノ` Documentsシ`wdDoNotSaveChangesヤ㌔Quit9ョ` fldYearNameA,` fldMonthName=` fldDateNamek㌔ modDya?ナ`locationInFile!%` beforeChange。` afterChange誌`fldfn閙`fldloヌ`fldbcI~`fldac$~`MarkNameョ`MoveLeftv伝 wdCharacter硝`MoveUpア` InsertRowsヤ`Collapseu` Direction?`wdCollapseStart?|` MoveRightフ鐐 ャ(addFujianニ` FuJianTypeニ總 fujianNamepヨ` fujianAttri`ァ`EFJName `fldTypez蛋MarkBody叉` MarkBodynewd `Existsゾ`RecordStarkMarknew?總 TypeParagraph `TypeText`OwnHelp`fldattri?Enabledロェ`DefaultSortingz?wdSortByLocationPЯ ShowHiddenqs`ャ(addFuJianByXML/P` ャ(delBuzhengNR?`Deleteクx`Rows。U` ャ(delFujian牢`Kill⇔`ャ(getNoPathFileName?` sFileName累` frmBuzhengNR゚ cmbAdd_Clickチ txtFileNamed藾 vbExclamation?` txtLocationi` txtBefChangeVl` txtAftChangeb cmdDelCtrl罹` ャ(TxtToNewListrg`Frame1ケ`ListBox1幎`cmbCancel_Click;冒cmdClear_Click總 ャ(ClearTxtValueE荏 cmdDel_Clickタ` ャ(DelRecord8` cmdDown_ClickI?ャ( ChangeListBoxItemyv` FillRecord.b` ListIndex` CtrlcmUpDown8彖cmdModify_Clickツctl?`Control梓`CurIndexォ港ControlsフK`SetFocus`List*伝Tag&リ`LstIndexン1` CurFldIndex}B`ャ(SingleRecordFormFieldCountI` cmdUp_Click:ノ`ListBox1_Click ` ャ( ListToText1=1` cmdModefyCtrlハ?` ListCount6`cmdUp 疏cmdDown2h` cmdModify`cmdDel?`UserForm_Initialize5c`lngDeskTopHandle駭` vbNullStringョツ`Captionx`ャ(RecordToListBox囈`UserForm_QueryClose`Cancel` fileDialogネ` ョ(!SmFontAttri僴FontName?`FontSize?`FontBodb` FontItalic+」` FontUnderLine]` FontStrikeou` FontColor{h`WinHwnd帖` M_GetFonty-`SWP_NOOWNERZORDERK=`SWP_HIDEWINDOW褜`SWP_NOACTIVATEク` SWP_NOREDRAWケu`SWP_NOREPOSITIONE疏 SWP_NOZORDER?`SWP_SHOWWINDOW?`RESOURCETYPE_DISK i`RESOURCETYPE_PRINT?`NoError製` CSIDL_DESKTOP'1`CSIDL_PROGRAMSコホ`CSIDL_CONTROLS`CSIDL_PRINTERSm藾CSIDL_PERSONALミカ`CSIDL_FAVORITESn?` CSIDL_STARTUPEA` CSIDL_RECENTIン` CSIDL_SENDTOヌm`CSIDL_BITBUCKETヌ`CSIDL_STARTMENUH;`CSIDL_DESKTOPDIRECTORY鱠` CSIDL_DRIVESモ` CSIDL_NETWORKO描 CSIDL_NETHOODxナ` CSIDL_FONTSf.`CSIDL_TEMPLATEShf` LF_FACESIZE`MAX_PATHァ(`CF_INITTOLOGFONTSTRUCT-.`CF_FIXEDPITCHONLYヘ~` CF_EFFECTSホ鸛ITALIC_FONTTYPEャオ` BOLD_FONTTYPE-レ` CF_NOFACESEL-`CF_NOSCRIPTSELリ`CF_PRINTERFONTS `CF_SCALABLEONLYカァ`CF_SCREENFONTS}オ` CF_SHOWHELPムァ`CF_BOTHZ。` CHOOSECOLOR覬` lStructSize/r` hwndOwnerャ?` hInstance ? rgbResult` lpCustColorsゥ`flagso` lCustData'5`lpfnHookー`lpTemplateNameネt` ョ(!OPENFILENAME35` lpstrFilterト`lpstrCustomFilter`nMaxCustFilter僴` nFilterIndexc・` lpstrFileⅢ`nMaxFile準`lpstrFileTitlep4` nMaxFileTitleym`lpstrInitialDirrロ` lpstrTitle?` nFileOffsetI柿nFileExtension9饒 lpstrDefExt神`LOGFONTw `lfHeightヲ鐐lfWidth3總 lfEscapement` lfOrientationj~`lfWeight&`lfItalicKy` lfUnderline。7` lfStrikeOut?` lfCharSet*:`lfOutPrecisionlイ`lfClipPrecision架` lfQuality宣`lfPitchAndFamilyHツ` lfFaceNameメ` CHOOSEFONTンサ`hdce倭 lpLogFont゙ ` iPointSizes?` rgbColors琢` lpszStyle&?` nFontTypeuミ`MISSING_ALIGNMENT4`nSizeMin?'`nSizeMax?`SHITEMIDユ `cbニ\`abID` ITEMIDLISTL㌔mkid`SHGetPathFromIDListK彖Pidlョァ`pszPath` shell32.dll+?SHGetSpecialFolderLocationヒ藾nFolder.エ`GetSaveFileName燦` pOpenfilenamec? comdlg32.dll??ャ(GetOpenFileName]?` pChoosecolor?`WNetConnectionDialog^伝dwType沖`mpr.dll"ワ` pChooseFont魏`WNetDisconnectDialog藾 CoTaskMemFreeロM`pvサ^` ole32.dllネ`SHBrowseForFolder" lPBrowseInfo` BROWSEINFOキY`hownerEm`pidlRootd`pszDisplayNamehr` lpszTitleS餐ulFlags暿`lpfnイカ`lParam?`iImageU濮BIF_RETURNONLYFSDIRS-シ`BIF_DONTGOBELOWDOMAINノb`BIF_STATUSTEXTツi`BIF_RETURNFSANCESTORS老`BIF_BROWSEFORCOMPUTERv゚`BIF_BROWSEFORPRINTERイC`FontInfo}T`GetFolderValueDo`wIdxュI` GetReturnType8玽dwRtn嫣` ャ(GetFoldern訌Title`FolderID`Biィ\`FolderオQ`IDLヌ拜 ReturnFol `Fidm餐ChrK~`ャ(SaveFile}杼BoxLabelヒ7` StartPathモ荏 FilterStr㍼`Flag?`Rc`Fstr1ィ=`Fstr?`MAX_Buffer_LENGTH`vbHiddenT;`Appソt`Path2`Split?` vbNullCharレY`ャ(OpenFile橆`ャ(GetColormW` CustomColor`StrConvx'` vbUnicode` ャ(ConnectDisk_ム` ャ(ConnectPrintr`ャ(DisconnectDiskQレ`ャ(DisconnectPrintョi`ャ(GetFontwZ`pLogFont功` vbFromUnicode0セ`VarPtrbヲ` modVerify?`ャ(validateNumericユ` strFldName`strValueKヘ` vbInformationイn`ャ(validatePostCodeタ拜strErr、玽 ャ(invalidEmail褜`strSub「F`markメ-`dotゥЯャ(validateInputLen!マ`lenghBク` ャ(invalidYearテb` ャ(invalidMonthュ」` ャ(invalidDayt+` ShowForm嚊` frmAddFujian ウ` ャ(NewXmlObj;` ャ(CheckFileName\` tmpFileName」ツ` modBuZhengメ`ャ(RecordStarkMarkYリ` ャ(RecordEndMarkンI`pos1ヤノ`Pos2ユノ`GetRecordCountcム`LstObj:荏ListBox吩`ja`AddItem ` ャ(QueueListト秦 ャ(ListToText?` OcxContainerLW` DelFirstRowサ㌔ RecordCount縵` FirstFldIDwチtmpRangeォ` RemoveItem睆` DecreaseIDsb|`iTotal+`UpdateIDP`sTxtG6`iNewID?`sFlagョo`sID`sTmpャ4`InStrNテ`ne`str1F5`str2G5`lStartカ@`pg`1H`2I`3J`4K`5L`6M`7N`8O`9P`10Z`11Z` modCheckタ`ャ(Cursorタl` PreFldName巣`ャ(pzymニ`?CheckForbidden湯` CheckRangeニァ`tmpArrayr/` Forbidden?`tmpfld寘`txtCheck-V`HighlightColorIndexッ`wdBlue"? HintForbiddenテ8` ?CheckmustSa` mustIFFldsRx` tmpArray1蓜 tmpArray2蓜mustFldsオン`tmpBooloラ`wdRedツコ` ?CheckMutexChk?カ` strMutexChks  DataSource 義 FlagLength8餐fldTxt?`Asc!u`FldObj甯` modUpDown` ャ( RegularUpDown荏MoveStepK` ComPonentBodyヘス`strFieldcオ`Lfor奄` ColumnCount$`ャ( FillFieldsInMarkォI` ChangeStep拜 StartColumn`SelectedY」`FieldStrwハ` arrFieldStrニ+`ャ( DelTail囓`fStartアク`fEnd ロ`TailFlag禛`StrBodyg`` modModify|ェ`ャ( iRegularModifyFormFieldsュン`strCtlTypeNameナ`butBrowser_Click?` oriFileName「` txtFilePathヲq` txtFujianName?`SelStart躬` SelLength?ト`butCancel_Click? CheckEmpty桴`cmbitem?`butConfirm_Clickロ`DesPathユ`OptionButton_ZhiJian`OptionButton_DianziJianeT`FileCopy@秦ャ( TxtToNewListfujiaニ ` cmbitem_Clickタセ`ャ( ClearTxtValuefujia蛋 ャ( DelFilefujia?&`ャ( DelRecordfujia`ャ( ClearTxtValuefujianフ?`ャ( iRegularUpDown]` ャ( MarkBodyfujiac畫ャ( RegularModifyFormFieldsリナ`ャ( QuitSub_ヤ`ャ( ListToTextfujia^モ`OptionButton_DianziJian_Click匙` lblFilePathメ饒 butBrowserュミ`OptionButton_ZhiJian_Click `ャ( RecordToListBoxfujia|v` modFuJia嫣ャ( RecordStarkMarkfujia、?ャ( SingleRecordFormFieldCountfujia)歔 ャ( RecordRange`ャ( GetRecordCountfujiaC*`Cells港RecordStartPosT?`ReNameBKMfujiaK`bkm\y`BookmarkC`bkmRangeカ蓜 OcxTypeNameeー`IIfz杼fNameR玽vbNormalヨ-` vbReadOnlyナL`SetAttrC㌔IsNullット` modRegulationユ玽 cmdAdd_ClickFv`suFlag トソヌーヨサヨァウヨfldH]h]?]  $!!dカ forbidenfld=$ェ' カ,$8'butB? メ?ャ tC メ$7シ.am $$゙カ  !タ(:wdRed%カ (X??カタカノォホェス銧隝釤。'??k??ィ? メ?ネ????q??i??ク9トソヌーヨサハヌヤレフ?ナミカマヨミヨァウヨchk] ]8Phミ]?]?]クミ??] シ?駑ustif  $!!dカ mustiffld=$ェ' カ#$8'? メ?ャ  メ$カ$$8' ャ$7シ.?? !lャF $$゙カGキ'j???? !lャGe !V!TキGキ'jk?? キ??ャ$カ,$8'??8? ?ャ ?? $7シ.?? $$゙カ  !タ(カコ?ォホェアリフ隝釤。'??k??X? ?ネm pok??@? メ?ネ シ?駑ust?? $!!dカmustfld=$ェ'?? カ,$8'????? メ?ャ ?? メ$7シ.Le $$゙カ  !タ(カコ?ォホェアリフ隝釤。'k??h? メ?ネ????q??Pi??H]h]?]ー]ミ  $!!dカcheckmutexchk=$ェ' カ#$8'??q??タi??ク,============================テキチミセルウヤマト????サケミ靨ェシモノマム。ヨミアリフ鋙トヌ鯀」ホィメサム。ヤ?リフ鏞メホィメサム。ヤヤモmarkトレナミカマ???????? ????IエAttribute VB_Name = "modRegulati?on" Op Explici?t '=テキチミセルウヤマト Pubt Func任heckForbidden(Rang?e As ) S從g 'トソヌーヨサヨァウヨ@fld Dim tmpArayR= .>C&mFieKWth ②2'= GetFlagValue(ThisDocum?ent.txt.Text, "fLen6=")裸&WアS?、t(/M, i0 To UBou8nd((QSeニt<l= .l"s(i) If@ Trim(?hPureResultチ )) <> "" Then_?Aチ! .Bh. HighlタtColorInde"xタ,wdB@H '~wタ斉jEI? "?遼チHint@2?タカノォホェス銧隝釤。´ End Ifヌ*rN@a iテチAw  A?ーR、must$」ハヌヤレフシ?ナミカマヨミq※chk※AI`FFldsT「ョ,ー12GゼPャiチ Integ`er, jH B椀olaea??'シ?鱆i?釉c?cck蘢c 潯cァ タc#゚cc〕] (}"-1タHハ%瀉 $ヌ aO?i1(0j? ムcTyp!ィ7w/_oDoC「3=`uue?6aElse l1tv'「韮ox?x "True「?ロ lA (`?ツ2?1(1)0龠O! a??V= 2ヌ,e「%?a^ %"コ楹リ?A 漲?jLF丶qF?g?アソ=ソoケ=?」9& ?aoo= ゚?ooチ 3OjoOヲマ?o゚nOェOrヘケ_lth_l_lp筆燧靭Chk殕geh輔租str5?x?鑠ヌテQdテ?h Ti3ッeツ * ラ(((c則m゚fミ「f(9?(#・`。 ?ッ8ー?ッ'サケミ靨ェシモノマム。ヨミqオトヌ 鯀」ホィメサム。ヤヌメ?ヤ?モmarkトレチ 神ヒホフH$?0TextBox1ッ(?2<Label1x1ワP4? ?HoptSupx1suflag=0;&<ャ4? ?HoptSubx1suflag=1;&<ェ$?4cmdAddx1 $?4cmdQuit1[ , ?1XCheckBox1&<ワ ??H?(/ツ5エ?擬SO ,? メh?ケ[?&<=5エ?擬SO,Fタ????a1am Nh5エ?擬SO,Fタ????a0h Nh5エ?擬SO(nx 喙{uエ?擬SO( Ⅷ{uエ?擬SO<Fタ???? a0h\ 椙[?ケ[セ禦[:N?ヒ5エ?擬SO?? ????Microsoft Forms 2.0 FormEmbedded Object?イqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmSuCompObj????5????maVBFrame????????????o#PROJECT????????????tPROJECTlk69????Np Caption = "イ衒?ママツスヌア? ClientHeight = 1950 ClientLeft = 45 ClientTop = 435 ClientWidth = 4980 StartUpPosition = 1 'ヒミユ゚ヨミミト TypeInfoVer = 13 End ID="{00000000-0000-0000-0000-000000000000}" Document=ThisDocument/&H00000000 Module=modPub Module=modDya BaseClass=frmBuzhengNR Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} Module=fileDialog Module=modVerify Module=ShowForm Module=modBuZheng Mo?????????????????????「」、・ヲァィゥェォャ????ョ????ーアイ????エオカキ????ケ????サ????スセソタチ????テト????ニヌネノハヒフヘホ????ミムメモヤユヨラリ????レ????ワン゙????????????????????????????????????????????????????????????????????????????????????????????dule=modModify Module=modUpDown Module=modCheck BaseClass=frmAddFujian Module=modFuJia Module=modRegulation BaseClass=frmSup Module=NewMacros HelpFile="" Name="Project" HelpContextID="0" VersionCompatible32="393222000" CMG="27258B7495BC3EC03EC03AC43AC4" DPB="CCCE60DFA099BD99BD66439ABDC365B96B7F0A5A91575451A34B4A4FA0B08A4C6CCC81CD14CA" GC="7173DD1EDE1EDE1E" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 &H00000002={000209F2-0000-0000-C000-000000000046};Word8.0;&H00000000 [Workspace] ThisDocument=0, 0, 0, 0, C modPub=50, 50, 1024, 498, modDya=0, 0, 0, 0, C frmBuzhengNR=110, 110, 987, 431, , 22, 22, 540, 277, fileDialog=0, 0, 0, 0, C modVerify=0, 0, 0, 0, C ShowForm=0, 0, 0, 0, C modBuZheng=132, 132, 1009, 453, Z modModify=0, 0, 0, 0, C modUpDown=0, 0, 0, 0, C modCheck=0, 0, 0, 0, C frmAddFujian=150, 150, 1124, 598, Z, 44, 44, 562, 299, modFuJia=0, 0, 0, 0, C modRegulation=0, 0, 0, 0, C frmSup=25, 25, 999, 473, , 66, 66, 584, 321, NewMacros=0, 0, 0, 0, C @メ毅? ェ`メ毅? ェ`@2ラiホヘァwン?@????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????heckfrmAddFujianfrmAddFujianmodFuJiamodFuJiamodRegulationmodRegulationfrmSupfrmSupNewMacrosNewMacros(H  !@??:}PGヨR 聡ホ昴ェKクQ神ヒホフT$ユ? #Frame1x1$ユ?#Frame2x1z* ?(H  !タ}? t( ? 4butCancele (?28i12????????> n`嶇ェ`PヤGユヒチマPヤGユヒチマf????????????クo=?????。CompObj????????????ュpLabel1Юワ+,??4cmbitem_1mbiッ(?28Label2m_ワム4 ??0txtFujianName2xtFッ3, ?10butBrowseramk"レ ( ?4butConfirmamッ0?LOptionButton_ZhiJianッミ4?POptionButton_DianziJian'ミ( ?< cmdModifymamカ$?4 cmdClear「, ? 08 lblFilePathmワx 4 ??!1< txtFilePathm4xtFッレ  ?( Ⅷar{uエ?擬SO,?D柳N{|妓>5エ?擬SOA?H?(ト{5エ?擬SO,?D柳N T>5エ?擬SO?H?(ト{5エ?擬SO(Omネ{uエ?擬SO(ーe 杞{uエ?擬SO0Gタ??<???EF1amク~5エ?擬SO4Gタ??<???F05uP[?5エ?擬SO,瑢 9eノ{w @エ?擬SO(n zzノ{uエ?擬SO,?㌃?Ю>5エ?擬SO@?H?(?{none7 @エ?擬SO?? ???? n`嶇ェ`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1?イq(H  タ}、$i23<DB n`嶇ェ`PヤGユヒチマPヤGユヒチマf????????????ッoAC????ウCompObj????????????クp?<cmdDel?U$?<cmdUpl?ワ$?<cmdDown? $?dListBox1> ?,硎 d紡rノ{w @エ?擬SO, N 硎ar{w @エ?擬SO, N 硎ar{w @エ?擬SO`。?g5エ?擬SOチ?? ???? n`嶇ェ`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1?イq?? ????Microsoft Forms 2.0 FormEmbedded Object?イqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmAddFujian Caption = "ア狆ュクスシ?" ClientHeight = 4185 ClientLeft = 45 ClientTop = 360 ClientWidth = 10350 ShowModal = 0 'FalseCompObj????E????コaVBFrame????????????シGfrmBuzhengNR????????HPヤGユヒチマPヤGユヒチマf????????????ツケ StartUpPosition = 2 'ニチトサヨミミト TypeInfoVer = 58 End (H  #@??<}kDR 聡ホ昴ェKクQ神ヒホフT$ユ?#Frame1x1>>$ユ?#Frame2x1O(> ?(H  #タ} &8 ,(?28Label2zzケク(?2<Label3zz>(?28Label4zz1 (oGM????????i14????????K n`嶇ェ`PヤGユヒチマPヤGユヒチマf????????????ナpoJL????マ|?28Label5zzn0 ??0txtFileNamez1xtF 0 ??0txtLocationz2xtL V0 ??0txtBefChange3xtB 0 ??0txtAftChange4xtA ミ$?4cmbAddzz4w( ?4 cmbCancelngeヨw( ?"< cmdModifyngeソ w$?#4 cmdClearJw ?,?㌃ T>5エ?擬SO ,? ㌃-NёMOn>5エ?擬SO,?e?kMRモ>5エ?擬SO,?e?kTモ>5エ?擬SO?H?({5エ?擬SO?H?({5エ?擬SO?H?({5エ?擬SO?H?({5エ?擬SO(杞 ?Rノ{uエ?擬SO( Ⅷノ{uエ?擬SO,瑢 9eノ{w @エ?擬SO(n zzノ{uエ?擬SO?? ???? n`嶇ェ`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1?イq(H  !タ}u8、$?<cmdDelw$?<cmdUpl{w$?<cmdDownイ w$?@ListBox1> ?,硎 d紡r{w @エ?擬SOCompObj????????????ルpi27IQO n`嶇ェ`PヤGユヒチマPヤGユヒチマf????????????ロoNP????゚, N 硎ar{w @エ?擬SO, N 硎ar{w @エ?擬SO`。?ナ5エ?擬SOチ?? ???? n`嶇ェ`Microsoft Forms 2.0 FrameEmbedded ObjectForms.Frame.1?イq?? ????Microsoft Forms 2.0 FormEmbedded Object?イqVERSION 5.00 Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} frmBuCompObj????????????pCompObj????R????aVBFrame????????????JCompObj????uzhengNR Caption = "ア狆ュイケユ?トレネン" ClientHeight = 4080 ClientLeft = 45 ClientTop = 360 ClientWidth = 9930 ShowModal = 0 'False StartUpPosition = 2 'ニチトサヨミミト TypeInfoVer = 60 End ?? ???? タF#Microsoft Office Word 97-2003 ホトオオ MSWordDocWord.Document.8?イqb 2タミ 0@P`p?タミ2(リ 0@P`p?タミ 0@P`p?タミ 0@P`p?タミ 0@P`p?タミ 0@P`p?タミ 0@P`p?8XV~PJ_HmH nHsH tHF`?F ck㌃ $1$a$CJKH_HmH nHsH tHH2H h? 3$$d、x、@& 5,J PJ$A`?。$ リ椄況k=Ц[SOFi@?ウF nf辛?h :V 4ヨ4ヨ la k ?チ 瀑Rh 8 @8 u$ ニ9r G$a$CJ\C\ ck㌃㌃,g)ロ$ ニL????dhWDU?^?`??B*OJQJph?N@N u w'$ ニ9r &dG$Pニ?a$CJaJ(B"( ck㌃㌃,gCJ2@22 ck㌃)ロ└d`└.B. ・6yb鑞Fh㌃,gCJaJ>?R> 仕 'Yh??、P`?5,J OJQJ>?b> 仕 \h??、P`?5,JOJQJJ?J 仕 ck㌃オk$dh9D`a$CJOJPJQJ)@「  コuxPK!jシ[Content_Types].xmlャ騨jテ0E?σカリrコ(・リホ「Iw},メ莖-j巡4 ノ゚w?Pコ-t#bホ几Uョ上?弐T餠^h?}罟ォ?サラ*1P?ャ 顛ララW褓0)勗T髷9<斗?、ワ$yi}∝;タ~@?カ(諟H懴トミu? Dラ?zκ/0管ー? $? Xォヌ3aZ「メツ?ーD0j~?゚カホb肬~i>リヘ3ソ\`??[リャカG鰾\ト!?-ロRk.都?ヤサ?.旅エa豼ュ???PK!・ヨァ鄲6 _rels/.relsэマjテ0 ??τ}Qメテ%v/・燭/」}?h"ロ?Oヌ サ└?ゥ=?ョ櫛癆 坎テ磴?ヒh疱=ソに?ァ%[xp?{ロオ_シPム」<ヘ1・Hカ0異OシRョBdムノメJEロ4b$ァ倉_ラ??LモRラ7`ョ妾ノ?ウテ0フ朧チッ,薤n7猫i臙。ィ/經ス勢eェヤミオク???PK!kytheme/theme/themeManager.xml フM テ @痾。w拙7cサ(EbイヒョサCAヌ?メ渺ラ裙?ポユ姙 Y, 各ヘ.姐,ァィレHナ,l睇跌xノエ゚IネsQ}#ユ水ュオン ヨオ+ユ!?ン^ケ$j=季W勒?礒?& 8???PK!ヌmQtheme/theme/theme1.xml?MoEセ#F{oc'vGuェリアhモFア[ヤ繆=゙掏vg53Nj秋H?z?篦瓢 $ハッI)*E鸚燵吽シ&IA?>?ヌシ3セx餒トミ>梯ク餠マW珊ム畍ア ヒ肥M?トu、?бヤ)ヒhョ ーキ?:Viリwリ4r腺ムqマォ偈"r居ロ!賜2l照a禔C鈎エヒU|?「?8^都??セワ?▲メ,A禍アХ咜煦ニラ?ls瑟レ14タ軅=,ノャキオoツ杁V ロGレ?ワムヲロ訝H゚?椽???渝x゙オワw-ラ鋧キワEメF;?ミv`㍍3"G 'eャァヲ圭蒜H眠O サーィ鯲?ヲ$┗i_wp? ョ>「*?8サ麒&´Y%\ツチホ,劣ヨxメ?ヨチ苛レス悃 r6fキ フ?エ「弋リハ?)?:ツェZゥKォユLォs、?C 蹼ηワ?? [タヒォp@ラ「畫jソロス7 級ツY??Hメiサ軣T5Aハrナワ@赶トHAZCウ}i' RQ\m∈,zo・,トQメu{、Y\,N」Θラィ/ラ=蒹、骰澂 _」「.Ⅵ7Cセ6尞-fS蟲h62テワ"ィツ5?蕫チNHУ[X?5フォ4Xャ%Y?零獰ウ2タf伀hアイノi~tCKF#筬bー +レw?m・|「郁?4`ア??Uチ?頻5a:??{4匇mホiムoッ ホョc埋8mキコDウJカpSヌケ讖?リVェサ1ⅵヲ??#S格?3E?pSー2ヤW`、?駲。B]( ゥ゚08俥ルwア n届A[s枚)k8= Aa?R。 dレ痛セc篭モスヒイd)#轍uebユ図ツ德ョ?ンC!、コ?i0ク」>ァ4Sャ7ァ?{ッュzナ Fケ}リ 4?sKvUKoネウスキh?1ウjYU?ーツVミHヒ?5U8薹k;ヨ愬ヒ9遺シナーD ワ ??*|FL オマキ"A3Χ〓>g、、]タ濺m2iVヨオ鳧、ス卜ヨg<鱶r?[kv遅湟ル謚sj?撈zリ][鑠溢ム?Qv??ソiu窿ロ?ク゚?%M2チoJテ鞁3uナo%メ坐??PK! ム澄カ'theme/theme/_rels/themeManager.xml.relsэM ツ0?Xooモコ?ン威ュヤ?5 6?$Q? ョ,.㌢セ冓サ理ノc2゙1hェ:髟q埣mク?@RN菓;dー`no7g銭(M&$R(.1腕'J糖ミ概ョ8」酬?」ヲAネサミH}?|ナ$スb{ユ鳳?ウ?8曳/]?QAsル(「ニフ?妛Lハ[ココト゚??PK-!jシ[Content_Types].xmlPK-!・ヨァ鄲6 +_rels/.relsPK-!kytheme/theme/themeManager.xmlPK-!ヌmQムtheme/theme/theme1.xmlPK-! ム澄カ'。 theme/theme/_rels/themeManager.xml.relsPK]  8????  :<>Aニ|  ィ @&R'?,( リ H d v ャ >&ホ&ィ'ネ',( +-.HJXdjv「ャセネノル %AMRT`ceqt{」ゥ0<BP\beqvxァャョコスソヒホW??W??F?符F?符F?阜?弗G??弗G?F?阜F?阜F?阜F?阜F?符F?阜F?阜F?阜F?阜F?阜F?阜F?阜F?阜F?阜F?阜 ')A!!?斧エエ  @?????? ??  ??   S ソヒ? ???! marks_N)R3u3uムSf T 3uコNbN)RCgコNモY Tb Te?k欖澤 marks02_e?k欖澤9hncN)Rユl杣スeニ~R,{51agёト凹[_D蔓RCheck19hncN)Rユl杣スeニ~R,{44agёト凹[?仙wCheck2ムS㌃蘰_t^ムS㌃蘰_gムS㌃蘰_蘰仙wfN TムS㌃戎RムS㌃戎e?k?ケ[ mark_BuZhenmark_BuZhenStart YhリSy傴m?Rh~{D柳NnUSD柳NnUS璟?Rh~{YHhチf㌃YHhチf㌃ TYHhチf㌃ N)R絲t:g?~{炳_~{炳aチ怨Qケ[~{炳蘰g_t^~{炳蘰g_g~{炳蘰g_蘰ミcⅧ蘰g_t^ミcⅧ蘰g_gミcⅧ蘰g_蘰SXv・ァャノATe{ウサモルルレ゚0Pexョソ  Xk」ォノレ&Sduェアケモル゙゙?CcwュセマKMRSVnt・ヲァォソネレ &0@ASTdeォアウエオケサソタニヌフヘメル゙゚?/DOepqrvwxュョセソマミメモモユユヨヨリルロヷ゚?Kメモモユユヨヨリルロヷ゚?KMRn、・ャウヤル゚eメモモユユヨヨリルロヷ゚? Kpqrvメモモユユヨヨリルロヷ /$クx???????????|、a絶?????????(N LムLX?????????va&ヤナ?????????ュW?R?ソ?????????__$"イ?????????тЫ?ニ^т`Ы?OJQJo(㍗?l ?Ы?ニ(^?`Ы?o(㍗?.?Ы?ニフ^?`Ы?OJQJo(㍗?uаЫ?ニp^а`Ы?OJQJo(㍗?l Ы?ニ ^ `Ы?OJQJo(㍗?n┷ Ы?ニク ^┷ `Ы?OJQJo(㍗?uЫ Ы?ニ\ ^Ы `Ы?OJQJo(㍗?lЫ?ニ^`Ы?OJQJo(㍗?n└Ы?ニ、^└`Ы?OJQJo(㍗?u???ニh^?`??o(?? ЗЫ?ニH^З`Ы?㍗?) ?Ы?ニ^?`Ы?㍗?.? юЫ?ニ^ю`Ы?㍗?.? ?Ы?ニ4^?`Ы?㍗?) ? Ы?ニリ ^? `Ы?㍗?.? л Ы?ニ| ^л `Ы?㍗?.?  Ы?ニ ^ `Ы?㍗?) ?Ы?ニト^?`Ы?㍗?. └Ы?ニ、^└`Ы?o(0?ЗЫ?ニH^З`Ы?)?Ы?ニ^?`Ы?.?юЫ?ニ^ю`Ы?.??Ы?ニ4^?`Ы?)? Ы?ニリ ^? `Ы?.?л Ы?ニ| ^л `Ы?.? Ы?ニ ^ `Ы?)?Ы?ニト^?`Ы?.???ニh^?`??o(?? ЗЫ?ニH^З`Ы?㍗?) ?Ы?ニ^?`Ы?㍗?.? юЫ?ニ^ю`Ы?㍗?.? ?Ы?ニ4^?`Ы?㍗?) ? Ы?ニリ ^? `Ы?㍗?.? л Ы?ニ| ^л `Ы?㍗?.?  Ы?ニ ^ `Ы?㍗?) ?Ы?ニト^?`Ы?㍗?.│Ы?ニ?^│`Ы?o(? ДЫ?ニD^Д`Ы?㍗?) ?Ы?ニ^?`Ы?㍗?.? ъЫ?ニ^ъ`Ы?㍗?.? ?Ы?ニ0^?`Ы?㍗?) ? Ы?ニヤ ^? `Ы?㍗?.? з Ы?ニx ^з `Ы?㍗?.?  Ы?ニ ^ `Ы?㍗?) ?Ы?ニタ^?`Ы?㍗?. └Ы?ニ、^└`Ы?o(0?ЗЫ?ニH^З`Ы?)?Ы?ニ^?`Ы?.?юЫ?ニ^ю`Ы?.??Ы?ニ4^?`Ы?)? Ы?ニリ ^? `Ы?.?л Ы?ニ| ^л `Ы?.? Ы?ニ ^ `Ы?)?Ы?ニト^?`Ы?.?|va&(N /$__ュW?????????????????????????????         フ森ェ        <ン淡        nスワマ        サコX$?lb孵\} l/O8FニP?be カ  |Эgj!sbr?モ*俉TeTvYI」w??0A登丘#'メ>??Oメ]罇eUト "" ホ8 = 蜂 ェS 仕 タv w $ ;. B N 蕷 (q ヘ l ~ カ 1 ス3 ^J オ^ ? ? ? E6 當 ユq v{  m* オF オL =Y me 、p S{'?ァ,「s?"n5YH焄_ホd、 8T:B洩ユ}p [e$ォUr~=ャ2?%>JI?溿禳*ーPuQェb<T>"ツd"}g"#8#タ:#゚:#Hy#ユ{#u~#$?$)0$e7$t_$ij$虱$$z5%?S%ヲ&、%&?&[>&SG&oL&皛&=j&w&酢&' '゙B'Pt''("(?(R2(キ;(>~(ャd){r)1*q1+f4+C+a+3e+[y+?,wX,チ--'-.-r-,x-.F.ス.?.4.BS.2^.Yg.S/?/タJ/嗷/ソ0メ00 0ユ&00rQ0?0?d0:0?1Q@1ンx1L2d22a42 k2 k2st2 }2l3r3>U3Ze3ハp3 4i34?4@=4「Q4Y]4t]4?4ケo4ム5n=5EC5vD5?5j5wm56 36シ=6カ>6@C6}E6G6ニG6P7k 7ト$7B*7}97ナM7_u7ョ8"8KJ88z8089;9F=9シL9ウP9與9<:e-:?:?:欅:ィW:モo:;;廡;xJ;x;_<R<z.<d8<O< =a=E=7==街=A]=h>v+><,>\0>織>ルP>タZ>Ig>dn>2@?ソ|?@?@ェo@ヌo@ワz@WAA?A+A?A?At>A KAAA*vA BハB?BB%B*B」aBカC3PC・fC)DEyDN ELE{ZEロwE凉EiF゚FJFFЁFsPFDgF2xFMG Gム&GX+GカLGッeGxkGlGコH*_HeIDIレRI゚dIテlI9oIJ/J;JJ?J]ZJ;hJヌ(KKzK7 L?L?ML哲L仕LイsL+&M12MTMM〈MNZ N?NGN;iN舁N%tN?O5]O PPZP4/P8PレRP秉PエQノQ_Q~BQ>^QーbQ zQッRY0Rフ>RF?RⅱRQORミURマxR`Sャ"St*Sヒ7SヲqSァ|S:QTトpT/qTクU?Uユ>ULUqVUtvU5V??V4`V W?WyWィ:W}BW労W.X%!XL2X[9Xo|XY Y*Y9Y}aY (Z1*Z7ZエNZタcZ?Zj [(#[?[:[K[}M[O^[rv[[\a"\V$\R\ヒR\]\eq\サ{\ン]3 ]]メ!]))]p9]モU]\\]K~]?^^^ $^帰^B^L^2W^ョ^^嫻^孵^ _ァ_?_?_Q_p%`O6`ケt`)a>/aB?aンRa蝋a?aaiba bィ$bャFb?Ob要b、zbQ~bcDc0cz6cVBcンic「 dd?dョ8ddGdォGd悩dJqd e;eョ*eシffシ fカ;fL[fJg!g Dg-SgYlgセog h h"Eh)ihpphェyhムig1iKAitIiYQiネli?pijj"5j ]ja_j4jPkk5Rkmakスsk>lll」!l Tl纏lタdl?m_%mV.m?m?m「amロamテno9n?DnPWn兪nンln?o8$o++oloオmoo-o|p?pompホq q?qqツAqGqjJqヌOqr゙rn#rウ$rヨ8rケ=r@ordssメ:s#HsTs?zs孺sU~sBttnitYuワ uSAuHu四uoouキvuzxuツv})v?vメHvケww?w9wチlw}xウxウJxbxxdxm+yVoyハpyムyyzwz6z+zエ\z?z |zC{ {ロ-{ヨ5{36{{チ\{ュe{ g{|ヒ-|A9|タ^|ニb||h||?}]}ヤJ}ォ\}n}~4(~N4~?~姨~(U~ンY~)?伹oKy?K?? ??マ8?ヨL?ィY???ェ0背u-シ@re談ョ Cキ7%゚(VmTnナ3レVS^V(ハ<フhItYニ aj背x~@+コ@Нヲ[・6ニJaZ弾ヲ(ホKX|シ1???・< ェ-伹禳~~ヲ#`Qレ[フm,w2 +」g鑠Lクチ?\G「J閃O{&?`wン|ョ?&ェ08p?ロア3 =ォDムLクV^リモl m。 ウリ1U7?cチuネ !6?%~涌ミ|3セ-I9ク:m]?Zサd vGEKツo縟ャ ?'チD?yw-0p:柚6a7sャxJ0ィW。メ,リ,ク9F]㎎f|3エLR~UYZ||ur:ォ\@?・?)?e6?_S?Qg?Os?セ 。B,。.。1。!G。}`。㌍。=u。ツv。g~。「ャ)「 M「?n「xo「カ 」ヲ」3」p」}」k)」?」錣」K」 、カ、&"、Mt、ワx、?x、E、チ・ラ ・K・P6・^M・禧・yc・dp・pヲ.2ヲxTヲf[ヲッsヲgtヲム}ヲn.ァキ>ァZrァィウ ィ+BィdWィ?=ゥTHゥスaゥZェォェァ ェ"9ェ,CェXLェTェ/cェ pェスrェ「ェM ォk ォハ ォ?ォヒ,ォMォ|Qォ-Yォォ?ャャチ0ャ?ャ ュxュxュ?ョe>ョc[ョBッヌ ッ ッン0ッ+1ッ?=ッ(Dッハcッ?~ッリーqーヌーQyー ア蕷アz\ア、イ*イ?イBウーウエ#ウャ-ウ羨ウ3PウX^ウ$エXエGmエ蕨エスオ|オ6オ0JオwlオレrオUyオケ カカカカ?カ?カ?カヲbカy{カテキO(キ!.キソZキaキ ク60ク?クuクlケワケr3ケヨ?ケンAケ朞ケa}ケ コy"コLZコ@\コオfコ?コ:サ。Yサシ#シt$シCdシBmシースゥJスYVス1Zス]セ゚セ9セ#;セa`センソMソpEソlbソjソニjソタヲタメ1タト9タ"チ9チNチ.Oチ{dチ?lチ地チミ ツaDツホUツNjツ駭ツアvツ }ツ?テ[JテPテテヨnテケ1ト3トン6トаトナh$ナG7ナLナzナ<ニFvニ^ヌuヌyxヌ僮ネaWネェdネ fネN{ネノj#ノ(*ノ:LノRcノ3uノハェハカ ハ9ハ?ハ4=ハアqハカrハ*tハ舳ハホヒ6Tヒ‐ヒcrヒク|ヒフN$フ(フォ=フヘサ,ヘVヘレ^ヘ.`ヘTdヘjヘ朴ヘ tヘ-ホ ホマ#ホ鍠ホ)OホQホンlホラママ=lマHqマjwマミ#ミレ ミEミ祐ミ?ムO#ムR<ムIaムメl!メ?メ港メ疥メメ9モ゙モソ&モY3モニcモ液モクヤヤ?ヤ?6ヤヤj!ユR)ユq)ユ?7ユケ7ユT:ユPhユ ヨヨI2ヨR2ヨI6ヨハ:ヨ勲ヨ?Xヨsヨ ラV*ラW:ラ[Fラ港ラicラ&gラ。qラィtラOリpリeリVkリォwリ゙)ル櫺ル絏ル濆ルイpル6vル}wルUレ%\レ!sレツ{レ-ロ?ロマ1ロ?ロチFロィSロハSロM_ロレtロ-4ワネ<ワfAワbBワ7Lワ/Rワ.Yワ}rワ孺ワ?ン襴ン扨ン[ンE_ン菟ン ゙h゙゙?゙Q゚rf゚ェt゚*}゚i\{iZxッQ<L4fg9\W[p{#漓狼:yU{トzカ シ?6v9cFO算?sG]&?dD舐。*0?.Y?マxHPqa6ュ@ネMBdャl忻 D;!=$ ,盈ハ}9/dyp^メ,s9淲 [肋^:8ゥpe#掬?hュkC~ー:hADォHbqZz#eQlハム9猤@b0s4%S:lN,t-X;ノE#Zz$ォ18i|8 6 T-ッ-?Ak`トdaU荊 ,?'PWZ+\ツ{ ン ト<?Soレェ2綣「wケMZQ=c貿ヲ<>!R濃?O !9?イB廸ンQ]5^タi゚nhz;?g???E'?????Y??~?ル???G;???ウf??.???ャ{?モユ?V??6868V??6868V ??6868V ??6868V??6868V??6868V??6868V??6868V??6868V ??6868V ??6868V ??6868V ??6868V ??6868V??6868V??6868V??6868V??6868V??6868V??6868V ??6868V ??6868??Project.ShowForm.ShowBuZhengProject.modDya.delFujianProject.modDya.delBuzhengNRProject.modDya.addFuJianByXMLProject.modVerify.invalidDayProject.modVerify.invalidEmailProject.modVerify.invalidMonthProject.modVerify.invalidYear!Project.modVerify.validateNumeric"Project.modVerify.validatePostCode"Project.modVerify.validateInputLenProject.ShowForm.ShowFJProject.modBuZheng.UnlockDocProject.modCheck.CursorProject.modPub.SaveXmlFileProject.modCheck.pzyProject.modPub.FormHideOrShowProject.modPub.RefreshOcxTreeProject.modPub.AddSignDateProject.modPub.testxmlProject.modPub.UpdateFieldProject.NewMacros.DelRowPROJECT.MODCHECK.PZYPROJECT.MODPUB.TESTXMLPROJECT.MODCHECK.CURSORPROJECT.SHOWFORM.SHOWFJPROJECT.MODDYA.DELFUJIANPROJECT.NEWMACROS.DELROWPROJECT.MODPUB.ADDSIGNDATEPROJECT.MODPUB.SAVEXMLFILEPROJECT.MODPUB.UPDATEFIELD PROJECT.MODDYA.DELBUZHENGNR PROJECT.MODBUZHENG.UNLOCKDOC PROJECT.MODVERIFY.INVALIDDAY PROJECT.SHOWFORM.SHOWBUZHENG PROJECT.MODDYA.ADDFUJIANBYXMLPROJECT.MODPUB.FORMHIDEORSHOWPROJECT.MODPUB.REFRESHOCXTREEPROJECT.MODVERIFY.INVALIDYEARPROJECT.MODVERIFY.INVALIDEMAILPROJECT.MODVERIFY.INVALIDMONTH!PROJECT.MODVERIFY.VALIDATENUMERIC"PROJECT.MODVERIFY.VALIDATEINPUTLEN"PROJECT.MODVERIFY.VALIDATEPOSTCODE@ .o(?`` `&??Unknown????????????G? ??Times New Roman5?Symbol3. ? ??Arial;ム朶OSimHei;擬SOSimSunG5?  ソ?髙ヌhMS Mincho-?3? fg;?WingdingsA? BCambria Math 1、ィh(g(gエヒシFkhkh(ホど!-!),.:;?]}ィキヌノ    & 6"0000 0 0 00000??? ? ?????=?@?\?]?^??([{キ  0 0 00000??;?[???エ?メメ嬪2ピ゚??HX??ィ???????????????・6*!xx???!E:\Y?N\chen\3uh?h\2003.6.24\bzs.dot0R。[ z戎cxfuser$