[VB] command Find

[gyonny]

helo raga
qualcuno può dare un'occhiata a questo codice
ho creato una datagrid collegata al database
ed ho messo un pulsante trova

il codice è questo:

Private Sub trova_Click()

SearchStr$ = Text1.text
Adodc1.Recordset.Index = "Cognome"
Adodc1.Recordset.Seek "=", SearchStr$ 'e ricerca
If Adodc1.Recordset.NoMatch Then
Adodc1.Recordset.MoveFirst
End If

End Sub

Mi da errore e si ferma a Index

Inoltre vorrei che nella stringa di ricerca dovrebbe essere indifferente con caratteri maiuscoli e minscoli
e accettare anche una sola lettera, per esempio se inserisco A, si dovrebbe fermare al primo cognome che comincia per A

ciao

[optime]

prova con .Find invece che con . Seek

guarda qui http://msdn.microsoft.com/library/de...oadoupdate.asp

[gyonny]

niente da fare con find
anche perchè il debug si ferma una riga prima a Index

[optime]

usa solo .find, senza .index