Ayuda en IF comparando datos

[pepelucho]

Hola tengo la siguiente base de datos:

codigo--- inicial .... final .... valor
1 .............1 ......... 50 ........30
2 .............51 ........ 100 ......45
3 ............101......... 200 .......66

Y desde un text tengo un numero, el cual quiero q se compare con los datos de mi base de datos. Ejm:

Mi text=4, que busque en la tabla y vea en que rango esta (entre inicial y final) y cuando encuentre su rango muestre su valor, he hecho esto pero no me funciona

Set rt=Server.CreateObject("adodb.recordset")
sql= "Select *from valores"
rt.open sql,conexion
Do while not rt.eof
cantidad=txtcantidad.text
If cantidad>=rt("inicial") and cantidad<=rt("final") then
valor=rt("valor")
End if
rt.movenext
Loop

Espèro me puedan ayudar en esto . . . Gracias

[edumferreyra]

Esto tiene que funcionar, y traerte un solo registro:

sql= "Select *from valores WHERE INICIAL >=" & cantidad & AND "FINAL <=" & cantidad

Slds. Edum.

[edumferreyra]

Esto tiene que funcionar, y traerte un solo registro:

sql= "Select *from valores WHERE INICIAL >=" & cantidad & "AND FINAL <=" & cantidad

Slds. Edum.

[pepelucho]

Cuando ejecuto el codigo como me pusiste no me manda ningun dato :S y si hay datos en la base de datos que deben coincidir... cual sera el error??

[edumferreyra]

porque no posteas como queda la cadena sql :

response.write sql
response.end

de esa forma vemos que puede estar pasando. Otra cosa, son campos numéricos??
Slds.

[pepelucho]

esto sale en el response.write
Select *from valores WHERE INICIAL >=20 AND FINAL <=20

y no muestra nada, pero si pruebo uno por:
Select *from valores WHERE INICIAL >=20 o Select *from valores WHERE FINAL<=20 SI ME MANDA RESPUESTA PERO LOS DOS JUNTOS NO ME MANDA NADA

sISon campos numericos

[AlZuwaga]

est´n al revéz los criterios :)

...<=20 AND FINAL >=20

[pepelucho]

Pero que sere de burro MUCHISIMAS GRACIAS POR AYUDARME Y DISCULPA POR HABERTE QUITADO TIEMPO