[VB6] ADO ed equivalente di proprietà NoMatch

[Antagonista]

Salve a tutti.
Avevo un controllo DAO con cui facevo ricerche in un db
Inserendo Data1.Recordset.NoMatch riuscivo a dare un messaggio nel caso in cui non ci fossero risultati.
Adesso ho un ADO e non ho trovato la proprietà NoMAtch.
Quando non trova valori nella ricerca mi rimanda in automatico all'ultimo record.
Perchè?
Come faccio a dargli un messaggio che non ci sono valori corrispondenti alla ricerca?
Grazie.

[oregon]

Come fai la ricerca con ADO? Usi una frase SELECT?

Se non hai trovato record allora il recordset e' vuoto e le due proprietà BOF e EOF saranno vere.

[Jupy64]

Ciao, ma come fai la ricerca? Se filtri usando una query, devi controllare la proprietà EOF e BOF se sono True allora non ci sono record.

[Jupy64]

Originariamente inviato da oregon
Come fai la ricerca con ADO? Usi una frase SELECT?

Se non hai trovato record allora il recordset e' vuoto e le due proprietà BOF e EOF saranno vere.

ops... questione di secondi..

[Antagonista]

cerco con select e LIKE.
se non esiste nulla simile al criterio di ricerca non mi fa uscire le righe vuote ma mi fa sempre uscire l'ultimo utente del database.
Non capisco perchè....
D'altro canto come si usa BOF EOF?
Perchè, se uso select = qualcosa e non c'è, mi esce riga vuota e invece con like mi esce sempre l'ultimo utente del db?
Grazie.

[Antagonista]

Cerco dei dati in campo chiamato PON.
Uso ADO, creo una select con un LIKE
Select....Pon Like "dato%"
cerco un PON chiamato Ciao (che non esiste).
Il risultato è un certo sig Ruandi(ultimo record) che ha al suo attivo un pon in tecniche di recitazione.
Cosa centra con Ciao?
Perchè?
Voglio che non esca nulla!!

Grazie per l'aiuto.

[oregon]

Ci fai vedere il codice con la SELECT esattamente come l'hai scritto?

[Antagonista]

Questo è il codice

Private Sub oktrovaspec_Click()
If valcerca.Text = "" Or valspec.Text = "" Then
MsgBox "Inserire i dati per la ricerca", vbInformation
Else
Dim primo As String
Dim secondo As String
primo = scelta2.Caption
secondo = valcerca.Text
SQL = "SELECT * FROM Anagrafica where " & primo & " LIKE '%" & secondo & "'"
Adodc2.RecordSource = SQL
Adodc2.Refresh
End If
End Sub

le variabili primo e secondo sono dei dati dinamici che servono a creare la query.