我爱电脑技术论坛 » 编程语言 » Excel在.Net下驻留内存的解决方法

LOK 发表于 2008-4-18 10:51

Excel在.Net下驻留内存的解决方法

这段时间在VS 2003 的WebForm 方式下对Excel 进行操作，遇到一个最为头疼的问题就是对Excel操作完毕后Excel不能够正常关闭，系统退出后，Excel总是驻留在内存中。但是这段代码放到WinForm的程序中又没有问题。在网上进行了查找也没有找到有效可行的办法。经过无数次的尝试，终于解决如下：
{-|,G~*k :s2`V
X:D-[;q.e!oY
　　原来书写如下：FX%^3Y5y+a%o?

5y;l;g9KB I@ J 以下是引用片段：Y[_7m8F.l"k
　　private Excel.Application m_app; Ki4y)`J5Ty*F
　　private Excel.Workbook m_workbook;
b$g{2ocq0COIx 　　this.m_app = new Excel.ApplicationClass(); 0{'v;ona(OQ e]
　　this.m_app.DisplayAlerts = false;
;I0}:q ~ K,NU 　　this.m_workbook = this.m_app.Workbooks.Open(sFilePath, Missing.Value,
?7LGi%b 　　Missing.Value, Missing.Value, Missing.Value, '~(d'L8{bMa
　　Missing.Value, Missing.Value, Missing.Value, b|,_O hc
　　Missing.Value, Missing.Value, Missing.Value,
s'z3m-}jx-r&CIK'H 　　Missing.Value, Missing.Value, Missing.Value, ;U&Q$fb V.w$`(|:KJf"~
　　Missing.Value ); #i-Q*sU3RXi
v"QM^&R@K

.Qd fN2ah 　　修改后如下：
XA-r8H2GGd~/L
1Wp Z2?w 以下是引用片段：
4Xs/g6O+v%C 　　private Excel.Application m_app; 7Z+V['] c7Pk
　　private Excel.Workbooks m_workbooks;
{&v
~ @|.U_i 　　private Excel.Workbook m_workbook; *tZ2pq#Y7O5uD
　　this.m_app = new Excel.ApplicationClass(); +pY-w*f$w
　　this.m_app.DisplayAlerts = false; uF&cz8eAW
　　m_workbooks = this.m_app.Workbooks; c v9t]g
　　this.m_workbook = this.m_workbooks.Open(sFilePath, Missing.Value, ^?Y&S7~Z8k _8O
　　Missing.Value, Missing.Value, Missing.Value, Y5rMOi|
　　Missing.Value, Missing.Value, Missing.Value,
f.l} @5Q.Xx7Y 　　Missing.Value, Missing.Value, Missing.Value,
5iMum0hp h 　　Missing.Value, Missing.Value, Missing.Value,
ee
O\6JOaz 　　Missing.Value ); H1e8L%J5N8b!B
w

|})b DMK
0M K{;[Jg 　　同样对Sheet的操作如下
-E Ro$g,j
|o};z@s.C 　　修改前如下：
S.oJgRZ V7]7drt
以下是引用片段：
` @;@1E(c,q 　　Excel._Worksheet worksheet1 = null; B,Stgq
　　worksheet1 = (Excel._Worksheet) this.m_workbook.Worksheets.get_Item(sSheetName);
!M9f,Hm[&YH 　　修改后如下：
A;E0W ~O
v 　　Excel.Sheets sheets = null ;
!R]&c1R&d _}k 　　Excel._Worksheet worksheet1 = null; z?8]C5TW4UdSf+~K\
　　sheets = this.m_workbook.Worksheets;
zy(Cz&N6uu 　　worksheet1 = (Excel._Worksheet) sheets.get_Item(sSheetName); ,o1k ABj#V^^S[

@q1cUX_
2g7bW.P'ui$s 　　发现区别了么?原来Workbooks，Worksheets这两个类没有被实例化就直接使用了，造成该类不能够被回收。最终造成Excel在内存的驻留。}0`GB*n
+V$JNbR k$h
　　最终以如下方式释放。 以下是引用片段：
V5vun5OE4B 　　private void ReleaseAllRef(Object obj) M.gv'd2iBE:K4Y#t~
　　{

^&h$T#](ZP+Z 　　try k L9VM0{zBD|&i9@+^
　　{
5nvyM:G)o 　　if (obj != null )
4H%pY:?F+g6R8m_ d 　　{ ,um[9P*u(v
　　while (Marshal.ReleaseComObject(obj) > 1); 1c)KI?,z? KSb
　　}

NS;De+y7t"H%? 　　}
]
u YLj1S/I9? 　　finally
9];GA3w:J$m 　　{
!?/w Vh-t#Y$`(qC 　　obj = null; E)ho.]!Y+Q&^;j
　　}
JpE'Pf1j Ty+A 　　} u1x0]$j#Ih
　　private void Release()
F5Uc3GI'J 　　{
B;cX.N4Nt 　　if (m_app != null )
pye9~M8e2?-z { W 　　{ H~7m)u.Gdlwf
　　m_app.Quit() ; R!FYR"Y]b6h+X
　　} | {k*Nz]
　　ReleaseAllRef(m_workbook) ;
yE#y6J/yk @ 　　m_workbook = null ; YM9WuC'M)s
　　ReleaseAllRef(m_workbooks) ;
O,|6J5@ T]K5Z 　　m_workbooks = null ;
RC7}-T-T#G k 　　ReleaseAllRef(m_app) ; m [`'B7g^1v X9L
　　m_app = null ;
y_o O] mH7e 　　System.GC.Collect() ;
2K5I s/YT~3g.nLil 　　}

查看完整版本: Excel在.Net下驻留内存的解决方法