MUK-21_-_Тест с одним возможным ответом

	Главная страница		WebDesign		Гостевая книга		Форум		Огородников Е. В.		МУК 21		В избранное

Тест с одним возможным ответом

Вид:

вопрос1 теста (вставить)
Вариант1(вставить)
Вариант2(вставить)
Вариант3(вставить)
Вариант4(вставить)
Вариант5(вставить)

вопрос2 теста (вставить)
Вариант1(вставить)
Вариант2(вставить)
Вариант3(вставить)
Вариант4(вставить)
Вариант5(вставить)

вопрос3 теста (вставить)
Вариант1(вставить)
Вариант2(вставить)
Вариант3(вставить)
Вариант4(вставить)
Вариант5(вставить)

вопрос4 теста (вставить)
Вариант1(вставить)
Вариант2(вставить)
Вариант3(вставить)
Вариант4(вставить)
Вариант5(вставить)

вопрос5 теста (вставить)
Вариант1(вставить)
Вариант2(вставить)
Вариант3(вставить)
Вариант4(вставить)
Вариант5(вставить)

_

Код:

<HTML>
<HEAD>
</HEAD>
<BODY>
<!-- Начало кода -->
<FORM name=frmtest>

вопрос1 теста (вставить)<BR>
<INPUT type="radio" name="vop1">Вариант1(вставить)<BR>
<INPUT type="radio" name="vop1">Вариант2(вставить)<BR>
<INPUT type="radio" name="vop1">Вариант3(вставить)<BR>
<INPUT type="radio" name="vop1">Вариант4(вставить)<BR>
<INPUT type="radio" name="vop1">Вариант5(вставить)<BR>
<br>

вопрос2 теста (вставить)<BR>
<INPUT type="radio" name="vop2">Вариант1(вставить)<BR>
<INPUT type="radio" name="vop2">Вариант2(вставить)<BR>
<INPUT type="radio" name="vop2">Вариант3(вставить)<BR>
<INPUT type="radio" name="vop2">Вариант4(вставить)<BR>
<INPUT type="radio" name="vop2">Вариант5(вставить)<BR>
<br>

вопрос3 теста (вставить)<BR>
<INPUT type="radio" name="vop3">Вариант1(вставить)<BR>
<INPUT type="radio" name="vop3">Вариант2(вставить)<BR>
<INPUT type="radio" name="vop3">Вариант3(вставить)<BR>
<INPUT type="radio" name="vop3">Вариант4(вставить)<BR>
<INPUT type="radio" name="vop3">Вариант5(вставить)<BR>
<br>

вопрос4 теста (вставить)<BR>
<INPUT type="radio" name="vop4">Вариант1(вставить)<BR>
<INPUT type="radio" name="vop4">Вариант2(вставить)<BR>
<INPUT type="radio" name="vop4">Вариант3(вставить)<BR>
<INPUT type="radio" name="vop4">Вариант4(вставить)<BR>
<INPUT type="radio" name="vop4">Вариант5(вставить)<BR>
<br>

вопрос5 теста (вставить)<BR>
<INPUT type="radio" name="vop5">Вариант1(вставить)<BR>
<INPUT type="radio" name="vop5">Вариант2(вставить)<BR>
<INPUT type="radio" name="vop5">Вариант3(вставить)<BR>
<INPUT type="radio" name="vop5">Вариант4(вставить)<BR>
<INPUT type="radio" name="vop5">Вариант5(вставить)<BR>

<br> <INPUT type="button" name="option1" value="Оценка">
_<INPUT type="text" name="ocenka" value="0" size=5><BR>

</FORM>

<SCRIPT language=vbscript>

sub option1_onClick

sum=0 ' число верных ответов
kv=5 ' количество вопросов

'=== введите сюда номера верных ответов на все вопросы
nvotv1=1
nvotv2=2
nvotv3=3
nvotv4=4
nvotv5=5


 'обработка 1-го вопроса теста
if(document.frmtest.vop1(0).CHECKED) THEN vib=1
if(document.frmtest.vop1(1).CHECKED) THEN vib=2
if(document.frmtest.vop1(2).CHECKED) THEN vib=3
if(document.frmtest.vop1(3).CHECKED) THEN vib=4
if(document.frmtest.vop1(4).CHECKED) THEN vib=5
if nvotv1=vib then sum=sum+1

 'обработка 2-го вопроса теста
if(document.frmtest.vop2(0).CHECKED) THEN vib=1
if(document.frmtest.vop2(1).CHECKED) THEN vib=2
if(document.frmtest.vop2(2).CHECKED) THEN vib=3
if(document.frmtest.vop2(3).CHECKED) THEN vib=4
if(document.frmtest.vop2(4).CHECKED) THEN vib=5
if nvotv2=vib then sum=sum+1

 'обработка 3-го вопроса теста
if(document.frmtest.vop3(0).CHECKED) THEN vib=1
if(document.frmtest.vop3(1).CHECKED) THEN vib=2
if(document.frmtest.vop3(2).CHECKED) THEN vib=3
if(document.frmtest.vop3(3).CHECKED) THEN vib=4
if(document.frmtest.vop3(4).CHECKED) THEN vib=5
if nvotv3=vib then sum=sum+1

 'обработка 4-го вопроса теста
if(document.frmtest.vop4(0).CHECKED) THEN vib=1
if(document.frmtest.vop4(1).CHECKED) THEN vib=2
if(document.frmtest.vop4(2).CHECKED) THEN vib=3
if(document.frmtest.vop4(3).CHECKED) THEN vib=4
if(document.frmtest.vop4(4).CHECKED) THEN vib=5
if nvotv4=vib then sum=sum+1

 'обработка 5-го вопроса теста
if(document.frmtest.vop5(0).CHECKED) THEN vib=1
if(document.frmtest.vop5(1).CHECKED) THEN vib=2
if(document.frmtest.vop5(2).CHECKED) THEN vib=3
if(document.frmtest.vop5(3).CHECKED) THEN vib=4
if(document.frmtest.vop5(4).CHECKED) THEN vib=5
if nvotv5=vib then sum=sum+1

oc=5*sum/kv
document.frmtest.ocenka.value=oc
end sub
</SCRIPT>
<!-- Конец кода -->

<!-- copyright (i4) --><div align="center"><a href="http://www.ucoz.ru/" title="Создать сайт бесплатно"><img style="margin:0;padding:0;border:0;" alt="Hosted by uCoz" src="http://s205.ucoz.net/img/cp/8.gif" width="80" height="15" title="Hosted by uCoz" /></a><br /></div><!-- /copyright -->
</body>
</html>