ADO第二次连接excel错误

f84248860

大家一起来帮忙查下这个问题：
           Set xls_conn_D = createobject("ADODB.Connection")
                xls_conn_D.Open xls_source("Driven File\"&xls_res_env("Driven File").value)
                Set xls_res_D = createobject("ADODB.RecordSet")
                xls_res_D.Open "select * from [CaseSheet$]",xls_conn_D,2,2

这是套在一个循环体的一段打开xls文件的代码，循环第一次经过OK没有任务错误，第一个xls被打开
第一次循环结束时，xls_res_D.Close,Set xls_res_D = Nothing,xls_conn_D.Close, Set xls_conn_D = Nothing,该清空的都清空
第二次循环经过这一段时，错误出现在“xls_res_D.Open "select * from [CaseSheet$]",xls_conn_D,2,2” 错误信息：Selected collating sequence not supported by the operating system

运行这一段程序是在Windows 2003上，这一段程序在Windows XP调试通过没有任务问题。
网上查了下可能是有中文字体出现在xls里，把第一次成功打开的xls和第二次要打开的xls对调，文件打开成功，相信不是有中文字体的问题。
也不可能是英文语言环境的问题，否则第一次循环的文件也是不能打开的
ADO版本是2.8
QTP是9.2
Excel是excel 2003