Пример программы. //Программа работы с базой данных Экскурсии

//Программа работы с базой данных " Экскурсии"

//Создание базы

//Просмотр базы

//Поиск по названию страны с созданием файла выборки

//Сортировка по наименованию экскурсии в алфавитном порядке

//Сортировка в порядке возрастания стоимости путевки

#include < stdio.h>

#include < stdlib.h>

#include < conio.h>

#include < string.h>

#include < iostream.h>;

#define FNAME1 " A: \\bd1.dat" //имя файла с исходной базой

#define FNAME2 " A: \\bd2.dat" //имя файла с результатами поиска

void wind(int x1, int y1, int x2, int y2, int colf, int colb);

void dobavka();

void zag1();

void zag2();

void prosmotrbd1(char *fname);

void prosmotrbd2(char *fname);

void poiskcountry(char *fname1, char *fname2);

void sort_name(char *fname);

void sort_voz_cena(char *fname);

struct trip{unsigned char name[15]; //наименование экскурсии

unsigned char country[15]; //страна

unsigned int cena; //стоимость путевки

unsigned int time; //продолжительность

unsigned char trans[10]; //транспорт

};

FILE *baza1;

trip excur;

char otv;

int main()

{int var;

textbackground(BLACK);

clrscr();

wind(1, 1, 80, 25, 1, 15);

if((baza1 = fopen(FNAME1, " r+"))! = NULL)

{printf(" База данных экскурсий была создана раньше.\n");

printf(" Добавлять новые записи в базу зкскурсий? [Y/N]");

while(otv = getchar() == '\n');

if(otv == 'Y' || otv == 'y' || otv == 'Н' || otv == 'н')

if((baza1 = fopen(FNAME1, " a")) == NULL)

{printf(" \n Ошибка открытия базы данных для добавления\n");

abort();

}

else{printf(" \n Добавляем новые записи\n");

dobavka();

fclose(baza1);

}

}

else if((baza1 = fopen(FNAME1, " w+")) == NULL)

{printf(" \n Ошибка открытия пустой базы данных для чтения и записи\n");

abort();

}

else{printf(" Создаем новую базу\n");

dobavka();

fclose(baza1);

}

if((baza1 = fopen(FNAME1, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных для чтения и записи\n");

abort();

}

else printf(" \n База данных успешно создана\n");

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

for(;;) //меню программы

{wind(1, 1, 80, 25, 0, 15);

wind(20, 1, 60, 9, 1, 15);

//Выбор вида действия

cprintf(" \n Вид действия: \n\r");

cprintf(" 1 - сортировка по наименованию\n\r");

cprintf(" 2 - сортировка по цене путевки\n\r");

cprintf(" 3 - поиск по стране\n\r");

cprintf(" 4 - просмотр базы данных\n\r");

cprintf(" 5 - просмотр базы данных поиска\n\r");

cprintf(" 6 - завершение задачи\n\r");

cprintf(" Введите вид действия -> ");

cin > > var;

if(var == 6) break;

switch(var)

{case 1: wind(1, 10, 80, 15, 4, 15);

sort_name(FNAME1);

printf(" \n Сортировка закончена.");

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

break;

case 2: wind(1, 10, 80, 15, 2, 15);

sort_voz_cena(FNAME1);

printf(" \n Сортировка закончена.");

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

break;

case 3: wind(1, 10, 80, 25, 2, 15);

poiskcountry(FNAME1, FNAME2);

printf(" \n Поиск по стране закончен.");

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

break;

case 4: wind(1, 10, 80, 25, 2, 15);

prosmotrbd1(FNAME1);

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

break;

case 5: wind(1, 10, 80, 25, 2, 15);

prosmotrbd2(FNAME2);

printf(" \n Для продолжения нажмите Enter-> ");

getchar();

}

}

return 0;

}

//Вывод окна на экран

void wind(int x1, int y1, int x2, int y2, int colf, int colb)

{window(x1, y1, x2, y2);

textbackground(colf);

textcolor(colb);

clrscr();

}

//Добавление новых элементов в базу данных

void dobavka()

{do

{printf(" \nНаименование экскурсии? ");

scanf(" %s", & excur.name);

printf(" \nСтрана? ");

scanf(" %s", & excur.country);

printf(" \nСтоимость путевки? ");

scanf(" %u", & excur.cena);

printf(" \nПродолжительность? ");

scanf(" %u", & excur.time);

printf(" \nТранспорт? ");

scanf(" %s", & excur.trans);

fwrite(& excur, sizeof(excur), 1, baza1);

printf(" \nПродолжать? [Y/N]");

while((otv = getchar()) == '\n');

}

while(otv == 'Y' || otv == 'y' || otv == 'Н' || otv == 'н');

}

//Вывод заголовка при просмотре исходного файла

void zag1()

{int i;

printf(" \n");

for(i = 1; i < = 65; i++)

printf(" -");

printf(" \n|%15s|%15s|%10s|%10s|%10s\n",

" Наименование", " Страна", " Стоимость", " Продолжит.", " Транспорт");

for(i = 1; i < = 65; i++)

printf(" -");

}

//Вывод заголовка при просмотре файла поиска

void zag2()

{int i;

printf(" \n");

for(i = 1; i < = 65; i++)

printf(" -");

printf(" \n|%15s|%15s|%10s|%10s|%10s\n",

" Страна", " Наименование", " Стоимость", " Продолжит.", " Транспорт");

for(i = 1; i < = 65; i++)

printf(" -");

}

//Просмотр базы данных экскурсий

void prosmotrbd1(char *fname)

{int i;

FILE *baza1;

if((baza1 = fopen(fname, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных\n");

abort();

}

printf(" \n База данных экскурсий");

zag1();

rewind(baza1);

while(fread(& excur, sizeof(excur), 1, baza1) > 0)

{printf(" \n|%15s|%15s|%10u|%10u|%10s",

excur.name, excur.country, excur.cena, excur.time, excur.trans);

}

printf(" \n");

for(i = 1; i < = 65; i++)

printf(" -");

}

//Просмотр базы данных поиска экскурсий по стране пребывания

void prosmotrbd2(char *fname)

{int i;

FILE *baza2;

if((baza2 = fopen(fname, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных\n");

abort();

}

printf(" \n База данных поиска экскурсий по стране");

zag2();

rewind(baza2);

while(fread(& excur, sizeof(excur), 1, baza2) > 0)

{printf(" \n|%15s|%15s|%10u|%10u|%10s",

excur.country, excur.name, excur.cena, excur.time, excur.trans);

}

printf(" \n");

for(i = 1; i < = 65; i++)

printf(" -");

}

//Поиск по стране пребывания

void poiskcountry(char *fname1, char *fname2)

{unsigned char country[15];

FILE *baza1,

*baza2;

if((baza2=fopen(fname2, " w+")) == NULL)

{printf(" \n Ошибка открытия пустой базы данных для записи\n");

abort();

}

if((baza1 = fopen(fname1, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных для чтения и записи\n");

abort();

}

printf(" \n Название страны для поиска? ");

scanf(" %s", & country);

rewind(baza1);

while(fread(& excur, sizeof(excur), 1, baza1) > 0)

if(strncmp(excur.country, country, 15) == 0)

{fwrite(& excur, sizeof(excur), 1, baza2);

}

fclose(baza2);

fclose(baza1);

getchar();

}

//Сортировка по наименованию экскурсии по алфавиту

void sort_name(char *fname)

{int i;

int fl;

trip ppp;

FILE *baza1;

if((baza1 = fopen(fname, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных для чтения и записи\n");

abort();

}

fl=0;

do{rewind(baza1);

fl=0;

for(i=0; fread(& excur, sizeof(excur), 1, baza1) > 0; i += sizeof(excur),

fseek(baza1, i, SEEK_SET)) //позиция i от НАЧАЛА файла

{if(fread(& ppp, sizeof(excur), 1, baza1) > 0)

{if(strncmp(excur.name, ppp.name, 15) > 0)

{fseek(baza1, i, SEEK_SET); //позиция i от НАЧАЛА файла

fwrite(& ppp, sizeof(excur), 1, baza1);

fwrite(& excur, sizeof(excur), 1, baza1);

fl = 1;

}

}

}

}

while(fl);

fclose(baza1);

}

//Сортировка по убыванию стоимости путевки

void sort_voz_cena(char *fname)

{int i;

int fl;

trip ppp;

FILE *baza1;

if((baza1 = fopen(fname, " r+")) == NULL)

{printf(" \n Ошибка открытия базы данных для чтения и записи\n");

abort();

}

fl = 0;

do{rewind(baza1);

fl = 0;

for(i=0; fread(& excur, sizeof(excur), 1, baza1) > 0; i += sizeof(excur),

fseek(baza1, i, SEEK_SET))

{if(fread(& ppp, sizeof(excur), 1, baza1) > 0)

{if(excur.cena > ppp.cena)

{fseek(baza1, i, SEEK_SET); //позиция i от НАЧАЛА файла

fwrite(& ppp, sizeof(excur), 1, baza1);

fwrite(& excur, sizeof(excur), 1, baza1);

fl = 1;

}

}

}

}

while(fl);

fclose(baza1);

}