51Testing软件测试论坛

标题: QTP操作Excel的一个错误:"Excel 无法打开文件......" [打印本页]

作者: Robel.Yi    时间: 2009-7-31 17:18
标题: QTP操作Excel的一个错误:"Excel 无法打开文件......"
在测试框架很大的情况下,一个小错误都可能花掉你几个小时的时间去找问题,今天我就遇到了,大家如果以后遇到可以少花点时间了,在一些函数中创建了SQL链接,函数中又调用

了其他函数,其他函数又需要打开些文件进行操作,结果一直报错,一步步跟踪调试找到了原因,EXCEL重复打开不会出错、重复创建链接也不

会出错,但如果创建了链接没释放又要打开此文件就会报错。

先看一段代码:
'赋值
ExcelFileFullName = "C:\test.xlsx"
sheet = "test"
'创建链接
Set RTCconn= createobject("ADODB.Connection")
RTCconn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source="&ExcelFileFullName&";Extended Properties=Excel 8.0"
sql= "SELECT * FROM ["&sheet&"$]"&""
Set RecSet = RTCconn.Execute(sql)
'打开EXCEL文件
Set objExcel = CreateObject("Excel.Application")
Set fExcel = objExcel.Workbooks.Open(ExcelFileFullName)

运行此段代码会报错,错误内容为“Excel 无法打开文件“test.xlsx”,因为文件格式或文件扩展名无效。请确定文件未损坏,并且文件扩展

名与文件的格式匹配。”

此错误的原因是因为我们创建了SQL链接但没有释放,接下来又需要打开此EXCEL表格,而此EXCEL表格在创建了SQL链接后就被锁住了,再打开

就会报错,解决些问题的办法是要在打开EXCEL新把链接先关掉(RTCconn.Close)。
作者: cherryqxh    时间: 2009-8-4 11:53
受教了,楼主啥时候发布你那强大的框架呀,我可是天天都来蹲点哦
作者: wshyzhywx    时间: 2009-8-4 13:57
遇到过这个问题 初始化下Excel也可以解决的
作者: vernzhang1980    时间: 2009-8-4 15:18
test.xlsx? xlsx?
作者: onlonely    时间: 2009-8-28 14:19
呵呵,我也发现了这个现象,
重复打开(不关闭)就会报错.
作者: whoamiyaya    时间: 2009-8-28 21:55
哈,学习了,谢谢lz
作者: kaidong12    时间: 2009-9-5 00:35
楼主习惯不好,用完一个对象之后释放内存或者句柄是常识




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2