很棘手的问题。下面语句不用ORDER BY 可以通过。
  用了之后,每次打开工程第一次运行就报错“不支持所选择排序”。第二次运行就通过了。再重新打开工程仍旧是第一次报错,第二次通过。
其他代码也没写,不会影响的。是不是ADO的版本?
代码如下:
    oConn.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" & _
           "Dbq=" & sPath & "" & _
           "Extensions=txt;"    
    sResult = "select * from [" & sFile & "]  where PORDERMASTERNO ='" & sOrderMasterNo & "'" ' ORDER BY CUSTOMERID "
    oRs.Open sResult, oConn, adOpenStatic, adLockReadOnly, adCmdText    
谢谢!多少分都行啊,呵呵。

解决方案 »

  1.   

    sResult = "select * from [" & sFile & "]  where PORDERMASTERNO ='" & sOrderMasterNo & "' ORDER BY CUSTOMERID "
      

  2.   

    对试试:sResult = "select * from [" & sFile & "]  where PORDERMASTERNO ='" & sOrderMasterNo & "' ORDER BY CUSTOMERID"
      

  3.   

    不好意思,为了方便阅读整理了一下,应该是这样的:
      sFile ="040323.txt"
      sNo="0403003" 
      sResult  =  "select  *  from  ["  &  sFile  &  "]  where  OrderNO  ='" & sNo & "' ORDER  BY  CUSTOMERID "  
      oRs.Open  sResult,  oConn,  adOpenStatic,  adLockReadOnly,  adCmdText          
    也不知道是不是BUG,第一次运行总是不让派序,第二次就可以了。
    谢啦。
      

  4.   

    不好意思,为了方便阅读整理了一下,应该是这样的:
      sFile ="040323.txt"
      sNo="0403003" 
      sResult  =  "select  *  from  ["  &  sFile  &  "]  where  OrderNO  ='" & sNo & "' ORDER  BY  CUSTOMERID "  
      oRs.Open  sResult,  oConn,  adOpenStatic,  adLockReadOnly,  adCmdText          
    也不知道是不是BUG,第一次运行总是不让派序,第二次就可以了。
    谢啦。
      

  5.   

    同样地:
      "SELECT DISTINCT OrderNO FROM [040223.txt] "
    中的 DISTINCT 也是一样报错。
    ......
    莫非文本文件只能简单的读取?