在一些地方,我在一个杀死 excel 的线程中编写了 itcl 代码
method Kill_XL {} {
thread::create {
set rc [catch {exec taskkill /t /f /im Excel*} output]
}
sleep 5
}
之后,对于几个不同的愿望外壳,以下命令调用 Excel 应用程序,但我可以看到它立即在任务管理器中退出
(shh..) 2 % ::tcom::ref createobject Excel.Application
::tcom::handle0x027CE918
(shh..) 3 % ::tcom::ref createobject Excel.Application
::tcom::handle0x027CE918
对几个愿望 shell 重复上述操作(每个都在关闭前一个愿望 shell 后调用)。
在运行任何命令时,错误显示为:
"invalid command name ::tcom::handle0x027CE918"
但是下面的代码可以正常打开一个 Word 应用程序
(shh..) 4 % ::tcom::ref createobject Word.Application
::tcom::handle0x027CE918
等了很长时间(15-20分钟)后,我重新启动了wish shell并能够运行(没有问题)以下代码:
(shh..) 8 % set x [::tcom::ref createobject Excel.Application]
::tcom::handle0x0272EB58
(shh..) 9 % $x Visible 1
这次杀死excel后出现了不同的错误消息
(shh..) 10 % thread::create {
set rc [catch {exec taskkill /t /f /im Excel*} output]
}
tid00004658
(shh..) 11 % $x Visible 0
0x800706ba {The RPC server is unavailable.}
然后是重新开始:
(shh..) 20 % ::tcom::ref createobject Excel.Application
::tcom::handle0x0272EB58
(shh..) 21 %
(shh..) 21 % ::tcom::handle0x0272EB58 Visible 1
invalid command name "::tcom::handle0x0272EB58"
线程杀死是否会导致问题 - 我总是睡 5 秒以确保杀死成功。
还是 tcom-Excel 的其他(已知)问题?
此外,始终提供相同的应用程序句柄
(shh..) 30 % foreach x {. .} {puts [::tcom::ref createobject Excel.Application]}
::tcom::handle0x0272EB58
::tcom::handle0x0272EB58
这可能是未发布的 tcom 对象的清理问题 - 它不会在杀死相关的 excel 进程时自动清理吗?