hey  
ik ben aan een programmatje aant bezig voor mijn werk en wil er een zoek functie aan toevoegen .
dit is mijn code :

prompt$ = "dit is een test."
SearchStr$ = InputBox(prompt$, "Test")
Data1.Recordset.Index = "stelling nr"
Data1.Recordset.Seek "=", SearchStr$
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
End If

ik moet er wel bij zeggen dat het veld "stelling nr" numeriek is

als ik op de knop druk geeft ie een fout op de index :

" "stelling nr" isnt an index in this table.Look in the indexes collection of the TableDef object to determine the valid index names."

bij tekst werk de functie wel

heeft iemand een idee?

tnx

Ge kunt toch zelf uw sql statement schrijven:

select *
from table
where stellingnr = ?

met op de plaats van het vraagteken de verkregen waarde. Ik zou trouwens voor de namen van je tabellen en velden gaan spaties gebruiken (Dit durft wel eens fout lopen)