Databae access 2000,
non riesco a ricordarmi la puntegiatura esatta per l'SQL in modo da ottenere in una list box una ricerca su una tabella dove digigitando ad esempio
dischi in un text
in una list box
mi appare la frase
dischi per marmo
dischi per ferro
........
si può fare in due modi se non ricordo male....
rs.open "SELECT * FROM prev_reg order by ragione_sociale
where .....(il campo dove c'è la parola digitata è spec.text) è il campo della tabella è preventivi.......", conn, adOpenDynamic, adLockOptimistic
(la punteggiatura qual'è?
oppure se non erro utilizzando like nel cliclo ma non mi succede nulla!!!
If Check7.Value = 1 Then
Set conn = New ADODB.Connection
strcnxn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " & App.path & "\contabilizzazione.mdb;Persist Security Info=False"
conn.open strcnxn
Set rs = New ADODB.Recordset
rs.open "SELECT * FROM prev_reg order by ragione_sociale ", conn, adOpenDynamic, adLockOptimistic
Do Until rs.EOF
If rs!voce Like spec.Text Then
mat_prev.AddItem "Attrezzi"
mat_prev.AddItem rs!ragione_sociale & " " & rs!voce & " " & rs!preventivo
contalaterizzi = contalaterizzi + 1
rs.MoveNext
Else
rs.MoveNext
End If
Loop
rs.close
conn.close
xListKillDupes4
Set rs = Nothing
Set conn = Nothing
End If
help me!!!!!!
scusate se ho fatto un po di casino!!!
Rispondi quotando
