还是建议你改成英文的。
如果是两项比如是html htm
if instr(request.Form("复选按钮名"),"htm") and instr(request.Form("复选按钮名"),"html") then a=a+10
注意大小写
<%
dim a
if request.Form("单选按钮名")="Dreamweave" then a=10 end if
if request.Form("复选按钮名")="html","htm" then a=a+10 end if
response.Write "您分数是"&a&"分,总分是20分"
%>
if a then
end if
丢了end if啦