- VBScript code
Option ExplicitDim x1AppDim xlBookSet x1App = CreateObject("Excel.Application")x1App.Workbooks.Open "C:\Documents and Settings\IBM\桌面\demo.xls"msgbox cstr(x1App.Workbooks("demo.xls").WorkSheets.count)'报错说xlApp变量未定义, 任务管理器中多出一个excel进程,说明未释放吧?set xlApp = nothing
------解决方案--------------------------------------------------------
- VBScript code
xlApp.Quitset xlApp = nothing
------解决方案--------------------------------------------------------
lz,
在下面这个你引用的名字错了,
'下句还是抛出xlApp变量未定义, 任务管理器多出个EXCEL
xlApp.Quit --->x1App.quit
set xlApp = nothing --->set x1App = nothing
你这边一个是小写的l,一个数字1,写错了,所以才出现找不到变量的错误。