Originariamente inviato da Zlatan8.
Ciao, il problemino stà proprio qua, cioè come faccio a fare la ricerca nel database?...Utilizzo ADO e già tempo fa non sono riuscito a fare la funzione di ricerca...Potresti aiutarmi?
Oddio, queste sono proprio le basi di programmazione nella gestione di un database, comunque:

codice:
Dim rs as adodb.recordset
Dim i as long
For i = 0 to list1.listcount - 1
    if rs.state <> adstateclosed then rs.close
    Set rs = CN.Execute("select <campo> from <tabella> where <campo> = " & list1.List(i))
    If Not rs.eof then
        Rem Il valore esiste, lo aggiungi al ListBox2
    End If
Next i
Occhio che ho scritto al volo, quindi controllo eventuali errori di battitura.



P.S.
Ti suggerisco di scaricarti i miei progetti di esempio, potrebbero tornarti utili:

ProvaLogin
http://nuke.vbcorner.net/Progetti/VB...3/Default.aspx

ADO, Parametri ed affini
http://nuke.vbcorner.net/Articoli/VB...5/Default.aspx

ADO DataProject 2
http://nuke.vbcorner.net/Progetti/VB...8/Default.aspx

Progetti vari: DataGrid_FilterSearch
http://nuke.vbcorner.net/Progetti/VB...9/Default.aspx

ed anche:

=============
Guide per SQL e ADO
http://nuke.vbcorner.net/Articoli/VB...4/Default.aspx
=============