Help with Seek

Hi all

Does anybody know why this is happening

I have a function which opens a connection to a database and then opens a recordset

Code:

---

Function OpenSnapShot() As Boolean
On Error Resume Next            'set error trap
   
    Set cnn = New ADODB.Connection
    With cnn
        .Provider = "Microsoft.Jet.OLEDB.4.0"
        .Open "c:\riva\pwrstore\database\pwrstore.mdb"
    End With

    Set rsPLU = New ADODB.Recordset
    With rsPLU
        .ActiveConnection = cnn
        .CursorLocation = adUseClient
        .Source = "SELECT PLU_CODE FROM PLU;"
        .Open
    End With

    If (Err <> 0) Then
        OpenSnapShot = False
    Else
        OpenSnapShot = True
    End If

End Function

---

This opens fine
The problem is when I try to use seek

Code:

---

    rsPLU.Index = "PLU_CODE"
    rsPLU.Seek "92935", adSeekFirstEQ

---

When the I hit the rsPLU.Index part I get the following error.

3251
The operation requested by the application is not supported by the provider.

I had a look on the miscrosoft site and it said you need to set the recordsets cursorlocation to clientside, which I did and it still doesn't work.

Does anybody have any ideas.

Thanks