Главная Коллекция "Otherreferats" Программирование, компьютеры и кибернетика Разработка электронной формы учетной карточки студента с автоматизированным заполнением полей

Разработка электронной формы учетной карточки студента с автоматизированным заполнением полей

Разработка, основные понятия и архитектура БД (базы данных). Модель БД и их разновидности. Выбор СУБД (системы управления базой данных) и технологии доступа. Автоматизированное заполнение полей учетной карточки студента. Разработка клиентского приложения.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 02.09.2010
Размер файла 1,3 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Страница:

textBox43.Text = ds3.Tables["осебе"].Rows[i][4].ToString();

textBox44.Text = ds3.Tables["осебе"].Rows[i][5].ToString();

textBox45.Text = ds3.Tables["осебе"].Rows[i][6].ToString();

textBox46.Text = ds3.Tables["осебе"].Rows[i][7].ToString();

textBox47.Text = ds3.Tables["осебе"].Rows[i][8].ToString();

textBox48.Text = ds3.Tables["осебе"].Rows[i][9].ToString();

textBox49.Text = ds3.Tables["осебе"].Rows[i][10].ToString();

textBox51.Text = ds3.Tables["осебе"].Rows[i][11].ToString();

textBox52.Text = ds3.Tables["осебе"].Rows[i][12].ToString();

textBox53.Text = ds3.Tables["осебе"].Rows[i][13].ToString();

textBox54.Text = ds3.Tables["осебе"].Rows[i][14].ToString();

textBox55.Text = ds3.Tables["осебе"].Rows[i][15].ToString();

textBox56.Text = ds3.Tables["осебе"].Rows[i][16].ToString();

}

//_________________________________________Переход на одну позицию вправо_______________

private void button4_Click(object sender, EventArgs e)

{

i = i+1;

label61.Text = Convert.ToString(i+" "+"из");

if (i < Convert.ToInt32(Nlabel.Text))

{

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

}

else

{

i = 0;

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

}

}

//_________________________________________Переход на одну позицию влево_______________

private void button3_Click(object sender, EventArgs e)

{

i--;

if (i > 0)

{

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

label61.Text = Convert.ToString(i + " " + "из");

}

else

{

i = 0;

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

label61.Text = Convert.ToString(i + " " + "из");

}

}

//_______________________________Расчет количества записей в таблице________________

public void LoadData()

{

N = 0;

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand com = new OleDbCommand("Select * From [Личные данные]", connect);

OleDbDataReader reader = com.ExecuteReader();

while (reader.Read())

{

N++;

}

connect.Close();

Nlabel.Text = Convert.ToString(N);

}

//_________________________________Меню______________________________

private void показатьToolStripMenuItem_Click(object sender, EventArgs e)

{

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

LoadData();

}

//_________________________________добавление данных в бд______________________________

public void dob_dan_v_tab_LichDan()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand command1 = connect.CreateCommand();

int i = 0;

i = i + 1;

command1.CommandText = "Insert into [Личные данные] ([Форма обучения], Специальность, Фамилия,Имя,Отчество,[Дата рождения],[Место рождения],Гражданство)" +

"Values ('" + textBox1.Text + "', '" + textBox2.Text + "','" + textBox3.Text + "', '" + textBox4.Text + "', '" + textBox5.Text + "', '" + textBox6.Text + "','" + textBox7.Text + "','" + textBox8.Text + "')";

command1.ExecuteNonQuery();

textBox1.Text = " ";

textBox2.Text = " ";

textBox3.Text = " ";

textBox4.Text = " ";

textBox5.Text = " ";

textBox6.Text = " ";

textBox7.Text = " ";

textBox8.Text = " ";

}

public void dob_dan_v_tab_mestreg()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "Insert into Местрег (индекс, область, район, город, улица,дом, квартира,корпус,телефон)" +

"Values ('" + textBox9.Text + "', '" + textBox10.Text + "','" + textBox11.Text + "', '" + textBox12.Text + "', '" + textBox13.Text + "', '" + textBox14.Text + "','" + textBox16.Text + "','" + textBox15.Text + "','" + textBox17.Text + "')";

command1.ExecuteNonQuery();

textBox9.Text = " ";

textBox10.Text = " ";

textBox11.Text = " ";

textBox12.Text = " ";

textBox13.Text = " ";

textBox14.Text = " ";

textBox15.Text = " ";

textBox16.Text = " ";

textBox17.Text = " ";

}

public void dob_dan_v_tab_tabMestpro()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "Insert into Местпрож (индекс, область, район, город, улица,дом, квартира,корпус,телефон)" +

"Values ('" + textBox18.Text + "', '" + textBox19.Text + "','" + textBox26.Text + "', '" + textBox25.Text + "', '" + textBox24.Text + "', '" + textBox23.Text + "','" + textBox21.Text + "','" + textBox22.Text + "','" + textBox20.Text + "')";

command1.ExecuteNonQuery();

connect.Close();

textBox18.Text = " ";

textBox19.Text = " ";

textBox26.Text = " ";

textBox25.Text = " ";

textBox24.Text = " ";

textBox23.Text = " ";

textBox21.Text = " ";

textBox22.Text = " ";

textBox20.Text = " ";

}

public void dob_dan_v_tab_obr()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "Insert into образование (образование, годокончания,с,серия, №,от,серияпас,№пас,выдан,когда,наименвоен,иняз)" +

"Values ('" + textBox27.Text + "', '" + textBox28.Text + "','" + textBox29.Text + "', '" + textBox30.Text + "', '" + textBox31.Text + "', '" + textBox32.Text + "','" + textBox33.Text + "','" + textBox34.Text + "','" + textBox35.Text + "','" + textBox36.Text + "','" + textBox37.Text + "','" + textBox38.Text + "')";

command1.ExecuteNonQuery();

textBox27.Text = " ";

textBox28.Text = " ";

textBox29.Text = " ";

textBox30.Text = " ";

textBox31.Text = " ";

textBox32.Text = " ";

textBox33.Text = " ";

textBox34.Text = " ";

textBox35.Text = " ";

textBox36.Text = " ";

textBox37.Text = " ";

textBox38.Text = " ";

}

public void dob_dan_v_tab_tabOsebe()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "Insert into осебе (мать, местраб,телефон,отец, местрабоц,телефонраб,№зачетки,№студбил,№прикзачисл,числозачисл,переводиз,курс,приказотчисл№,от,причинаотчисл,приказвост,отчис)" +

"Values ('" + textBox39.Text + "', '" + textBox40.Text + "','" + textBox41.Text + "', '" + textBox42.Text + "', '" + textBox43.Text + "', '" + textBox44.Text + "','" + textBox45.Text + "','" + textBox46.Text + "','" + textBox47.Text + "','" + textBox48.Text + "','" + textBox49.Text + "','" + textBox51.Text + "','" + textBox52.Text + "','" + textBox53.Text + "','" + textBox54.Text + "','" + textBox55.Text + "','" + textBox56.Text + "')";

command1.ExecuteNonQuery();

connect.Close();

textBox39.Text = " ";

textBox40.Text = " ";

textBox41.Text = " ";

textBox42.Text = " ";

textBox43.Text = " ";

textBox44.Text = " ";

textBox45.Text = " ";

textBox46.Text = " ";

textBox47.Text = " ";

textBox48.Text = " ";

textBox49.Text = " ";

textBox51.Text = " ";

textBox52.Text = " ";

textBox53.Text = " ";

textBox54.Text = " ";

textBox55.Text = " ";

textBox56.Text = " ";

}

private void добавитьToolStripMenuItem_Click(object sender, EventArgs e)

{

dob_dan_v_tab_LichDan();

dob_dan_v_tab_mestreg();

dob_dan_v_tab_tabMestpro();

dob_dan_v_tab_obr();

dob_dan_v_tab_tabOsebe();

MessageBox.Show("Данные успешно добавленны");

LoadData();

}

private void удалитьToolStripMenuItem_Click(object sender, EventArgs e)

{

del_v_tabLichDan();

del_v_tabmestreg();

del_v_tabMestpro();

del_v_tabobr();

del_v_tabOsebe();

MessageBox.Show("Данные успешно удалены");

LoadData();

}

private void очиститьToolStripMenuItem_Click(object sender, EventArgs e)

{

clear_tab();

}

//____________________Очистка________________________

public void clear_tab()

{

textBox1.Text = " ";

textBox2.Text = " ";

textBox3.Text = " ";

textBox4.Text = " ";

textBox5.Text = " ";

textBox6.Text = " ";

textBox7.Text = " ";

textBox8.Text = " ";

textBox9.Text = " ";

textBox10.Text = " ";

textBox11.Text = " ";

textBox12.Text = " ";

textBox13.Text = " ";

textBox14.Text = " ";

textBox15.Text = " ";

textBox16.Text = " ";

textBox17.Text = " ";

textBox18.Text = " ";

textBox19.Text = " ";

textBox26.Text = " ";

textBox25.Text = " ";

textBox24.Text = " ";

textBox23.Text = " ";

textBox21.Text = " ";

textBox22.Text = " ";

textBox20.Text = " ";

textBox27.Text = " ";

textBox28.Text = " ";

textBox29.Text = " ";

textBox30.Text = " ";

textBox31.Text = " ";

textBox32.Text = " ";

textBox33.Text = " ";

textBox34.Text = " ";

textBox35.Text = " ";

textBox36.Text = " ";

textBox37.Text = " ";

textBox38.Text = " ";

textBox39.Text = " ";

textBox40.Text = " ";

textBox41.Text = " ";

textBox42.Text = " ";

textBox43.Text = " ";

textBox44.Text = " ";

textBox45.Text = " ";

textBox46.Text = " ";

textBox47.Text = " ";

textBox48.Text = " ";

textBox49.Text = " ";

textBox51.Text = " ";

textBox52.Text = " ";

textBox53.Text = " ";

textBox54.Text = " ";

textBox55.Text = " ";

textBox56.Text = " ";

}

//------------------------удаление данных-------------------------------------

public void del_v_tabLichDan()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

//connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "DELETE FROM [Личные данные] WHERE ([Форма обучения]='" + textBox1.Text + "')";

connect.Open();

command1.ExecuteNonQuery();

}

public void del_v_tabmestreg()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

//connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "DELETE FROM Местрег WHERE (индекс='" + textBox9.Text + "')";

connect.Open();

command1.ExecuteNonQuery();

}

public void del_v_tabMestpro()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

//connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "DELETE FROM Местпрож WHERE (индекс='" + textBox18.Text + "')";

connect.Open();

command1.ExecuteNonQuery();

}

public void del_v_tabobr()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

//connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "DELETE FROM образование WHERE (образование='" + textBox27.Text + "')";

connect.Open();

command1.ExecuteNonQuery();

}

public void del_v_tabOsebe()

{

OleDbConnection connect = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=db1.mdb");

//connect.Open();

OleDbCommand command1 = connect.CreateCommand();

command1.CommandText = "DELETE FROM осебе WHERE (мать='" + textBox39.Text + "')";

connect.Open();

command1.ExecuteNonQuery();

}

private void button2_Click(object sender, EventArgs e)

{

i = Convert.ToInt32(Nlabel.Text)-1;

label61.Text = Convert.ToString(i+1 + " " + "из");

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

}

private void button1_Click(object sender, EventArgs e)

{

i =0;

label61.Text = Convert.ToString(1 + " " + "из");

tabLichDan();

tabMestReg();

tabMestpro();

tabobr();

tabOsebe();

}

private void печатьToolStripMenuItem_Click(object sender, EventArgs e)

{

Microsoft.Office.Interop.Excel.Application ObjExcel = new Microsoft.Office.Interop.Excel.Application();

Microsoft.Office.Interop.Excel.Workbook ObjWorkBook;

Microsoft.Office.Interop.Excel.Worksheet ObjWorkSheet;

//Книга.

ObjWorkBook = ObjExcel.Workbooks.Open(@"C:\UK.xls",

Type.Missing, Type.Missing, Type.Missing, Type.Missing,

Type.Missing, Type.Missing, Type.Missing, Type.Missing,

Type.Missing, Type.Missing, Type.Missing, Type.Missing,

Type.Missing, Type.Missing);

//ObjWorkBook = ObjExcel.Workbooks.Add(System.Reflection.Missing.Value);

//Таблица.

ObjWorkSheet = (Microsoft.Office.Interop.Excel.Worksheet)ObjWorkBook.Sheets[3];

//Значения [y - строка,x - столбец]

ObjWorkSheet.Cells[5, 11] = textBox50.Text;

ObjWorkSheet.Cells[6, 3] = textBox1.Text;

ObjWorkSheet.Cells[7, 3] = textBox2.Text;

ObjWorkSheet.Cells[8, 2] = textBox3.Text;

ObjWorkSheet.Cells[9, 2] = textBox4.Text;

ObjWorkSheet.Cells[10, 2] = textBox5.Text;

ObjWorkSheet.Cells[11, 3] = textBox6.Text;

ObjWorkSheet.Cells[12, 3] = textBox7.Text;

ObjWorkSheet.Cells[13, 3] = textBox8.Text;

ObjWorkSheet.Cells[14, 10] = textBox9.Text;

ObjWorkSheet.Cells[14, 13] = textBox10.Text;

ObjWorkSheet.Cells[15, 2] = textBox11.Text;

ObjWorkSheet.Cells[15, 12] = textBox12.Text;

ObjWorkSheet.Cells[16, 2] = textBox13.Text;

ObjWorkSheet.Cells[16, 11] = textBox14.Text;

ObjWorkSheet.Cells[16, 13] = textBox15.Text;

ObjWorkSheet.Cells[16, 16] = textBox16.Text;

ObjWorkSheet.Cells[17, 2] = textBox17.Text;

ObjWorkSheet.Cells[18, 10] = textBox18.Text;

ObjWorkSheet.Cells[18, 13] = textBox19.Text;

ObjWorkSheet.Cells[19, 2] = textBox26.Text;

ObjWorkSheet.Cells[19, 12] = textBox25.Text;

ObjWorkSheet.Cells[20, 2] = textBox24.Text;

ObjWorkSheet.Cells[20, 11] = textBox23.Text;

ObjWorkSheet.Cells[20, 13] = textBox22.Text;

ObjWorkSheet.Cells[20, 16] = textBox21.Text;

ObjWorkSheet.Cells[21, 2] = textBox20.Text;

ObjWorkSheet.Cells[23, 3] = textBox27.Text;

ObjWorkSheet.Cells[23, 15] = textBox28.Text;

ObjWorkSheet.Cells[24, 2] = textBox29.Text;

ObjWorkSheet.Cells[24, 11] = textBox30.Text;

ObjWorkSheet.Cells[24, 13] = textBox31.Text;

ObjWorkSheet.Cells[24, 15] = textBox32.Text;

ObjWorkSheet.Cells[26, 10] = textBox33.Text;

ObjWorkSheet.Cells[26, 12] = textBox34.Text;

ObjWorkSheet.Cells[27, 2] = textBox35.Text;

ObjWorkSheet.Cells[27, 13] = textBox36.Text;

ObjWorkSheet.Cells[28, 11] = textBox37.Text;

ObjWorkSheet.Cells[29, 12] = textBox38.Text;

ObjWorkSheet.Cells[33, 2] = textBox39.Text;

ObjWorkSheet.Cells[34, 5] = textBox40.Text;

ObjWorkSheet.Cells[35, 2] = textBox41.Text;

ObjWorkSheet.Cells[36, 2] = textBox42.Text;

ObjWorkSheet.Cells[37, 5] = textBox43.Text;

ObjWorkSheet.Cells[38, 2] = textBox44.Text;

ObjWorkSheet.Cells[40, 4] = textBox45.Text;

ObjWorkSheet.Cells[40, 12] = textBox46.Text;

ObjWorkSheet.Cells[42, 4] = textBox47.Text;

ObjWorkSheet.Cells[42, 11] = textBox48.Text;

ObjWorkSheet.Cells[43, 4] = textBox49.Text;

ObjWorkSheet.Cells[43, 14] = textBox51.Text;

ObjWorkSheet.Cells[45, 10] = textBox52.Text;

ObjWorkSheet.Cells[45, 13] = textBox53.Text;

ObjWorkSheet.Cells[46, 9] = textBox54.Text;

ObjWorkSheet.Cells[48, 10] = textBox55.Text;

ObjWorkSheet.Cells[48, 13] = textBox56.Text;

//Вызываем нашу созданную эксельку.

ObjExcel.Visible = true;

ObjExcel.UserControl = true;

}

private void печатьToolStripMenuItem_Click(object sender, EventArgs e)

{

Close();

}

}

}

Страница:


Подобные документы

  • Разработка СУБД

    Теоретические аспекты СУБД. Основные понятия. Функциональные возможности СУБД. Архитектура систем управления. Разработка базы данных. Крупные массивы данных размещают, как правило, отдельно от исполняемого программы, и организуют в виде базы данных.

    курсовая работа [30,5 K], добавлен 23.02.2006

  • Приложение в Visual Basic для работы с базой данных

    Создание базы данных при помощи СУБД, разработка собственного приложения. Информационно-логическая модель рекламного агентства. Структура реляционной базы данных в Access. Заполнение таблиц информацией. Структура приложения и взаимодействия форм.

    курсовая работа [12,6 M], добавлен 17.06.2014

  • Разработка базы данных и клиентского приложения для ЖКХ

    Автоматизация системы снятия показаний счетчиков энергии. Разработка базы данных и клиентского приложения для структур жилищно-коммунального хозяйства, занимающихся составлением квитанций. Описание предметной области. Тестирование клиентского приложения.

    курсовая работа [953,3 K], добавлен 01.09.2016

  • Создание базы данных "Продажи книг"

    Системы управления базами данных: сущность и характеристика. Типы данных и свойства полей СУБД Access. Объекты базы данных: таблицы, схемы данных, формы, запросы, отчеты. Разработка и проектирование базы данных "Продажи книг" в среде Microsoft Access.

    курсовая работа [1,8 M], добавлен 04.02.2013

  • Моделирование базы данных книжного магазина "Читай-город"

    Автоматизация деятельности книжного магазина. Информация базы данных. Заполнение полей таблиц "Книги", "Покупатель", "Поставщик", "Сотрудники". Создание запроса в режиме конструктора. Вывод данных с помощью форм. Разработка приложения СУБД MS Access.

    курсовая работа [3,2 M], добавлен 13.01.2015

  • Разработка приложения для работы с базой данных

    Классификация баз данных. Выбор системы управления базами данных для создания базы данных в сети. Быстрый доступ и получение конкретной информации по функциям. Распределение функций при работе с базой данных. Основные особенности иерархической модели.

    отчет по практике [1,2 M], добавлен 08.10.2014

  • Разработка приложения в среде Delphi, взаимодействующего с базами данных в Access

    Разработка приложения для осуществления работы с медицинскими данными с последующей их визуализацией. Изучение типов данных и свойств полей Access. Компоненты наборов данных. Структура базы данных для клиники. Экранные формы для отображения справочников.

    курсовая работа [1,5 M], добавлен 14.08.2014

  • Базы данных и СУБД

    Базы данных и системы управления ими. Свойства полей баз данных, их типы и безопасность. Программное обеспечение системы управления базами данных, современные технологии в данной области. Принципы организации данных, лежащие в основе управления.

    курсовая работа [24,6 K], добавлен 11.07.2011

  • Разработка информационной системы АЗС с использованием клиент-серверной технологии

    Проектирование физической и логической моделей удаленной базы данных для АЗС. Разработка базы данных в СУБД Firebird с помощью утилиты IBExpert. Создание клиентского приложения для Windows с использованием клиент-серверной технологии в среде C++ Builder.

    курсовая работа [3,9 M], добавлен 18.01.2017

  • База данных для организации учёта успеваемости студентов

    Логическая и физическая модели базы данных. Запрет на содержание неопределенных значений. Размещение базы данных на сервере. Реализация клиентского приложения управления базой данных. Модульная структура приложения. Основные экранные формы приложения.

    курсовая работа [1,4 M], добавлен 13.06.2012

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.

© 2000 — 2023, ООО «Олбест» Все права защищены