Prueba a ponerlo así:
Código:
RsHotel__MMColParam = "1"
if Request.Form("nombre_hot") <> "" then
RsHotel__MMColParam = Request.Form("nombre_hot")
end if
Supongo que la primera línea está por si no encuentra ningún dato en el formulario, que realice la consulta con el valor "1" ¿no?
Un saludo.