我想打开一个dbf文件,将结果作为记录集使用,代码如下:
  Dim conn As New Adodb.Connection
  cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=dBASE IV;Data Source=" & strPath          'strPath是dbf文件所在的文件夹
  strSql = "select * from " & tbName & " where code='" & strcode & "' and Market='" & strMarket & "' and Fdate='" & Format(dtmDate, "YYYYMMDD") & "'"
  Rs.Open strSql, cnn, adOpenStatic, adLockOptimistic
当运行到Rs.Open语句时出现如下错误:
“实时错误 '-2147467259(80004005)':系统不支持的排序。 ”点击“调试”按钮(那台机器上未安装MSDN,不能点“帮助”),错误指向“Rs.Open strSql, cnn, adOpenStatic, adLockOptimistic”,然后按F8,系统继续往下执行,而不再弹出刚才的错误消息,也能正常的返回结果集。
  请问诸位,是什么原因导致此问题的出现?除了调用On Err 语句外,其他有什么办法能处理此问题?谢谢!!!