<p>1+1=(
<%
a=request.Form("1")
b=request.Form("2")
c=request.Form("3")
d=request.Form("4")
response.Write a
response.Write b
response.Write c
response.Write d
%>
)</p>
<form name="form1" method="post" action="xuanze.asp">
A<input type="radio" name="1" value="a">
2
B<input type="radio" name="2" value="b">
3
C<input type="radio" name="3" value="c">
4
D<input type="radio" name="4" value="d">
1
<input type="submit" name="Submit" value="提交">
</form>
<%
dim aa="恭喜您答对了"
dim bb="对不起您答错了"
if a=request.Form("1") then
response.Write aa
else
response.Write bb
end if
%>
错误类型:
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/xuanze.asp, line 34, column 6
dim aa="恭喜您答对了"
-----^
最简单的,要改的话自己弄
这些代码是asp代码,可以运行的
温馨提示:答案为网友推荐,仅供参考