Ver Mensaje Individual
  #3 (permalink)  
Antiguo 19/10/2007, 12:49
Avatar de u_goldman
u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 3 meses
Puntos: 98
Re: Estructura Do Loop/While

Hola, pero de la manera que lo entendí, -a lo mejor mal porque es viernes- es que llegan 2 números ingresados desde el formulario, luego se toma el menor y se imprime en consecutivo hasta llegar al mayor, esto me suena a tarea...en fin, a ver si tanto alcohol me deja pensarlo bien .

Código:
Dim num1
Dim num2
Dim mayor
Dim menor

num1 = request.form("op1")
num2 = request.form("op2")

if isNumeric(num1) and isNumeric(num2) then
  num1 = cint(nu1)
  num2 = cint(num2)

  if num1 > num2 then
     mayor = num1
     menor = num2
  else
     mayor = num2
     menor = num1
  end if

  for i = menor to mayor
    Response.Write(i & "<br />")
  next
else
  Response.Write("Datos incorrectos")
end if

'cambiar ciclo for por este loop si se quiere utilizar un ciclo diferente
'do while menor <= mayor
 '  Response.write(menor & "<br />")
 '  menor = menor + 1
'loop
Salud
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway