Как исправить онлайн тест

Перезапуск теста после прохождения

Обучающие курсы часто включают тесты для проверки знаний. При этом успешное решение теста может быть обязательным для завершения курса или перехода к следующему разделу. Если учащийся не сдаст тест, он должен будет сначала заново изучить весь материал курс, а затем попробовать пройти тест еще раз.

Настроить такой сценарий с помощью инструментов iSpring очень просто. Рассмотрим подробнее, как это сделать.

Откройте презентацию, в которую нужно добавить проверочный тест.

Добавьте тест на нужный слайд презентации.

Нажмите Свойства на панели инструментов.

В свойствах теста на вкладке Основные выберите одну попытку для прохождения и нажмите ОК.

Нажмите Сохранить и вернуться в курс , чтобы сохранить изменения.

Чтобы настроить правила прохождения теста, перейдите в Структуру презентации.

Выберите слайд с тестом, нажмите на иконку Тест и отметьте Настройки .

В настройках теста отметьте опцию Перезапустить несданный тест при повторном посещении .

В настройках просмотра слайдов после теста выберите После прохождения теста . Так пользователь не сможет пройти на следующий слайд презентации, пока не пройдет тест.

Теперь нужно настроить ветвление теста, чтобы перенаправлять пользователя на определенный слайд презентации в зависимости от того, сдал он тест или нет. Выберите слайд с тестом, нажмите на иконку Тест и отметьте Ветвление .

Во вкладке Ветвление теста настройте нужные слайды и нажмите ОК . В данном примере ветвление настроено так, что при удачном прохождении теста пользователь попадает на следующий за тестом слайд, а при неудачном прохождении — возвращается к первому слайду курса.

Чтобы пользователь не смог переключиться с теста на какой-либо другой слайд презентации с помощью оглавления, измените Макет для слайда с тестом на Только слайд в структуре презентации.

Нажмите Сохранить и закрыть и вернитесь к презентации.

Сохраните изменения и опубликуйте курс.

В итоге у нас получился курс с тестом для проверки знаний, который является обязательным для прохождения. Если учащийся не сдаст тест, то ему нужно будет еще раз просмотреть весь материал, прежде чем заново приступить к прохождению теста.

Moodle in Russian — сообщество русскоязычных пользователей Moodle

Столкнулся с проблемой. Когда у теста задано количество попыток(например, 1) и пользователь использовал попытку, то снятие с курса и повторное назначение на курс не помогает в обнулении результатов теста.

Мне нужно, чтобы пользователь заново прошел тест. Т.е. обнулить его предыдущие попытки и дать ему заново пройти тест.

Подскажите, пожалуйста, уважаемые разработчики, каким методом web services это можно сделать?

Re: Сбросить(Обнуление) результаты теста

Верно, т. к. Мудл хранит историю тестирования, оценок и т. д.

Есть несколько способов добавления попыток тестирования (см. рис.):

1. В настройках самого теста ( поз. 1 ) увеличить кол-во попыток. Но это будет означать, что для ВСЕХ студентов кол-во попыток увеличится. Иногда это не нужно.
2. Можно переопределить настройки теста для одной группы ( поз. 2 ) или для отдельного студента ( поз. 3 ).
   Это удобно, когда нужно добавить попытку(и), установить новые даты начала/окончания тестирования или изменить другие настройки теста для какой-то конкретной группы или для конкретного студента.
3. Если нужно добавить попытки студентам, которые по какой-то причине испортили свои попытки (неумение работать в системе, обрыв связи, сбой системы, пересдача для получения более высокой оценки), то можно удалить эти попытки в результатах тестирования ( поз. 4 ).

Все описанные настройки находятся в блоке «Настройки» (в левой части страницы) в разделе «Управление тестом». Этот раздел появится в блоке после того, как Вы зайдете в какой-то тест (т. е., на главной странице курса кликнете по ссылке любого теста).

Re: Сбросить(Обнуление) результаты теста

Вадим, спасибо большое за ответ! Вы прислали не то,что нужно мне.

Мне нужно ИМЕННО обнуление попыток через web services API. Все должно быть автоматически, т.к. я делаю интеграцию своего приложения с Moodle.

Увеличение попыток не подходит, т.к. тогда метод core_grades_get_grades() будет возвращать список максимальной оценки за все попытки тестирования для одного пользователя.

Мне нужно получить одним REST-запросом оценки по последней попытке для всех пользователей данного теста.

Для этого я ограничил количество попыток = 1 и хочу просто сбрасывать попытки, после сдачи теста.

P.S. метод mod_quiz_get_user_attempts() не подходит, т.к. на каждого пользователя будет один REST-запрос — что не подходит мне.

Re: Сбросить(Обнуление) результаты теста

Nickolay Sergeev, ну не для всего есть функции web api, которые одним махом делает всё, что вам нужно. Если вам нужно какую-то особенную логику — делайте свой плагин, в нём реализуйте нужную функцию и вызывайте её.

Как пройти тест заново если одна попытка

Регистрация на форуме тут, о проблемах пишите сюда — alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите восстановить пароль

Поиск по форуму

Расширенный поиск

Привет всем! У меня вот такая проблема возникла:
Сделал я тест, он все отлично работает, только он одноразовый. Т.е. тест можно пройти только один раз, повторно нельзя (можно только если программу перезапустить)! Подскажите, как сделать так, чтобы тест можно было повторно пройти не перезагружая программу.

Вот часть моей проги, где возникает эта проблема:

procedure TForm2.Button1Click(Sender: TObject);
begin
if edit2.Text=» then
ShowMessage(‘Не Введена Фамилия’)
else
begin
Label1.Visible:=False;
Timer1.Enabled:=true;
RadioGroup1.ItemIndex:=clActiveCapt ion;
GroupBox1.Caption:=’Вопрос№1′;
Label2.Visible:=false;
Button1.Enabled:=false;
GroupBox1.Visible:=true;
RadioGroup1.Visible:=true;
Button2.Enabled:=true;
Button3.Enabled:=false;
ProgressBar1.Visible:=true;
Label3.Visible:=false;
Edit2.Visible:=false;
Memo1.Lines.Text:=’Вопрос 1′;
RadioGroup1.Items.Strings[0]:=’Ответ 1′;
RadioGroup1.Items.Strings[1]:=’Ответ 2′;
RadioGroup1.Items.Strings[2]:=’Ответ 3′;
end;
end;

procedure TForm2.Button2Click(Sender: TObject);
begin
case Button2.Tag of
0: begin
// Ответ на вопрос № 1
ProgressBar1.Position:=0;
if RadioGroup1.ItemIndex=0 then
begin
// Edit1.Text:=’1′;
IntToStr(StrToInt(edit1.Text)+1);
Edit1.Text:=IntToStr(StrToInt(edit1 .Text)+1);
end
else
RadioGroup1.ItemIndex:=clActiveCapt ion;
GroupBox1.Caption:=’Вопрос№2′;
Memo1.Lines.Text:=’Вопрос 2′;
RadioGroup1.Items.Strings[0]:=’Ответ 1′;
RadioGroup1.Items.Strings[1]:=’Ответ 2′;
RadioGroup1.Items.Strings[2]:=’Ответ 3′;
Button2.Tag:=Button2.Tag+1;
end;
1: begin
// Ответ на вопрос № 2
ProgressBar1.Position:=0;
if RadioGroup1.ItemIndex=1 then
begin
IntToStr(StrToInt(edit1.Text)+1);
Edit1.Text:=IntToStr(StrToInt(edit1 .Text)+1);
end
else
RadioGroup1.ItemIndex:=clActiveCapt ion;
GroupBox1.Caption:=’Вопрос№3′;
Memo1.Lines.Text:=’Вопрос 3′;
RadioGroup1.Items.Strings[0]:=’Ответ 1′;
RadioGroup1.Items.Strings[1]:=’Ответ 2′;
RadioGroup1.Items.Strings[2]:=’Ответ 3′;
Button2.Tag:=Button2.Tag+1;
end;
2: begin
// Ответ на вопрос № 3
ProgressBar1.Position:=0;
if RadioGroup1.ItemIndex=2 then
begin
IntToStr(StrToInt(edit1.Text)+1);
Edit1.Text:=IntToStr(StrToInt(edit1 .Text)+1);
end
else
.
RadioGroup1.ItemIndex:=clActiveCapt ion;
GroupBox1.Caption:=’Вопрос№10′;
Memo1.Lines.Text:=’Вопрос 10′;
RadioGroup1.Items.Strings[0]:=’Ответ 1′;
RadioGroup1.Items.Strings[1]:=’Ответ 2′;
RadioGroup1.Items.Strings[2]:=’Ответ 3′;
Button2.Tag:=Button2.Tag+1;
end;
9: begin
//
ProgressBar1.Position:=0;
if RadioGroup1.ItemIndex=0 then
begin
IntToStr(StrToInt(edit1.Text)+1);
Edit1.Text:=IntToStr(StrToInt(edit1 .Text)+1);
end;

Button1.Enabled:=True;
Button2.Enabled:=false;
Button3.Enabled:=true;
Edit1.Visible:=true;
Timer1.Enabled:=false;
Label3.Visible:=true;
Label2.Visible:=True;
edit1.ReadOnly:=true;
Edit2.Visible:=true;
label4.Visible:=false;
ProgressBar1.Visible:=false;
GroupBox1.Visible:=false;
RadioGroup1.Visible:=false;
Edit1.Visible:=False;
Label1.Visible:=True;
end;
end;
end;

Если ты проходишь тест повторно, то он выдает только первый вопрос, а при нажатии на Батон2 он переходит аж на строку Button1.Enabled:=True;
а Case .. of пропускает.