vb6 dove è l'errore?chi mi aiuta?

[angelocikuantis]

Private Sub Command1_Click()
'Ricerca un nome all'interno dell'agenda.
Dim NomeDaCercare As String
NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'agenda")



Data1.RecordSource = "select * from rubrica Where nome = 'NomeDaCercare' "
Data1.Refresh
End Sub

Il risultato è la dbgrid vuota senza nessun record

[LeleFT]

Forse così...

Private Sub Command1_Click() 
'Ricerca un nome all'interno dell'agenda. 
Dim NomeDaCercare As String 
NomeDaCercare = InputBox$("Immettere il nome da ricercare:", "Ricerca nell'agenda") 



Data1.RecordSource = "select * from rubrica Where nome = '" + NomeDaCercare + "'"
Data1.Refresh 
End Sub

Comunque... dovresti postare nel sottoforum dedicato a Visual Basic e Framework .NET.

Poi, cerca di usare i tag [*CODE][*/CODE] (senza asterischi) per il codice...


Ciao.

[angelocikuantis]

grazie moltissimo