PDA

Visualizza la versione completa : [VB] command Find


gyonny
17-11-2002, 02:28
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
:dh: :dh:

optime
17-11-2002, 11:44
prova con .Find invece che con . Seek

guarda qui http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dndao/html/daotoadoupdate.asp

gyonny
18-11-2002, 22:16
niente da fare con find
anche perch il debug si ferma una riga prima a Index

optime
18-11-2002, 23:02
usa solo .find, senza .index

Loading