高手求救(急急急)---用ASP调用EXCEL宏文件EXCEL进程杀不了

[daiyong9000]

以下是我写的代码

<%@ language="VBScript"%>
<%
on error Resume next
Dim strSource
Dim xlApp
Dim xlBook
Dim xlAddIn
strSource = "d:\test\診断レダートA4.xls"

Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = False
xlApp.Visible = true
Set xlBook = xlApp.Workbooks.Open(strSource)
xlBook.RunAutoMacros (1)
xlBook.Close
set xlBook = Nothing
xlApp.Quit
Set xlApp = Nothing
%>
其中打开宏xlBook.RunAutoMacros (1)这句话执行之后xlApp.Quit不了
哪位高手可以解决,本人使用WIN2000/EXCEL2000
网上看到有人说用AddIns但是没有具体的代码参照
请各位指教小弟感激不尽!!!!!!!!

[daiyong9000]

大哥们,难道就没有一个人帮忙吗?

[yongz_0]

因为大家看到了这句: 診断レダートA4

[daiyong9000]

有没有搞错啊,上班我有什么办法啊.不能看着俺被鬼子欺负吧.都是混口饭吃,何必呢:)

[daiyong9000]

还没有解决,我自己先顶一下!!!

[hawk2004]

帮顶一下吧

[daiyong9000]

是没有人愿意帮忙还是不大能解决!