Курсовая работа: Предметная область "тестирование"
КУРСОВОЕ ПРОЕКТИРОВАНИЕ
По дисциплине
«Базы данных»
Тема
“Тестирование”
Вариант №7
Содержание
Задание
Результаты анализа предметной области
Описание выполнения этапов проектирования
Концептуальная модель
Описание реляционной модели
Описание реализации запросов
Описание групп пользователей
Описание интерфейса
Описание контрольного пример
Сообщения программы
Тексты программы
Задание. Вариант №7
Предметная область «Тестирование». Возможные виды деятельности: ведение базы вопросов, распределенных по предметам, темам и уровням, и ответов (возможных и правильных) с указанием авторов вопросов; учет выполненного тестирования для каждого обучаемого с информацией о полученных им вопросах, данных ответах и общих результатах; формирование тестов из имеющихся вопросов.
Результаты анализа предметной области с описанием требований, правил предметной области, объектов, их атрибутов и взаимосвязей между ними.
Согласно заданию программный продукт должен выполнять следующие функции :
-деятельности: ведение базы вопросов, распределенных по предметам, темам и уровням, и ответов (возможных и правильных) с указанием авторов вопросов
-учет выполненного тестирования для каждого обучаемого с информацией о полученных им вопросах, данных ответах и общих результатах
-формирование тестов из имеющихся вопросов.
При этом были сформированы следующие объекты:
-Участник тестирования
-Тест
-Вопрос
-Ответ
-Автор
-Тема
-Уровень
-Предмет
Описание выполненных этапов проектирования БД.
После анализа предметной области указанные ранее объекты были преобразованы в таблицы базы данных.
Таблица-Первичный ключ
Участник-Ид участника
Тест-Ид теста
Вопрос-Ид вопроса
Ответ-Ид ответа
Автор-Ид автора
Тема-Ид темы
Уровень-Ид уровня
Предмет-Ид предмета
Выбор этих ключей обеспечивает уникальность записей в каждой из таблиц.
Так же для создания связей N:M были сформированы таблицы Тест-Вопрос и Вопрос-Ответ.
Поля таблиц были выбраны с учётом нормализации отношений, таблицы не содержат избыточных данных и не могут привести к различным аномалиям.
Концептуальная модель данных:
Описание реляционной модели данных
| Участник | |||
| Поле | Описание | Тип данных | Комментарий |
| ID_member | Ид участника | Текстовый | Ид участника |
| FIO | ФИО | Текстовый | ФИО |
| Passport | Паспорт | Текстовый | Паспортные данные |
| School | Школа | Текстовый | номер школы |
| Class | Класс | Текстовый | Номер класса |
| ID_test | Ид теста | Текстовый | Ид теста |
| Тест | |||
| Поле | Описание | Тип данных | Комментарий |
| ID_test | Ид теста | Текстовый | Ид теста |
| Info | Информация | Текстовый | Инф о тесте |
| Test_data | Дата проведения | Дата | Дата проведения |
| Location | Место проведения | Текстовый | Место тестирования |
| Вопрос | |||
| Поле | Описание | Тип данных | Комментарий |
| ID_question | Ид вопроса | Текстовый | Идентификатор |
| ID_theme | Ид темы | Текстовый | Идентификатор |
| ID_level | Ид уровня | Текстовый | Идентификатор |
| ID_subject | Ид предмета | Текстовый | Идентификатор |
| ID_author | Ид автора | Текстовый | Идентификатор |
| Q_text | Текст | Текстовый | Сам вопрос(текст) |
| Ответ | |||
| Поле | Описание | Тип данных | Комментарий |
| ID_answer | Ид ответа | Текстовый | Идентификатор |
| Grade | Оценка | Текстовый | Оценка за вопрос |
| Correct | Правильность | Текстовый | Флаг правильности ответа |
| Ответ-Вопрос | ||
| Поле | Описание | Тип данных |
| ID_question | Ид вопроса | Текстовый |
| ID_answer | Ид ответа | Текстовый |
| Тест-Вопрос | ||
| Поле | Описание | Тип данных |
| ID_test | Ид теста | Текстовый |
| ID_question | Ид вопроса | Текстовый |
| Предмет | ||
| Поле | Описание | Тип данных |
| ID_subj | Ид предмета | Текстовый |
| Info | Данные о предмете | Текстовый |
| Автор | ||
| Поле | Описание | Тип данных |
| ID_author | Ид автора | Текстовый |
| Info | Данные об авторе | Текстовый |
| FIO | ФИО автора | Текстовый |
| book | Данные о книге, из которой был взят вопрос | текстовый |
|
|||||||||||||||||
| Поле | Описание | Тип данных | |||||||||||||||
| Код | Ид темы | Текстовый | |||||||||||||||
| S_text | Описание темы | Текстовый | |||||||||||||||
Описание способов реализации запросов и отчётов
Подсчет кол-ва тестов за заданный промежуток времени
SELECT COUNT(ID_test) AS [Kol-vo]
FROM Test
WHERE test_date between x AND y;
Вывод фамилии с поиском по ид теста
SELECT FIO
FROM Member
WHERE ID_test=test;
Вывод оценок ответов в данном тесте
SELECT Answer.grade, Test_Question.ID_test, Test_Question.ID_question, Answer.ID_answer
FROM Answer INNER JOIN (Test_Question INNER JOIN Answer_Question ON Test_Question.ID_question = Answer_Question.ID_question) ON Answer.ID_answer = Answer_Question.ID_answer
WHERE (((Test_Question.ID_test)=[x]) AND ((Test_Question.ID_question)=[Answer_Question].[ID_question]) AND ((Answer.ID_answer)=[Answer_Question].[ID_answer]) AND ((Answer.correct)='yes'));
Поиск участников теста по месту проведения теста
SELECT *
FROM Member
WHERE ID_test=ALL
(SELECT ID_test FROM Test
WHERE location=Gorod);
Поиск вопроса по участку текста вопроса
SELECT *
FROM Question
WHERE Q_text LIKE x+'*';
Вывод всех тестов за промежуток времени
SELECT *
FROM test
WHERE test_date BETWEEN x AND y;
Подсчет кол-ва тестов за прошедшую неделю
SELECT Count(ID_test) AS [kol-vo testov]
FROM Test
WHERE test_date BETWEEN NOW()-7 AND NOW();
Вывод даты проведения теста по ид участника
SELECT test_date
FROM Test AS T INNER JOIN Member AS M ON T.ID_test=M.ID_test
WHERE M.ID_member=member;
Описание групп пользователей ИС, средств управления разделением доступа и функциональных возможностей каждой группы
При реализации продукта было выделено три группы пользователей
Главный администратор:
-возможность просматривать таблицы пользователей и изменять их
-возможность просматривать и изменять все таблицы
-возможность выполнять все вопросы
-возможность просматривать лог действий
Преподователь:
-возможность просматривать и изменять таблицы , связанные с предметной областью
-возможность выполнять все запросы
Ученик:
-возможность просматривать таблицы Вопрос,Тема,Предмет,Автор без изменения их
-возможность выполнения всех запросов
Описание интерфейса ИС
Программа была разработана с использованием одного окна, изменяющего свои размеры в зависимости от этапа работы программы.
1.Окно авторизации при запуске программы:
2.Окно программы при входе под записью главного администратора:
Пример окна после выбора пункта меню-база данных-таблицы-вопросы
Таблица редактируется(изменение уже созданной записи и создание новой здесь же)
Жмем «сохранить» и сохраняем наши изменения в БД
3,При нажатии на пункт меню «запросы» становиться доступным выбор возможных запросов
Пример окна после выбора запроса
Пример запроса с вводом двух данных
4.Просмотр лога действий(базы данных-лог)
Описание контрольного примера
В качестве контрольного примера рассмотрим выполнение запроса на подсчет кол-ва тестов за определенный промежуток времени
1.Входим в систему
2.Выбираем пункт меню «запросы»
3.Выбирем нужный нам запрос
4.Вводим данные и нажимаем «ок»
5.Вводим другой промежуток времени
Сообщения программы, причины, их вызывающие, и реакция пользователя на сообщения
1.Сообщение о неверном вводе логина или пароля
2.Попытка создания записи главного администратора
В системе запрещено создание дублирующих записей. Запись главного администратора является единственной и не может быть удалена из системы.
Текст программы, с необходимыми комментариями
Реализация входа пользователя в систему
private: System::Void Вход_Click(System::Object^ sender, System::EventArgs^ e) {
if((textBox1->Text!="") && (textBox2->Text!=""))
{
String^ connect="provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection = gcnew OleDbConnection(connect);
OleDbCommand^ myOleDbCommand = myOleDbConnection->CreateCommand();
myOleDbCommand->CommandText =
"Select [id],[lvl]"+
"FROM [auth]"+
"WHERE [login]='"+textBox1->Text+"' AND ([pass]='"+textBox2->Text+"');";
myOleDbConnection->Open();
OleDbDataReader^ myOleDbDataReader = myOleDbCommand->ExecuteReader();
while(myOleDbDataReader->Read())
{
id=Convert::ToInt32(myOleDbDataReader[0]);
lvl=Convert::ToInt32(myOleDbDataReader[1]);
}
myOleDbDataReader->Close();
myOleDbConnection->Close();
}
else
{
this->label3->Visible=true;
}
if(lvl==0)
{
String^ connectionString2 = "provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection2 = gcnew OleDbConnection(connectionString2);
OleDbCommand^ myOleDbCommand2 = myOleDbConnection2->CreateCommand();
myOleDbCommand2->CommandText =
"INSERT INTO [log] "+
"VALUES ("+id+", Now(), 'Вход в систему');";
myOleDbConnection2->Open();
OleDbDataReader^ myOleDbDataReader2 = myOleDbCommand2->ExecuteReader();
myOleDbConnection2->Close();
this->Text = L"Работа с БД";
this->ClientSize = System::Drawing::Size(500, 220);
this->menuStrip1->Visible=true;
this->textBox1->Visible=false;
this->textBox2->Visible=false;
this->label1->Visible=false;
this->label2->Visible=false;
this->Вход->Visible=false;
this->Выход->Visible=false;
this->dataGridView1->Visible=true;
this->dataGridView1->Location = System::Drawing::Point(12,30);
this->listBox1->Visible=true;
this->listBox1->Location=System::Drawing::Point(300,30);
}
if(lvl==1)
{
String^ connectionString2 = "provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection2 = gcnew OleDbConnection(connectionString2);
OleDbCommand^ myOleDbCommand2 = myOleDbConnection2->CreateCommand();
myOleDbCommand2->CommandText =
"INSERT INTO [log] "+
"VALUES ("+id+", Now(), 'Вход в систему');";
myOleDbConnection2->Open();
OleDbDataReader^ myOleDbDataReader2 = myOleDbCommand2->ExecuteReader();
myOleDbConnection2->Close();
this->Text = L"Работа с БД";
this->ClientSize = System::Drawing::Size(500, 220);
this->menuStrip1->Visible=true;
this->пользователяToolStripMenuItem->Visible=false;
this->участникиToolStripMenuItem->Visible=false;
this->логToolStripMenuItem->Visible=false;
this->textBox1->Visible=false;
this->textBox2->Visible=false;
this->label1->Visible=false;
this->label2->Visible=false;
this->Вход->Visible=false;
this->Выход->Visible=false;
this->dataGridView1->Visible=true;
this->dataGridView1->Location = System::Drawing::Point(12,30);
this->dataGridView1->ReadOnly=false;
this->listBox1->Visible=true;
this->listBox1->Location=System::Drawing::Point(300,30);
this->Сохранить->Enabled=true;
}
if(lvl==2)
{
String^ connectionString2 = "provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection2 = gcnew OleDbConnection(connectionString2);
OleDbCommand^ myOleDbCommand2 = myOleDbConnection2->CreateCommand();
myOleDbCommand2->CommandText =
"INSERT INTO [log] "+
"VALUES ("+id+", Now(), 'Вход в систему');";
myOleDbConnection2->Open();
OleDbDataReader^ myOleDbDataReader2 = myOleDbCommand2->ExecuteReader();
myOleDbConnection2->Close();
this->Text = L"Работа с БД";
this->ClientSize = System::Drawing::Size(500, 220);
this->menuStrip1->Visible=true;
this->пользователяToolStripMenuItem->Visible=false;
this->тестВопросToolStripMenuItem->Visible=false;
this->вопросОтветToolStripMenuItem->Visible=false;
this->ответыToolStripMenuItem->Visible=false;
this->участникиToolStripMenuItem->Visible=false;
this->тестыToolStripMenuItem->Visible=false;
this->логToolStripMenuItem->Visible=false;
this->уровеньToolStripMenuItem->Visible=false;
this->textBox1->Visible=false;
this->textBox2->Visible=false;
this->label1->Visible=false;
this->label2->Visible=false;
this->Вход->Visible=false;
this->Выход->Visible=false;
this->dataGridView1->Visible=true;
this->dataGridView1->Location = System::Drawing::Point(12,30);
this->dataGridView1->ReadOnly=true;
this->listBox1->Visible=true;
this->listBox1->Location=System::Drawing::Point(300,30);
this->Сохранить->Enabled=false;
}
}
Участок кода , реализующий один из запросов
if (flag==7)
{
String^ connect="provider=Microsoft.Jet.OLEDB.4.0;"+path_d;
OleDbConnection^ myOleDbConnection = gcnew OleDbConnection(connect);
DataSet = gcnew System::Data::DataSet();
DataSet->CaseSensitive = true;
OleDbCommand^ myOleDbCommand = myOleDbConnection->CreateCommand();
myOleDbCommand->CommandText ="SELECT Answer.grade, Test_Question.ID_test, Test_Question.ID_question, Answer.ID_answer FROM Answer INNER JOIN (Test_Question INNER JOIN Answer_Question ON Test_Question.ID_question = Answer_Question.ID_question) ON Answer.ID_answer = Answer_Question.ID_answer WHERE (((Test_Question.ID_test)='"+this->textBox3->Text+"') AND ((Test_Question.ID_question)=[Answer_Question].[ID_question]) AND ((Answer.ID_answer)=[Answer_Question].[ID_answer]) AND ((Answer.correct)='yes'));";
myOleDbConnection->Open();
myOleDbDataAdapter = gcnew OleDbDataAdapter();
myOleDbDataAdapter->SelectCommand = myOleDbCommand;
myOleDbDataAdapter->Fill(DataSet,"Test");
dataGridView1->DataSource = DataSet ;
dataGridView1->DataMember = "Test";
this->dataGridView1->DataSource = DataSet->Tables["Test"]->DefaultView;
myOleDbConnection->Close();
table="Test";
String^ connectionString2 = "provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection2 = gcnew OleDbConnection(connectionString2);
OleDbCommand^ myOleDbCommand2 = myOleDbConnection2->CreateCommand();
myOleDbCommand2->CommandText =
"INSERT INTO [log] "+
"VALUES ("+id+", Now(), 'Вывод оценок теста с указанием id теста');";
myOleDbConnection2->Open();
OleDbDataReader^ myOleDbDataReader2 = myOleDbCommand2->ExecuteReader();
myOleDbConnection2->Close();
}
Так как изменение данных и создание новой записи происходят средствами компонента datagridview то далее будет показан код, отвечающий за сохранение этих данных (кнопка «сохранить»)
private: System::Void Сохранить_Click(System::Object^ sender, System::EventArgs^ e) {
OleDbCommandBuilder^ myOleDbCommandBuilder=gcnew OleDbCommandBuilder(myOleDbDataAdapter);
myOleDbDataAdapter->Update(DataSet,table);
DataSet->AcceptChanges();
String^ connectionString2 = "provider=Microsoft.Jet.OLEDB.4.0;"+path_a;
OleDbConnection^ myOleDbConnection2 = gcnew OleDbConnection(connectionString2);
OleDbCommand^ myOleDbCommand2 = myOleDbConnection2->CreateCommand();
myOleDbCommand2->CommandText =
"INSERT INTO [log] "+
"VALUES ("+id+", Now(), 'Сохранение изменений');";
myOleDbConnection2->Open();
OleDbDataReader^ myOleDbDataReader2 = myOleDbCommand2->ExecuteReader();
myOleDbConnection2->Close();
}