%@ LANGUAGE="JavaScript"%>
grade quiz
Grading ASP
<%
// Check the answers
correct = 0;
missed = "";
ans1 = Request("A1");
ans2 = Request("A2");
ans3 = Request("A3");
ans4 = Request("A4");
ans5 = Request("A5");
ans6 = Request("A6");
ans7 = Request("A7");
if (ans1 == 1)
correct++;
else
missed = missed + ' A1,';
if (ans2 == 2)
correct++;
else
missed = missed + ' A2,';
if (ans3 == 3)
correct++;
else
missed = missed + ' A3,';
if (ans4 == 1)
correct++;
else
missed = missed + ' A4,';
if (ans5 == 1)
correct++;
else
missed = missed + ' A5,';
if (ans6 == 3)
correct++;
else
missed = missed + ' A6,';
if (ans7 == 0)
correct++;
else
missed = missed + ' A7';
Response.Write ("You received " + correct + " correct -----");
if (correct == 7)
Response.Write ("Great job");
else
Response.Write (missed);
%>