level 3
笑嘻嘻看着小样
楼主
做一个单选和多选的
打分
题 对了得分错了不得分 单选做了 但是多选做了打分上面有问题 求指点下 或者直接写我正确代码 万分感谢啊 代码在下面,求改下;
<% @LANGUAGE="VBSCRIPT" %>
<html>
<body>
<form action="" method="post">
单选<p>1.工笔是那种绘画形式的技法 </p>
<p>
<input type="radio" name="q1" value="a" />
A.水彩画 </p>
<p>
<input type="radio" name="q1" value="b" />
B.油画</p>
<p>
<input type="radio" name="q1" value="c" />
C.水粉画</p>
<p>
<input type="radio" name="q1" value="d" />
D.国画</p>
<input type="hidden" name="x1" value="ture">
多选<p>2.冰激凌是从哪国传进来的外语 </p>
<p>
<input type="radio" name="q2" value="a" />
A.英国 </p>
<p>
<input type="radio" name="q2" value="b" />
B.法国</p>
<p>
<input type="radio" name="q2" value="c" />
C.美国</p>
<p>
<input type="radio" name="q2" value="d" />
D.俄国</p>
<input type="hidden" name="x2" value="ture">
你的成绩是:
<%
dim grade
grade=0
if request.Form("x1")="ture" then
if request.Form("q1")="a" then
grade=grade+2
end if
end if
多选条件
if request.Form("x2")="ture" then
if request.Form("q2")="a,b,c" then
grade=grade+2
end if
end if
response.Write"" &grade
%>
</body>
</html>
2015年05月08日 06点05分
1
打分
题 对了得分错了不得分 单选做了 但是多选做了打分上面有问题 求指点下 或者直接写我正确代码 万分感谢啊 代码在下面,求改下;
<% @LANGUAGE="VBSCRIPT" %>
<html>
<body>
<form action="" method="post">
单选<p>1.工笔是那种绘画形式的技法 </p>
<p>
<input type="radio" name="q1" value="a" />
A.水彩画 </p>
<p>
<input type="radio" name="q1" value="b" />
B.油画</p>
<p>
<input type="radio" name="q1" value="c" />
C.水粉画</p>
<p>
<input type="radio" name="q1" value="d" />
D.国画</p>
<input type="hidden" name="x1" value="ture">
多选<p>2.冰激凌是从哪国传进来的外语 </p>
<p>
<input type="radio" name="q2" value="a" />
A.英国 </p>
<p>
<input type="radio" name="q2" value="b" />
B.法国</p>
<p>
<input type="radio" name="q2" value="c" />
C.美国</p>
<p>
<input type="radio" name="q2" value="d" />
D.俄国</p>
<input type="hidden" name="x2" value="ture">
你的成绩是:
<%
dim grade
grade=0
if request.Form("x1")="ture" then
if request.Form("q1")="a" then
grade=grade+2
end if
end if
多选条件
if request.Form("x2")="ture" then
if request.Form("q2")="a,b,c" then
grade=grade+2
end if
end if
response.Write"" &grade
%>
</body>
</html>