Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые обзорные » Автоматизація обліку пацієнтів в реєстратурі поліклініки

Реферат Автоматизація обліку пацієнтів в реєстратурі поліклініки





tify"> MessageBox.Show ("Заповніть правильно необхідні поля.", "Помилка", MessageBoxButtons.OK, MessageBoxIcon.Error);

}

}

private void button2_Click (object sender, EventArgs e)// Видалити пацієнта

{

try

{

string it = (string) dataGridView1.CurrentRow.Cells [0]. Value;

mydb = new sqliteclass ();

sSql = "DELETE FROM card WHERE fio = '" + it + "'";

if (mydb.iExecuteNonQuery (sPath, sSql, 1) == 0) {

Text = "Помилка видалення запису!";

mydb = null;

return;

}

mydb = null;

Text = "Запис видалено з БД!";

int ind = dataGridView1.SelectedCells [0]. RowIndex;

dataGridView1.Rows.RemoveAt (ind);

}

catch

{

MessageBox.Show ("Ви не обрали рядок для видалення", "Помилка", MessageBoxButtons.OK, MessageBoxIcon.Error);

}

}

private void dataGridView1_CellContentClick (object sender, DataGridViewCellEventArgs e)

{

string fio = (string) dataGridView1.CurrentRow.Cells [0]. Value;

mydb = new sqliteclass ();

sSql = "select * from card WHERE fio LIKE '%" + fio + "%'";

DataRow [] datarows = mydb.drExecute (sPath, sSql);

if (datarows == null) {

Text = "Помилка читання!";

mydb = null;

return;

}

foreach (DataRow dr in datarows) {

textBox2.Text = dr ["fio"]. ToString ();

label17.Text = dr ["male"]. ToString ();

textBox3.Text = dr ["birth_date"]. ToString ();

textBox4.Text = dr ["receipt"]. ToString ();

textBox6.Text = dr ["doctor"]. ToString ();

richTextBox2.Text = dr ["disease"]. ToString ();

richTextBox4.Text = dr ["medicine"]. ToString ();

textBox7.Text = dr ["proc"]. ToString ();

}

}

}

}

Зміст файлу

{

public partial class Form3: Form

{

private sqliteclass mydb = null;

private string sCurDir = string.Empty;

private string sPath = str...


Назад | сторінка 9 з 14 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Phonetic peculiarities of the popular science text
  • Реферат на тему: Grammar of the Text: its Basic Units and Main Features (based on the novel ...
  • Реферат на тему: Технології аналізу даних (Text Mining, Data Mining)
  • Реферат на тему: Російський ринок private banking
  • Реферат на тему: Private banking: стан та перспективи розвитку