Buongiorno,
è la prima volta che scrivo su questo forum così ampio e interessante.
Comunque sto scrivendo un programma per effettuare una ricerca all'interno di un database Access, tramite vb6. In sostanza a me serve quache esempio di codice dove viene spiegato come realizzare questa ricerca. Su google non trovato molto(poi può essere che ho ricercato male)...e se ho trovato qualcosa non era quello che desideravo. Mi sono bloccato a questo codice:
codice:
Public Conn As ADODB.Connection
Public RS As ADODB.Recordset
Public Const str = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=prova.mdb"
Private Sub Command1_Click()
Dim matricola As String
matricola = Text1.Text
Set Conn = New ADODB.Connection
Set RS = New ADODB.Recordset
Conn.Open str
RS.Open "Tabella1", Conn, 3, 3
'Non funziona...codice sbagliato!
If RS("Matricola") = matricola Then
MsgBox ("Matricola presente")
Else
MsgBox ("Matricola non presente")
End If
End Sub
Nel controllo "IF", il codice è errato...è qui che non so come modificare!
Grazie a tutti in anticipo per le risposte!