锘??xml version="1.0" encoding="utf-8" standalone="yes"?>成人亚洲一区,午夜精品视频在线观看,亚洲三区在线观看http://www.aygfsteel.com/tambc/category/18609.htmlzh-cnWed, 28 Feb 2007 03:40:55 GMTWed, 28 Feb 2007 03:40:55 GMT60- C#濡備綍鍦‵orm涓祵鍏ュ茍涓旀搷浣淓xcel琛ㄦ牸http://www.aygfsteel.com/tambc/articles/89235.htmltambctambcThu, 21 Dec 2006 03:34:00 GMThttp://www.aygfsteel.com/tambc/articles/89235.htmlhttp://www.aygfsteel.com/tambc/comments/89235.htmlhttp://www.aygfsteel.com/tambc/articles/89235.html#Feedback0http://www.aygfsteel.com/tambc/comments/commentRss/89235.htmlhttp://www.aygfsteel.com/tambc/services/trackbacks/89235.html
鍦ㄧ綉涓婃敹闆嗘潵鐨勶紝蹇樿浠庡摢閲屽緱鏉ョ殑浜?br />
緗戜笂姣旇緝澶氳榪板浣曟搷浣淓xcel琛ㄧ殑鏂囩珷錛屼絾閮芥槸鍚姩Excel鐨勭獥鍙f潵鎵撳紑Excel鏁版嵁鏂囦歡銆傛湁鏃跺欓渶瑕佹妸Excel琛ㄥ祵鍏ュ埌鑷繁紼嬪簭鐨凢orm涓紝緇欏鎴蜂竴涓笉鐢ㄥ垏鎹㈢獥鍙g殑鎿嶄綔鐣岄潰錛屼技涔庢洿濂姐傝繖鍦╒C涓敤OLE鎶鏈緢瀹規(guī)槗瀹炵幇錛屼絾鏄湪C#涓柟娉曞氨涓嶄竴鏍峰暒銆備笅闈㈠皢灝辨榪涜闃愯堪銆?
涓銆侀鍏堢畝瑕佸洖欏句竴涓嬪浣曟搷浣淓xcel琛?
聽(tīng)聽(tīng)鍏堣娣誨姞瀵笶xcel鐨勫紩鐢ㄣ傞夋嫨欏圭洰-銆夋坊鍔犲紩鐢?銆塁OM-銆夋坊鍔燤icrosoft Excel 9.0銆傦紙涓嶅悓鐨刼ffice璁蹭細(xì)鏈変笉鍚岀増鏈殑dll鏂囦歡錛夈偮?br />聽(tīng)聽(tīng)
聽(tīng)1
using聽(tīng)Excel;聽(tīng)
聽(tīng)2
聽(tīng)聽(tīng)聽(tīng)using聽(tīng)System.Reflection;聽(tīng)
聽(tīng)3
聽(tīng)聽(tīng)聽(tīng)
聽(tīng)4
聽(tīng)聽(tīng)聽(tīng)//浜х敓涓涓狤xcel.Application鐨勬柊榪涚▼聽(tīng)
聽(tīng)5
聽(tīng)聽(tīng)聽(tīng)Excel.Application聽(tīng)app聽(tīng)=聽(tīng)new聽(tīng)Excel.Application();聽(tīng)
聽(tīng)6
聽(tīng)聽(tīng)聽(tīng)if聽(tīng)(app聽(tīng)==聽(tīng)null)聽(tīng)
聽(tīng)7
聽(tīng)聽(tīng)聽(tīng)
{聽(tīng)
聽(tīng)8
聽(tīng)聽(tīng)聽(tīng)聽(tīng)statusBar1.Text聽(tīng)=聽(tīng)"ERROR:聽(tīng)EXCEL聽(tīng)couldn鈥檛聽(tīng)be聽(tīng)started!";聽(tīng)
聽(tīng)9
聽(tīng)聽(tīng)聽(tīng)聽(tīng)return聽(tīng);聽(tīng)
10
聽(tīng)聽(tīng)聽(tīng)}聽(tīng)
11
聽(tīng)聽(tīng)聽(tīng)
12
聽(tīng)聽(tīng)聽(tīng)app.Visible聽(tīng)=聽(tīng)true;聽(tīng)//濡傛灉鍙兂鐢ㄧ▼搴忔帶鍒惰excel鑰屼笉鎯寵鐢ㄦ埛鎿嶄綔鏃跺欙紝鍙互璁劇疆涓篺alse聽(tīng)
13
聽(tīng)聽(tīng)聽(tīng)app.UserControl聽(tīng)=聽(tīng)true;聽(tīng)
14
聽(tīng)聽(tīng)聽(tīng)
15
聽(tīng)聽(tīng)聽(tīng)Workbooks聽(tīng)workbooks聽(tīng)=app.Workbooks;聽(tīng)
16
聽(tīng)聽(tīng)聽(tīng)
17
聽(tīng)聽(tīng)聽(tīng)_Workbook聽(tīng)workbook聽(tīng)=聽(tīng)workbooks.Add(XlWBATemplate.xlWBATWorksheet);聽(tīng)//鏍規(guī)嵁妯℃澘浜х敓鏂扮殑workbook聽(tīng)
18
//聽(tīng)聽(tīng)_Workbook聽(tīng)workbook聽(tīng)=聽(tīng)workbooks.Add("c:\\a.xls");聽(tīng)//鎴栬呮牴鎹粷瀵硅礬寰勬墦寮宸ヤ綔綈挎枃浠禷.xls聽(tīng)
19
20
聽(tīng)聽(tīng)聽(tīng)Sheets聽(tīng)sheets聽(tīng)=聽(tīng)workbook.Worksheets;聽(tīng)
21
聽(tīng)聽(tīng)聽(tīng)_Worksheet聽(tīng)worksheet聽(tīng)=聽(tīng)(_Worksheet)聽(tīng)sheets.get_Item(1);聽(tīng)
22
聽(tīng)聽(tīng)聽(tīng)if聽(tīng)(worksheet聽(tīng)==聽(tīng)null)聽(tīng)
23
聽(tīng)聽(tīng)聽(tīng)
{聽(tīng)
24
聽(tīng)聽(tīng)聽(tīng)聽(tīng)statusBar1.Text聽(tīng)=聽(tīng)聽(tīng)"ERROR:聽(tīng)worksheet聽(tīng)==聽(tīng)null";聽(tīng)
25
聽(tīng)聽(tīng)聽(tīng)聽(tīng)return;聽(tīng)
26
聽(tīng)聽(tīng)聽(tīng)}聽(tīng)
27
28
聽(tīng)聽(tīng)聽(tīng)//聽(tīng)This聽(tīng)paragraph聽(tīng)puts聽(tīng)the聽(tīng)value聽(tīng)5聽(tīng)to聽(tīng)the聽(tīng)cell聽(tīng)G1聽(tīng)
29
聽(tīng)聽(tīng)聽(tīng)Range聽(tīng)range1聽(tīng)=聽(tīng)worksheet.get_Range("A1",聽(tīng)Missing.value);聽(tīng)
30
聽(tīng)聽(tīng)聽(tīng)if聽(tīng)(range1聽(tīng)==聽(tīng)null)聽(tīng)
31
聽(tīng)聽(tīng)聽(tīng)
{聽(tīng)
32
聽(tīng)聽(tīng)聽(tīng)聽(tīng)statusBar1.Text聽(tīng)=聽(tīng)聽(tīng)"ERROR:聽(tīng)range聽(tīng)==聽(tīng)null";聽(tīng)
33
聽(tīng)聽(tīng)聽(tīng)聽(tīng)return;聽(tīng)
34
聽(tīng)聽(tīng)聽(tīng)}聽(tīng)
35
聽(tīng)聽(tīng)聽(tīng)const聽(tīng)int聽(tīng)nCells聽(tīng)=聽(tīng)2345;聽(tīng)
36
聽(tīng)聽(tīng)聽(tīng)range1.value2聽(tīng)=聽(tīng)nCells;聽(tīng)
聽(tīng)聽(tīng)
浜屻佸皢Excel鐢ㄦ埛鐣岄潰宓屽叆鍒拌嚜宸辯殑Windows Form涓?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)鐢變簬鐩墠錛孋#鍜寁b.net閮戒笉鏀寔OLE鎶鏈?鍙傝寰蔣鏀寔涓績(jī)Info:304562)錛岋紝鎵浠ュ彧鏈変嬌鐢╓ebBrowser鎺т歡鏉ュ畬鎴愭鍔熻兘銆傦紙浠ヤ笅鏂規(guī)硶鍙傝寰蔣鏀寔涓績(jī)Howto:304662錛?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)1銆佸彸鍑誨伐鍏風(fēng)錛岄夋嫨鑷畾涔夊伐鍏風(fēng)錛屾坊鍔燙OM緇勪歡錛岄夋嫨鈥淢icrosoft Web 嫻忚鍣ㄢ濓紙瀵瑰簲鏂囦歡鏄痋winnt\system32\shdocvw.dll錛夛紝紜畾銆傚湪宸ュ叿綆變腑灝嗕細(xì)鍑虹幇鏂囨湰涓篍xplorer鐨刉ebBroser鎺т歡鍥炬爣銆?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)2銆佸湪Form1涓坊鍔燱ebBrowser鎺т歡銆傦紙瀵硅薄鍚嶅嵈鐪佹槸axWebBrowser1錛?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)3銆佸亣瀹氳鎵撳紑鐨別xcel鏂囦歡鏄? c:\a.xls銆?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) string strFileName = @"c:\a.xls";
聽(tīng)聽(tīng)聽(tīng)聽(tīng) Object refmissing = System.Reflection.Missing.value;
聽(tīng)聽(tīng)聽(tīng)聽(tīng) axWebBrowser1.Navigate(strFileName, ref refmissing , ref refmissing , ref refmissing , ref refmissing);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)鍊煎緱娉ㄦ剰鐨勬槸鐢╓ebBrowser鎺т歡涓嶆敮鎸佽彍鍗曞悎騫訛紝涔熷氨鏄鏃犳硶鎶奅xcel琛ㄧ殑鑿滃崟甯﹀叆鍒版垜浠殑紼嬪簭涓傝繖鏄浉瀵逛簬OLE瀹炵幇鏂規(guī)硶鐨勪竴澶х己鐐廣傚垢濂芥彁渚涗簡(jiǎn)鍙互鎶婂伐鍏鋒爮娣誨姞榪涙潵鐨勫姛鑳斤紝閫氳繃宸ュ叿鏍忓彲浠ヨ繘琛岃澶欵xcel涓撴湁鐨勬搷浣溿?
聽(tīng)聽(tīng)聽(tīng)聽(tīng) //涓嬮潰榪欏彞鍙互灝唀xcel鏈韓鐨勫伐鍏瘋皟娣誨姞榪涙潵
聽(tīng)聽(tīng)聽(tīng)聽(tīng)axWebBrowser1.ExecWB(SHDocVw.OLECMDID.OLECMDID_HIDETOOLBARS, SHDocVw.OLECMDEXECOPT.OLECMDEXECOPT_DONTPROMPTUSER,ref refmissing , ref refmissing);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)
涓夈佸洖鍒版湰鏂囨彁鍑虹殑闂錛屽浣曟搷浣滃祵鍏ョ殑Excel?
聽(tīng)聽(tīng) 棣栧厛闇瑕佹槑鐧斤紝鐢╓ebBrowser鈥滆杞解滶xcel"琛紝瀹為檯涓婁粛鐒舵槸鍦ㄦ柊鐨勮繘紼嬬┖闂翠腑榪愯Excel.exe銆傚彲浠ョ敤浠誨姟綆$悊鍣ㄨ瀵熴傚洜姝わ紝鍙鎴戜滑鑳藉鑾峰彇Excel.Application瀵硅薄錛屽氨鑳藉儚涓婃枃涓涓墍璇寸殑閭f牱鎿嶄綔Excel鏁版嵁銆?
聽(tīng)聽(tīng) 騫稿ソ鍙互閫氳繃WebBrowser鐨勬柟娉昇avigateComplete鎻愪緵鐨勪簨浠跺弬鏁癳鏉ヨ闂瓻xcel.Application銆?
聽(tīng)聽(tīng)public void axWebBrowser1_NavigateComplete2(object sender, AxSHDocVw.DWebBrowserEvents2_NavigateComplete2Event e)
聽(tīng)聽(tīng){
聽(tīng)聽(tīng) Object o = e.pDisp;
聽(tīng)聽(tīng) Object oDocument = o.GetType().InvokeMember("Document",BindingFlags.GetProperty,null,o,null);
聽(tīng)聽(tīng) Object oApplication = o.GetType().InvokeMember("Application",BindingFlags.GetProperty,null,oDocument,null);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)//Object oName = o.GetType().InvokeMember("Name",BindingFlags.GetProperty ,null,oApplication,null);
聽(tīng)聽(tīng) //鐢變簬鎵撳紑鐨勬槸excel鏂囦歡錛屾墍浠ヨ繖閲岀殑oApplication 鍏跺疄灝辨槸Excel.Application
聽(tīng)聽(tīng) Excel.Application eApp =(Excel.Application)oApplication;//榪欐牱灝卞彲浠ヨ薄涓婃枃涓墍榪版潵鎿嶄綔Excel浜?jiǎn)銆?
聽(tīng)聽(tīng)}
鍥涖佸寘鍚WebBrowser鐨凢orm閫鍑烘椂鍊欙紝濡備綍紜繚Excel榪涚▼涔熼鍑猴紵錛堝弬瑙丮icrosoft甯姪涓績(jī)KB317109錛?
聽(tīng)聽(tīng)鐢變簬WebBrowser鍙笉榪囨槸瀵笶xcel琛ㄧ殑嫻忚錛岃孍xcel鍦ㄥ崟鐙殑榪涚▼涓繍琛屻傛墍浠ヨ淇濊瘉瀵硅Excel瀵硅薄eApp鍙?qiáng)鍏剁浉搴旂殑鎵鏈夋垚鍛樺彉閲忛兘閲婃斁寮曠敤錛屾墠鑳戒繚璇佸湪Form閫鍑烘椂excel榪涚▼璺熺潃閫鍑恒傝繖涓鐐瑰湪涓涓▼搴忛渶瑕佸嬈℃墦寮鍏抽棴excel琛ㄦ椂灝や負(fù)閲嶈銆?
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)Excel.Application oApp;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)Excel.Workbooks oBooks;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)Excel.Workbook oBook;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)Excel.Worksheet oSheet;
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)...........
聽(tīng)聽(tīng)聽(tīng)聽(tīng)private void ExcelExit()
聽(tīng)聽(tīng)聽(tīng)聽(tīng){
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) NAR(oSheet);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) oBook.Close(False);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) NAR(oBook);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) NAR(oBooks);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) oApp.Quit();
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) NAR(oApp);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) Debug.WriteLine("Sleeping...");
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) System.Threading.Thread.Sleep(5000);
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng) Debug.WriteLine("End Excel");
聽(tīng)聽(tīng)聽(tīng)聽(tīng)}
聽(tīng)聽(tīng)private void NAR(Object o)
聽(tīng)聽(tīng){
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)try{System.Runtime.InteropServices.Marshal.ReleaseComObject(o);}
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)catch{}
聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)聽(tīng)finally{o = null;}
聽(tīng)聽(tīng)聽(tīng)聽(tīng)}
聽(tīng)聽(tīng)緇忚繃璇曢獙錛屾垜鍙戠幇闄や簡(jiǎn)閲婃斁榪欎簺鍙橀噺浠ュ錛屽繀欏繪妸璇xWebBroswer1涔熼攢姣佹帀錛孍xcel榪涚▼鎵嶉鍑恒傚惁鍒欑殑璇濓紝鍗充嬌璁゛xWebBroser1鍘籒avigate絀哄唴瀹?about:blank", excel榪涚▼浠嶇劧涓嶄細(xì)閫鍑恒傚洜姝ゅ簲璇ュ皢axWebBroser1鎵鍦ㄧ殑Form鍏抽棴鎺夛紝鎴栬呯洿鎺ヨ皟鐢╝xWebBrowser1.Dispose();
聽(tīng)聽(tīng)濡傛灉榪樻槸鍏跺畠闂瀵艱嚧涓嶈兘姝e父閫鍑猴紝灝卞彧鏈夎皟鐢ㄥ瀮鍦懼洖鏀朵簡(jiǎn)銆?
聽(tīng)聽(tīng)GC.Collect();

]]>
主站蜘蛛池模板:
大英县|
北川|
阿拉善左旗|
奉化市|
鱼台县|
肥城市|
山阳县|
始兴县|
宁晋县|
宝丰县|
襄樊市|
琼结县|
靖安县|
香格里拉县|
怀宁县|
张家港市|
泸溪县|
开封县|
庆安县|
和林格尔县|
九江市|
陵水|
应城市|
平乡县|
玉溪市|
师宗县|
安仁县|
海伦市|
垫江县|
镇江市|
江北区|
晋州市|
分宜县|
南部县|
曲周县|
修水县|
东山县|
镇安县|
科技|
德惠市|
富裕县|