Ciao a tutti
Ho un DB.mdb con una Tabella ordini e una tabellaVarianti
With tb3
.Name = "TVarianti"
Set .ParentCatalog = cat
.Columns.Append "idv_Var", adInteger ' Chiave primaria
.Columns("idv_Var").Properties("AutoIncrement") = True
.Columns.Append "idv_Ord", adInteger ' Chiave riferimento tabella Ordini
ecc...

Voglio fare una estrazione di tutte le varianti ad un dato ordine
Public Function RicercaOrdine(cOrd As Long)


On Error Resume Next
Err.Number = 0

rsVarmp.Close
Err.Number = 0

rsVarmp.CursorLocation = adUseClient
rsVarmp.Open "SELECT * FROM TVarianti WHERE idv_Ord = cOrd", _
    cn, adOpenDynamic, adLockOptimistic

'rsVarmp.Open "SELECT * FROM TVarianti WHERE idv_Ord LIKE '" & cOrd & "%'  ", _
'    cn, adOpenDynamic, adLockOptimistic

If Err.Number <> 0 Then
    MsgBox Err.Number + "  " + Err.Description
    
    Call GestErr("errore open rs in RicercaOrdine ", 1)
    End
End If

End Function
Quando faccio la Open del recordset mi segnala err=13 Tipo non corrispondente

Se modifico la open con LIKE
rsVarmp.Open "SELECT * FROM TVarianti WHERE idv_Ord LIKE '" & cOrd & "%' ", _
cn, adOpenDynamic, adLockOptimistic

funziona ma se cerco l'ordine 2 mi tira fuori il 2, 12, 20, 22, ecc. tutti le varianti il cui ordine contiene 2

Dove è l'errore?

Franco