TC5 表格控件与"Excel.Application"有冲突

小噤

TC版本:5.2
环境:XP
BUG产生过程:
1.窗体有表格控件
2.脚本调用VB编写的DLL
(DLL调用的是Excel.Application)
(DLL代码在最下面,就一个保存的命令)
3.DLL操作时间过久(也没多久)就会出现下图
如果插件接口是全局变量.线程调用程序会崩溃,提示内存错误.rar (7.66 KB, 下载次数: 273)

2015-6-29 17:12 上传

点击文件名下载附件

窗体上有表格控件,按钮激发事件,会报错.rar (7.35 KB, 下载次数: 355)

2015-6-29 17:12 上传

点击文件名下载附件



4.这种BUG,在TC4版本上不会发生
5.这种BUG,表格控件不存在则不会发生
6.这种BUG,表格控件与事件不在同一窗体上不会发生
7.这种BUG,WIN7测试不会发生,不知道是不是我WIN7配置太高.DLL操作时间不久....


DLL代码如下,不应该是VB代码问题.
Dim oExcel, oWb
Dim EXCEL_path
Dim TXT_path
Public Function SaveAs(EXCEL_path As String, TXT_path As String) As String
    Set oExcel = CreateObject("Excel.Application")
    Set oWb = oExcel.Workbooks.Open(EXCEL_path)
    oExcel.DisplayAlerts = False
    oExcel.ActiveWorkbook.SaveAs TXT_path, -4158
    oExcel.Quit
    SaveAs = "OK"
End Function

kevinqq

直接发测试项目吧   当贴VB代码 不太好分析  

小噤

kevinqq 发表于 2015-6-29 10:02
直接发测试项目吧   当贴VB代码 不太好分析

项目已上传   excel文本太大   自己弄一下放到C盘  名叫a.xlsx, 整 个表格所有行都有数据.   列就无所谓了测试的时候我只弄了两列而已   

小噤

kevinqq 发表于 2015-6-29 10:02
直接发测试项目吧   当贴VB代码 不太好分析