Error de lógica

[Adrian Hernande]

Tengo el siguiente código:


IF acum < dias THEN
response.write(acum&" < "&dias)
dias = dias - acum
acum = 0
set cons = connupd.execute("UPDATE Histo_vacas SET dias_acum = '"&acum&"' where ((cedula = '"&cedula&"') and (periodo = '"&periodo&"'))")

ELSE
acum = acum - dias
dias = 0
set cons = connupd.execute("UPDATE Histo_vacas SET dias_acum = '"&acum&"' where ((cedula = '"&cedula&"') and (periodo = '"&periodo&"'))")

END IF

si mi lógica no me falla sólo debe entrar al IF sólo si acum es menor que dias, lo curioso es que el response.write me da el siguiente resultado "15 < 2", pensé que talvez lo estaba tomando como texto y lo hacía en orden alfabético pero no , probé con números más grandes por ejemplo: 30 y el resultado fue "30 < 2" a qué se puede deber esto, nunca me había pasado nada así es ilógico...

Gracias por su ayuda

[francog]

Tratar de verificar el tipo de datos de cada variable, trata de hacer lo siguiente.

Dim variable1
variable1=0

Dim variable2
variable1=0

ESPERO QUE TE SIRVA. OK

CHAU

[Renegado]

IF acum < dias THEN

Hace esto

IF cint(acum) < cint(dias) THEN