como reconocer el * como tal

[suntus]

Hola otra vez yo q pesado jejej

Mirad tengo un buscador por formulario

la pagina del form funciona correctamente asi
<select name="habitaciones" class="text3" size="1">
<option>-Select
Number-</option>
<option value="1">
1
<option value="2">
2
<option value="3">
3
<option value="4">
4
</select>

y en resultados entre otro codigo tengo este

SQL=SQL + " AND (((Habitaciones) = '" & R1 & "'))"


TODO ESTO VA DE MUERTE



pero claro se me a ocurrido que si en vez de pasar un numero paso el simbolo * sera como que le da igual el numero y q le muestre toda la busqueda independiente del numero

para ello en el form.. no se me acurre otra gran cosa que ponerle un * en unos de los Value .. pero claro luego pasa de mi cara y no me hace casooo

imagino q el error es q no se puede pasar el * como varible.....

¿alguna forma?

[Hgmhelio]

El valor del * mandalo en blanco y antes de hacer la busqueda pon una condicion si la variable de busqueda va en blanco haz la busqueda de todoso los elementos si no va en blanco haces la busqueda por el parametro que se envio (1,2,3 o 4).

[suntus]

ok la paso con valor 10
<option value="10"> -Select Number-</option>


y luego recojo todas las variables asi

<%

DIM T1,P1,P2

T1=Request.Form("tipo")
P1=Request.Form("precio")
R1=Request.Form("Habitaciones")
Z1=Request.Form("Zona")

select case P1
case "1" P1="a"
case "2" P1="b"
case "3" P1="c"
case "4" P1="d"
END SELECT

SELECT CASE P1

Case "a" SQL="SELECT * FROM productos WHERE (PrecioEuros)"
Case "b" SQL="SELECT * FROM productos WHERE (PrecioEuros BETWEEN 0 AND 90000)"
Case "c" SQL="SELECT * FROM productos WHERE (PrecioEuros BETWEEN 90000 AND 140000)"
Case "d" SQL="SELECT * FROM productos WHERE (PrecioEuros BETWEEN 140000 AND 999999999)"
END SELECT


'(((Tipo) = '" & T1 & "'))
' AND

If Z1="10" then
SQL=SQL + " AND (((zona) = '" & * & "'))"
ELSE
End If

SQL=SQL + " AND (((Tipo) = '" & T1 & "'))"

SQL=SQL + " AND (((Habitaciones) = '" & R1 & "'))"

SQL=SQL + " AND (((Zona) = '" & Z1 & "'))"

set conn = createobject("adodb.connection")
conn.open "sunandgolfhomes.com.resale"
set rs = createobject("adodb.recordset")
rs.open sql,conn,3,1


rc=rs.recordcount


DIM n
n=0

%>


lo que aparece en rojo es lo nuevo... pero da error de servidor

[Hgmhelio]

Quitale el * a tu consulta en SQL mandalo en blanco nomas ahi en el codigo rojo al final pones un * quitalo