Convertir variables alfanumericas a numericas

[Federico]

No consigo convertir variables alfanumericas a numericas, cuando lo intento con Cint o CDbl, me dice que no son compatibles, y es que con Isnumeric me dice que si son numericas, pero cuando intento compararlas entre si, lo hace como si fueran alfanumericas, alguien me puede echar una mano.
Gracias

[Myakire]

Si pones el fragmento del código, ejemplos de los valores, error exacto y en general más información que en realidad nos ayudaran a entender el problema, con mucho gusto.

[Federico]

Voy a intentar explicarlo:
-Por un lado tengo la variable "MIN_RENT_ANO", recogida de un formulario
MIN_RENT_ANO = Request.Form("RENT_ANO")
-y por otro lado otra variable, que es una subcadena de un campo de una base de datos, que voy recorriendo registro a registro
RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value))-1)
-Si yo trato estas variables individualmente como numericas no tengo problemas
MIN_RENT_ANO = (MIN_RENT_ANO * 2) '5 * 2 = 10
RENT_ANO = (RENT_ANO * 2) '15 * 2 = 30
ISNUMERIC(MIN_RENT_ANO) 'me dice verdadero
ISNUMERIC(RENT_ANO) 'me dice verdadero
-Pero si las comparo
If RENT_ANO >= MIN_RENT_ANO Then
-------
-------
End If
la comparacion la hace como variables alfanumericas
es decir si MIN_RENT_ANO ha cargado un valor de "5" y RENT_ANO ha cargado un valor de "15", para la comparacion MIN_RENT_ANO es mayor que RENT_ANO, lo cual no sucederia, si las variables fueran realmente numericas.
Si intento convertir las variables
CDbl(MIN_RENT_ANO)
CDbl(RENT_ANO)
Me dice "No coinciden los tipos: 'CDbl'"
No se si habre conseguido explicarlo, si necesitas algun dato mas dimelo
Gracias

[AlZuwaga]

Lo único que se me ocurre es que en alguna de las dos variables te esté llegando un non-breaking space...

Verificá que no esté el caracter CHR(255) o el espacio que sale de la combinación de teclas ALT+255 (me parece que este último es el que hace tronar las cosas)

[redkram]

MIN_RENT_ANO_1=ISNUMERIC(MIN_RENT_ANO)
RENT_ANO=ISNUMERIC(RENT_ANO)
if MIN_RENT_ANO_1=True and RENT_ANO_1=True then
If RENT_ANO >= MIN_RENT_ANO Then

end if
end if

creo que te faltaba la comprobación del if IsNumeric=True, ya que por mucho que te de True o false continuas haciendo el IF RENT_ANO >= MIN_RENT_ANO then

Salu2 RK

[Federico]

No si ya tengo claro que no son variables numericas, pues con
If Isnumeric(REN_ANO) Then
no hace nada, pero es que tampoco me deja convertilas en numericas ni con "CDbl", ni con "Cint", pues como ya dije me lanza el error de "no coinciden los tipos"; ¿alguna idea?.

[Federico]

Quise decir "If Isnumeric(REN_ANO) = True Then"

[u_goldman]

Necesitas poner tu formulario y el codigo donde recoges los valores, de otro modo es imposible adivinar que estas haciendo mal, if isNumeric(valor) o if isNumeric(valor) = true debe hacer lo mismo, ambos regresan un booleano.

Cuando pongas tu codigo por favor usa las etiquetas [C O D E]

Saludos

[Federico]

El formulario es el siguiente:
[C O D E]
<form action="seleccionar.asp" method="post" name="SELECCION" id="SELECCION">
<table width="100%" border="1">
<td><div align="right"><strong>MIN. RENT. A&Ntilde;O : </strong></div></td>
<td nowrap><input tabindex="1" name="RENT_ANO" type="text" id="RENT_ANO" value="5.00" size="2" maxlength="5">
%</td>
</tr>
<tr>
<td><div align="right"><strong>MIN. RENT. ANUAL : </strong></div></td>
<td nowrap><input tabindex="2" name="RENT_ANUAL" type="text" id="RENT_ANUAL" value="15.00" size="2" maxlength="5">
%</td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input tabindex="3" name="SELECCIONAR" type="submit" id="SELECCIONAR" value="SELECCIONAR">
</div></td>
</tr>
</table>
</form>
[C O D E]
Y la carga de variables asi:
[C O D E]
MIN_RENT_ANO = Request.Form("RENT_ANO")
MIN_RENT_ANUAL = Request.Form("RENT_ANUAL")
RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value))-1)
RENT_ANUAL = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value))-1)
[C O D E]
Y la comparacion como ya dije:
[C O D E]
If RENT_ANO >= MIN_RENT_ANO And RENT_ANUAL >= MIN_RENT_ANUAL Then
----
End If
[C O D E]

[Shiryu_Libra]

a que federico

CODE, pero sin espacios y el ultimo asi /CODE, encerrados con corchetes [,]
para que de este efecto

Código:

Variable=esa misma

[Shiryu_Libra]

por que utilizas espacios, al llamar los items???

Código PHP:

  RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value))-1)
RENT_ANUAL = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value))-1) 
   

[Federico]

Corregido:
El formulario es el siguiente:
[C O D E]
<form action="seleccionar.asp" method="post" name="SELECCION" id="SELECCION">
<table width="100%" border="1">
<td><div align="right"><strong>MIN. RENT. A&Ntilde;O : </strong></div></td>
<td nowrap><input tabindex="1" name="RENT_ANO" type="text" id="RENT_ANO" value="5.00" size="2" maxlength="5">
%</td>
</tr>
<tr>
<td><div align="right"><strong>MIN. RENT. ANUAL : </strong></div></td>
<td nowrap><input tabindex="2" name="RENT_ANUAL" type="text" id="RENT_ANUAL" value="15.00" size="2" maxlength="5">
%</td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input tabindex="3" name="SELECCIONAR" type="submit" id="SELECCIONAR" value="SELECCIONAR">
</div></td>
</tr>
</table>
</form>
[/C O D E]
Y la carga de variables asi:
[C O D E]
MIN_RENT_ANO = Request.Form("RENT_ANO")
MIN_RENT_ANUAL = Request.Form("RENT_ANUAL")
RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value))-1)
RENT_ANUAL = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value), 1, LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD INTERANUAL").Value))-1)
[/C O D E]
Y la comparacion como ya dije:
[C O D E]
If RENT_ANO >= MIN_RENT_ANO And RENT_ANUAL >= MIN_RENT_ANUAL Then
----
End If
[/C O D E]

[Federico]

Lo del espacio de los items, es que lo mete el editor del foro al publicar la respuesta, pero en el codigo original no hay espacios.

[Shiryu_Libra]

una observacion,

RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value), 1,
LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL AÑO").Value))-1)

podrias quitar la Ñ, de una de tus variables e intentarlo de nuevo??


RENT_ANO = MID((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL ANO").Value), 1,
LEN((CONEXION_COTIZACIONES.Fields.Item("RENTABILID AD EN EL ANO").Value))-1)

[Myakire]

RENTABILID AD EN EL ANO?

:-p

[tammander]

[u_goldman]