Foros del Web » Programando para Internet » ASP Clásico »

no repetir preguntas. . .

Estas en el tema de no repetir preguntas. . . en el foro de ASP Clásico en Foros del Web. Que tal a todos Uds. en este foro. . . En asp tengo un arreglo con un determinado numero de preguntas, de las cuales se ...
  #1 (permalink)  
Antiguo 25/07/2007, 08:28
Avatar de AlfaCenturio  
Fecha de Ingreso: abril-2005
Ubicación: México
Mensajes: 286
Antigüedad: 19 años, 2 meses
Puntos: 0
no repetir preguntas. . .

Que tal a todos Uds. en este foro. . .

En asp tengo un arreglo con un determinado numero de preguntas, de las cuales se mostraran 3 de ellas aleatoriamente y en lista ordenada como se puede ver en el siguiénte código:

Código:
<%
dim arreglo
dim limite

arreglo = array("¿Archivo editable de Flash?","¿Simbolo que se puede programar?","¿FPS de una linea de tiempo estandar?","¿Funcion para detener linea de tiempo?","¿Metacomando para separar un objeto?","¿Tecla de función para crear un nuevo fotograma clave?","¿Cuantos tipod se animaciones existen?")
 
limite = ubound(arreglo)

function pregazar(limite)
    randomize()
    aleatorio = int(rnd*limite)
    response.write arreglo(aleatorio)
end function
   
response.write("<ol>")	 
response.write("<li>")
response.write(pregazar(limite))    
response.write("<li>")  
response.write(pregazar(limite))    
response.write("<li>")
response.write(pregazar(limite))      
response.write("</ol>")	   
%>
¿Cómo podría hacerle para que las preguntas que se muestran no se repitan, es decir, que las 3 preguntas que se muestran sean siempre diferentes?

Saludos.
__________________
"Todo lo que una persona pueda imaginar, otro podrá hacerlo realidad." Julio Verne
"No hay un solo tema científico, que no pueda ser explicado a nivel popular." Carl Sagan
  #2 (permalink)  
Antiguo 25/07/2007, 12:13
Avatar de AlZuwaga
Colaborador
 
Fecha de Ingreso: febrero-2001
Ubicación: 34.517 S, 58.500 O
Mensajes: 14.550
Antigüedad: 23 años, 3 meses
Puntos: 535
Re: no repetir preguntas. . .

Hola, a mi se me ocurre algo así:

Código:
<%
arreglo = array("¿Archivo editable de Flash?","¿Simbolo que se puede programar?","¿FPS de una linea de tiempo estandar?","¿Funcion para detener linea de tiempo?","¿Metacomando para separar un objeto?","¿Tecla de función para crear un nuevo fotograma clave?","¿Cuantos tipod se animaciones existen?")
limite = ubound(arreglo)
cuantos = 3

function pregazar(limite, cuantos)
	tmp = ""
	i = 1
	randomize()
	while i <= cuantos
		aleatorio = int(rnd*limite)
		if InStr(tmp, aleatorio) = 0 then
			tmp = tmp & aleatorio & ","
			i = i + 1
		end if
	wend
	pregazar = split(left(tmp, len(tmp) - 1), ",")
end function

arr = pregazar(limite, cuantos)

response.write "<ol>"
for i = 0 to cuantos - 1
	response.write "<li>" & arreglo(arr(i)) & "</li>"
next
response.write("</ol>")
%>
Saludos
  #3 (permalink)  
Antiguo 25/07/2007, 23:20
Avatar de AlfaCenturio  
Fecha de Ingreso: abril-2005
Ubicación: México
Mensajes: 286
Antigüedad: 19 años, 2 meses
Puntos: 0
Re: no repetir preguntas. . .

Gracias Al Zuwaga por la ayuda . . .
__________________
"Todo lo que una persona pueda imaginar, otro podrá hacerlo realidad." Julio Verne
"No hay un solo tema científico, que no pueda ser explicado a nivel popular." Carl Sagan
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:01.