[VB6] Problemi con ricerca in database access

[Longhorn]

Ho letto un articolo di html.it che parlava di visual basic. Ad un certo punto parlavva di costruire una rubrica, scrivendo i dati in un database di access. Per cercare un nome in un database è stata scritta la seguente funzione:
Private Sub Cercacmd_Click()
Dim NomeDaCercare As String
NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nel database")
If NomeDaCercare <> "" Then
Data1.Recordset.Index = "Nome"
Data1.Recordset.Seek "=", NomeDaCercare
If Data1.Recordset.NoMatch Then
Data1.Recordset.MoveFirst
Data1.Refresh
MsgBox "Nome non trovato.", vbInformation, Me.Caption
End If
End If
End Sub
Io volevo fare un programma analogo, il mio database è allegato:
Quando vado a cercare mi dice che questa l'index non è valido in questa riga:
Data1.Recordset.Index = "Nome"
Io voglio che mi cerchi nella colonna nome valvola, cosa devo dare alla riga Data1.Recordset.Index = "Nome" al posto di nome?

[steneroz]

Magari "Nomevalvola"?

Devi dire il nome della colonna che vuoi cercare, ti eri già risposto da solo.

[Longhorn]

Gia messo,ma mi dice che non è valido.

[steneroz]

Mhh, strano
A questo punto mi viene il dubbio che qualcosa non quadri da qualche altra parte.
Alcuni di questi dubbi:
Esiste da te "Data1"? O gli hai dato un nome diverso?
Hai associato correttamente a "Data1" il recordset della tabella di access?
Magari hai associato soltanto alcuni campi della tabella e non "Nomevalvola"?

Queste sono solo supposizioni, bisognerebbe vedere come è messo il progetto che stai creando.

[Longhorn]

data1 è corretto perchè dal prog mi fa vedere le caratterisitche delle valvole. Per il resto mi dovete un po aiutare...