Ver Mensaje Individual
  #2 (permalink)  
Antiguo 05/06/2003, 09:03
Avatar de Helbira
Helbira
 
Fecha de Ingreso: octubre-2001
Ubicación: Sevilla, España
Mensajes: 1.228
Antigüedad: 23 años, 6 meses
Puntos: 5
<%

i = request.form(RS("Question"))

if i = "" then

response.write "No contesto a la pregunta"
else


response.write("<p class='Ques'>" & RS("Question") & "</p>")
response.write("<p class='Ans'>La respuesta correcta:" & RS("Valor") & "")

if (i= RS("Valor")) Then

response.write(" <p class='CorExpl'>¡CORRECTO! Tu respuesta ha sido: " & i & "</p><br><br>")

else

response.write(" <p class='IncExpl'>¡INCORRECTO! Tu respuesta ha sido: " & i & "</p><br><br>")

end if
end if
RS.MoveNext
Loop

RS.Close
Set RS = Nothing
oConn.Close
Set oConn = Nothing

%>

Última edición por Helbira; 05/06/2003 a las 09:43