variables en bucle while

[alfton]

Tengo un problema con la consulta while este es el codigo...


tipo=Request.Form("tip")
nombre=Request.Form("nom")
cuenta=Request.Form("cue")
parcial=Request.Form("par")
muestra=parcial*5

sql2 = "SELECT * FROM ARTICULOS WHERE (CodTipo=" & tipo & ")"
set rec2 = Server.CreateObject("ADODB.Recordset")
set rec2 = con.execute(sql2)

posicion=0
while posicion<cuenta and not(rec2.eof)
rec2.movenext
posicion=posicion+1
wend

el fallo me da con la consulta "posicion<cuenta" del while.

posicion lo uso como contador para desplazarme por el registro.
cuenta es un contador del registro que se va incrementando conforme muestro los datos del registro y que voy pasando el valor de pagina a pagina.

en la misma pagina donde me da el error muestro los datos de las variables y el resultado es:
posicion 7 que es fin del registro
cuenta 6

con lo cual del while sale por fin de registro no por la consulta < y no entiendo porque.

[Adler]

Hola

Prueba así

Código asp:

sql2 = "SELECT * FROM ARTICULOS WHERE (CodTipo=" & tipo & ")"
set rec2 = con.execute(sql2)
 
posicion=0
while posicion > cuenta and not rec2.eof ' mientra posicion sea menor que cuenta
posicion=posicion+1
rec2.movenext
wend
 

Suerte

[alfton]

Gracias adler, por la idea.

Pero con tu consulta resulta que ya si hace caso a la condicion >, con lo cual el resultado es...
posicion=0
cuenta=6

es curioso de mi manera no hace caso a la condicion y con la tuya si pero no me vale asi porque no recorre el registro, una paradoja vaya.

[Muzztein]

no hay paradoja, es el orden en que colocas la instruccion movenext

[alfton]

Perdona muzztein pero no se si no te entiendo

he probado el orden de movenext dentro del bucle pero sigue sin dar resultado, por si es eso.
Y he puesto rec2.movefirst antes para asegurarme que empieza desde el primer registro pero sigue igual y el bucle se ejecuta hasta el final sin pararse en la condicion <.

Y lo q no entiendo es porque "posicion<cuenta". da resultado al salir del while 7<6
Y "posicion>cuenta" da resultado al salir del while 0>6

[JuanRAPerez]

Muzztein se refiere a que te mueves te mueves te mueves en todo el RS
pero nunca cuentas
hasta que terminan los regisotr cuentas


en cambio alder

inicia cciclo
cuenta
regresa a inicio ciclo


suerte

[alfton]

Gracias por los consejos ya os entiendo, pero aun sigue mi problema, lo expongo un poco mejor.

Asi no tengo ningun problema el ciclo sale con posicion=6

Código:

posicion=0
while posicion<6 and not(rec2.eof)
		
	posicion=posicion+1
	rec2.movenext
		
wend

Pero asi no, siendo cuenta=6

Código:

posicion=0
while posicion<cuenta and not(rec2.eof)
		
	posicion=posicion+1
	rec2.movenext
		
wend

Asi el ciclo sale por fin de registro con posicion=7

[Adler]

Hola

Prueba con

Código asp:

posicion=0
while posicion<CInt(cuenta) and not(rec2.eof)
        
    posicion=posicion+1
    rec2.movenext
        
wend
 

Suerte

[alfton]

Ahora si, mil gracias adler

Lo que no llego a entender es porque a veces no hace falta poner eso y en otras si.

Por ejemplo mas abajo de esa, tengo otra consulta y he tenido que ponerlo en las dos variables, para que funcione:

Código:

<%while not(rec2.eof) and CInt(cuenta)<=CInt(muestra)%>

de todas formas gracias de nuevo.

[Adler]

Hola

Acostúmbrate a que cuando recogas un valor, especificar que tipo de valor es

CDate -- fecha
CStr -- texto
CInt -- número
.....

Suerte

[alfton]

ok, ya no se me olvidara seguro, con la de vueltas que le he dado al error.

gracias

Un saludo