ci sono riuscito.......

con:
codice:
dsTemp.Filter = dsTemp.Fields(2).Name & "='impianti'"