主题：关于VBS中RecordSet的Seek和Find

请教下客服，在Access的Mdb里，金字塔的VBS是否支持RecordSet记录集的Seek方法？如果支持，应该如何实现？本人测试了好久都没实现。

另外，在使用Find方法时，有时候会出现表里已有数据，但还是定位不了，直接报EOF错误。

多谢！！

多谢客服！测试代码如下：

Sub TestSeek

    Set Cnn=CreateObject("Adodb.Connection")
   
    Set Rs=CreateObject("ADODB.Recordset")
    Cnn.Open "Provider=MicroSoft.Jet.OLEDB.4.0;Data Source=E:\Test.mdb"
    Str="Select * from Table1 Order by StockDate"
    Rs.Open Str,Cnn,1,3
   
    Set Rs1=CreateObject("ADODB.Recordset")
    Rs1.Open Str,Cnn,1,3
    While Not rs1.eof
       vDate=Rs1("StockDate")

       Rs.Seek vDate,1

       if rs.eof then
          msgbox Rs1("Date1")&"  not found.."
       else
         
       End if
       Rs1.MoveNext
    Wend

End Sub

错误提示：编译器错误  '3251'

              当前提供程序不支持"索引"功能必须的界面。