Una idea: podrías ir construyendo una query en función de los campos del formulario...
Código:
Valor1 = Request.form(Campo1)
Valor2 = Request.form(Campo2)
.....
ValorN = Request.form(CampoN)
strQuery = "Select columnas_de_mi_tabla from mi_tabla where "
If Not(EsNulo(valor1)) ThenstrQuery = strQuery & " columna1 = " & valor1
End If
If Not(EsNulo(valor2)) ThenstrQuery = strQuery & " AND columna2 = " & valor2
End If
.....
If Not(EsNulo(valorN)) ThenstrQuery = strQuery & " AND columnaN = " & valorN
End If
Ojo: Si alguna de las columnas es varchar o datetime, en el where, el valor debe ir rodeado de comillas " columnaN =
'" & valorN &"
'"
Bueno, esto es una idea... Tendrás que tener cuidado con que por lo menos algún campo tenga valor o si no no pondrías la palabra where en la query, o que solo pongas el AND si hay m´sa de una condición, etc...