Ciao a tutti, io non riesco a fare una cosa.
Ho la mia query che fa una semlice select, sul mio form ho un campo testo che si chiama pippo e infine ho un pulsante.Digitando una stringa nel campo pippo e cliccando sul pulsante vorrei fare un controllo sul db per verificare se quella stringa c'è nel db, nel caso non c fosse far apparire un msgbox che dice "nel db non c'e` il valore digitato`
Set rst2 = CreateObject("ADODB.Recordset")
SQL1 = "SELECT SERVER FROM Query1"
rst2.Open SQL1, conn 'apre il record
rst2.MoveFirst 'Mi metto all'inizio del Recordset
Do While Not rst2.EOF 'Finchè non arrivo alla fine del Recordset
If pippo <> rst2.Fields("SERVER") Then
MsgBox "non ce"
End If
rst.MoveNext 'Mi sposto al prossimo record
Loop
![]()