VB无法释放EXCEL

Question

Dim connExcel As New ADODB.Connection
    Dim xlApp As Object
    Dim xlBook As Object
    Dim xlSheet As Object    mstrPath = "D:\科目期初.xls"    Set xlApp = CreateObject("Excel.Application")    Set xlBook = xlApp.workbooks.Open(Trim(mstrPath))
    Set xlSheet = xlBook.Worksheets(1)    xlSheet.cells(4, 3) = "新增加"
    connExcel.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & mstrPath & ";Extended Properties='Excel 8.0;HDR=Yes'"

Answer 1

http://download.csdn.net/source/2341786

Answer 2

你发的东西不实用，vb操作excel的一般知识我知道，现在这同时打开excel并用ado连接后无法释放

Answer 3

楼主你自己答非所问,而且代码没给完,.,
别人的给你的示例是回答你的问题:VB无法释放EXCEL
set xlApp =nothing 最简单办法.
执行完关闭ADO..或者释放完关闭
还是没明白楼主到底想做什么.

Answer 4

嗯,如果用ado进行操作excel的话,必须先释放数据库连接的资源才能彻底关闭excel.