SQL сеорверін қолданып қосымшалар жүйесін жетілдіру диплом жұмысы
№1299



МАЗМҰНЫ - www.topreferat.com
.
Кіріспе. 3
Техника-экономикалық негіздеме 6
1. SQLқұрылымдық сұранымдар тілі 7
1.1 SQL мүмкіндіктері мен артықшылықтары 7
1.2 SQL даму тарихынан 8
1.3 SQL көмегімен мәліметтер қоры басқару 9
2.SQL командаларының типтері. 11
2.1.SQL мәліметтерінің типтері 11
2.2. Сандық типтер 12
2.3. Күні мен уақытты беру үшін арналған типтер 13
3. Желілік қосымшаларды құру 28
3.1. ODBC технологиясы 28
3.2.SQL-сервердің Word және Exce– мен өзара байланысы 33
3.3. SQL-серверде MS Access мәліметтерін пайдалану 40
3.4. Active Server Pages технологиясы. 45
3.5. Мәліметтер қорымен Visual Basic ортасында жұмыс 45
3.6. Visual C++-ті SQL-серверге кіру үшін қолдану 53
4. Адам өмірінің қауіпсіздік негіздері 55
5. Экономикалық тиімділік есебі 73
Қорытынды 81
Пайдаланылған әдебиеттер 82
Қосымшалар



Жұмыс түрі: Дипломдық жұмыс
Жұмыс көлемі: 92 бет
Пәні: Соңғы қосылған дипломдық жұмыстар

-----------------------------------------------------------------------------------

-----------------------------------------------------------------------------------
https://www.topreferat.com/
ДИПЛОМДЫҚ ЖҰМЫСТЫҢ ҚЫСҚАРТЫЛҒАН МӘТІНІ

Реферат
Берілген дипломдық жобада «SQL сеорверін қолданып қосымшалар
жүйесін жетілдіру» тақырыбы зерттелді.
SQL- СЕРВЕР, ODBC ТЕХНОЛОГИЯСЫ, WORD , EXCEL ,MS
VISUAL BASIC, VISUAL C++
Берілген дипломдық жоба мақсаты SQL сеорверін қолданып қосымшалар
Екінші бөлімде SQL командалары, олардың типтері, қауіпсіздігін басқару шаралары,
Үшінші бөлімде желілік қосымшаларды құру тәсілдері қарастырылады. Бұл бөлімде
Мазмұны.
Кіріспе.
Техника-экономикалық негіздеме
1. SQLқұрылымдық сұранымдар тілі
1.1 SQL мүмкіндіктері мен артықшылықтары
1.2 SQL даму тарихынан
1.3 SQL көмегімен мәліметтер қоры басқару
2.SQL командаларының типтері.
2.1.SQL мәліметтерінің типтері
2.2. Сандық типтер
2.3. Күні мен уақытты беру үшін арналған типтер
3. Желілік қосымшаларды құру
3.1. ODBC технологиясы
3.2.SQL-сервердің Word және Exce– мен өзара байланысы
3.3. SQL-серверде MS Access мәліметтерін пайдалану
3.4. Active Server Pages технологиясы.
3.5. Мәліметтер қорымен Visual Basic ортасында жұмыс
3.6. Visual C++-ті SQL-серверге кіру үшін қолдану
4. Адам өмірінің қауіпсіздік негіздері
5. Экономикалық тиімділік есебі
Қорытынды
Пайдаланылған әдебиеттер
Қосымшалар
Кіріспе.
Есеп жасау, бақылау және жобалаулардың негізін көптеген картотекалар, тіркеу
Егер де ақпаратттар жинағының көлемі өте үлкен болса, онда
ДЭЕМ және ақпаратты өңдеу мүмкіндігі пайда болғаннан кейін
Бастапқы кезде ЕЭМда ақапаратты сақтап, оны жинақтауға арнайы файлдар
ЕЭМнің дамуымен бірге басқару системаларын кұру идеялары талқыланды. Мысалы,
Access – реляциялық мәліметтер қорын басқару жүйесі. Қарапайым 2
Мәліметтер қорында 2 өлшемді кестенің жолдары жазбалар деп, бағандары
Дәлірек айтқанжа, мәліметтер қорында, кестердей әр бір жол жазба
а) мәліметтер қорын құру
б) мәліметтер қорының құрылымын өзгерту
в) форма құру
Реляциондық модель – ең қарапайым модель берілгендерді кесте таблица
берілгендерді қолданбалы программаларға тәуелдігіш жою мақсатында 1970 жылы математик
Қатынастың бағандары – артрибуттар деп аталады. Ал жолды жазулар
Модель құрылымның қаталдығы және жұмыс жылдамдығының берілгендер қорының өлшеміне
Microsoft Access - бұл функционалдық тұрғыдан толық әрі
Ақпарат базасын басқару системаларына сүйеніп, біз ақпараттардың мінездемелерін, олармен
МКБЖ 3 басты функциядан тұрады:
ақпараттарды анықтау ;
ақпаратты өңдеу;
ақпараттарды басқару
Осы функционалдық мүмкіндіктердің барлығы Microsoft Access те толықтай өңе
Кез келген құжатпен немесе электрондық таблицамен жұмыс істеу кезінде
Ал электрондық таблицаларда ақпаратты сақтау, керек есеп айырысуларын
Егер де электрондық таблицадағы жолдар саны 100-ден асып кетсе,
Мысалы, сіздің таблицаныздың бір ұяшығында күн (мерзім), ал екіншісінде
МКБЖның арқасында біз ақпараттың түрін және де оның
Сіздер Microsoft Access барлық мүмкіндіктерді қолдана аласыз: DDE
Microsoft Access көптеген ақпарат форматтарымен жұмыс істей алады
Microsoft Access көмегімен сіздер Paradox, dBASEIII, dBASE IV, FoxPro
Текстік редактордағы немесе электрондық таблицадағы ақпаратпен жұмыс МКБЖ-дағы жұмыстарынан
Ал электрондық таблицада құрылған құжат берілген бір есепті шешу
Ақпаратпен жұмыс істеу кезінде МКБЖ көптеген әдістерді қолданады. Мысалы,
Таблицадағы ақпаратты өндеу үшін Microsoft Access SQL деген
Microsoft Access ортасында есептерді шешу үшін SQL тілін міндетті
Сұрақ жағдайы
Бүгінгі таңда коммуникация және мәліметтерді сақтау облысындағы компьютерлік жүйелер
Мәліметтер қоры ақпараттық технологиялар облысында алдағы орындарды алатындықтан, олар
Осы күндері адам өмірі әртүрлі типті ақпараттармен қаныққан, ал
Техника- экономикалық негіздеме
Мәліметтердің санының өсуі, оларды сақтау және өңдеу қажеттілігінен, әртүрлі
SQL (Structured Query Language)-бұл құрылымдық мұранымдар тілінің қысқартылған атауы,
Реляциялық МҚ пайда болғанға дейін, көптеген МҚБЖ үшін
Қарастырылып отырған SQL тілі логикалық байланысқан кесте-қатынастар жиынтығы түрінде
1.SQL құрылымдық сұранымдар тілі
1.1 SQL мүмкіндіктері мен артықшылықтары
1987 жылы SQL маманданған реляциялық МҚБЖ үшін стандартты тіл
Файлдық серверлермен жұмыс істейтін МҚБЖ, бір-бірінен алыс ара-қашықтықта орналасқан
SQL концепцияларында операциялардың мәліметтердің кесте түрінде берілуіне бағытталуы, аз
Мәліметтерді анықтау тілі-МҚ анықтау, және де кестелер мен индекстерді
Мәліметтерді таңдау сұранымы-SELECT сөйлемі;
Мәліметтерді түрлендіру сөйлемі-мәліметтер қосу, жою және өзгерту;
Мәліметтерді басқару сөйлемі-мәліметтерге кіру артықшылығн беру немесе қайтару, транзакцияларды
Сондай-ақ SQL бұл сөйлемдерде келесі есептерді орындау мүмкіндігін береді:
Арифметикалық есептеулер, функционалдық түрлендірулер, және арифметикалық өрнектер мен текстерді
Кесте мазмұнын экран дисплейіне немесе баспаға шығарар кезде жолдар
Қолданушыларғы МҚ-да мәліметтердің көлемін өзгертпей интерпретациялау мүмкіндігін беретін ұсыныстар
Сұраным бойынша шығарылатын бір немесе бірнеше кестелер және ұсыныстар
Мәліметтерді топтау, және осы топтарға арифметикалық орта, сумма, максимум,
SQL тілі көптеген МҚБЖ-ң негізі болып табылад, өйткені ол
1.2 SQL даму тарихынан
Реляцияла МҚ басқару жүйелері 80 жылдардың аяғында кеңінен т
Жоғарыда айтылғандай, реляциялы МҚ түсінігі 70 жылдардың басында IBM
70 ж соңында System/R жобасының екінші таралымы жүзеге асырылды,
System/R жобасы және оның шеңберінде құрылған МҚ-мен жұмыс істейтін
Беркли қаласының университетінде (Калифорния штаты) ІВМ компаниясының зерттеушілер тобыреляциялық
1981 ж ІВМ фримасы System/R негізінде, SQL/DataSystem(SQL/DS) деген
80 жылдардың бірінші жартысында реляциялық МҚ таратушылар өз өнімдерін
80жылдардың екінші жартысында реляциялық МҚ болашақ технологиясы болып санала
Компьютердің қуатының күшеюі мен олардың жергілікті желіге бірігуінен, дербес
1.3 SQL көмегімен мәліметтер қорын басқару
Реляциялық МҚ –ол жолдар мен бағандардан тұратын екі өлшемді
Бірақ МҚ бір кестеден тұратын реляциялық МҚ сирек кездеседі.
Жолдардан айырмашылығы, кестенің өрістері реттеледі және оларға ат беріледі.
Әдетте SQL бірден көп қолдаушылары бар компьютерлік жүйелерде жұмыс
Көптеген SQL орталарындағы әрекеттер арнайы идентификатор- лармен сәйкес рұқмат
Оқу мәліметтер қорының сипатамасы
Осыдан былай мысал ретінде шағын МҚ пайдаланамыз. Онда 4
STUDENTS кестесі студенттер туралы ақпараттың 5 өрісінен тұрады:
SNUM-студенттік билет номері;
SFAM-студент фамилиясы;
SIMA-студент аты;
SOTCH-студенттің әкесінің аты;
STIP-студент алатын стипендия көлемі;
PREDMET кестесі оқу пәндері туралы ақпараттан тұрады:
PNUM-пән номері;
PNAME-пән атауы;
TNUM-
HOURS-сағат саны;
COURS-курс;
TEACHERS кестесі оқытушылар туралы ақпараттан тұрады:
TNUM-
TFAM-оқытушы фасмилиясы;
TIMA- оқытушы аты;
TOTCH- оқытушының әкесінің аты;
TDATE-
USP кестесі студенттердің үлгірімі туралы ақпараттан тұрады:
UNUM-
OCENKA-
UDATE-
SNUM-
PNUM-
2.SQL -командаларының типтері
Әдетте SQL -тілінің командалары бірнеше топқа бөлінеді. Командалардың негізгі
DDL(Data Definition Language )- мәліметтердің анықталу тілі. Бұл
DML(Data Manipulation Language)- мәліметтердә басқару (манипуляция) тілі. DMLкомандалары мәліметтер
DCL (Data Control Language)-мәліметтерді басқару тілі. Сәйкес командалар мәліметтер
DQL (Data Query Language)-тілі. Бұл жиі қолданылатын командалар, мәліиеттер
Мәліметтер қорын администрациялау командалары әрекеттердің орындалуына бақылауды жүзеге асыру
2.1.SQL мәліметтерінің типтері
Стандартты SQL- де пайдаланылатын мәліметтер типтерін келесі топтарға бөлуге
Жолдық типтер;
Сандық типтер;
Дата мен уақытты көрсетуге арналған типтар.
Бұл типтердің нақтырақ сипаттамасы.
Жолдық типтер.
SQL-де екі жолдық типтер анықталған:
Белгіленген ұзындықты символдық жолдар;
Айнымалы ұзындықты символдық жолдар.
Белгіленген ұзындықты символдық жолдар.
Белгіленген ұзындықты символдық жолдар түрінде сақталған мәліметтер, өріске енгізілгенжолдың
Character(n)
Мұндағы n бұл хабарлау қатысты болатын өріс өлшемін анықтайтын
Белгіленген ұзындықты жолдарды пайдаланғанда , әдетте, бос жолдар пробелдармен
Айнымалы ұзындықты символдық жолдар.
Айнымалы ұзындықты жолдың ұзындығы барлық мәліметтер үшін тұрақты емес,
Varchar(n)
n-максималды мүмкіндікті жолды анықтайтын сан.
Character типінен айырмашылығы Varchar пайдалану дискідегі кеңістікті үнемді шығындауды
2.2 Сандық типтер.
Сандық типтер былай бөлінеді:
Бүтін санды типтер;
Белгіленген нүктелі заттық типтер;
Жүзуші нүктелі заттық типтер;
Белгіленген және айнымалы ұзындықты екілік жолдар;
Бүтін санды типтер.
ANSI SQL стандартымен екі бүтін санды типтер орнатылады:
INTEGER-4 байтты пайдаланатын таңбалы бүтін сан. 2147483648-ден 2147483647-ге дейінгі
SMALLINT–2 байтты пайдалантын таңбалы қысқа бүтін сан. 32768-ден 32647-ге
Белгіленген нүктелі заттық типтер.
Белгіленген нүктелі заттық типтер бөлшек сандарды нақты беру үшін
Белгіленген үтірлі типті хабарлау синтаксисі келесідей:
DECIMAL (n.m)
Мұндағы n-дәлділік; m-масштаб
Дәлділік -ол сандық мәннің жалпы ұзындығы, масштаб-ол ондық нүктеден
Жүзгімелі нүктелі заттық типтер.
Жүзгімелі нүктелі типтер әдетте ғылыми және инженерлік есептеулерде пайдаланылады.
Көп жағдайда екі жүзгімелі нүктелі заттық типтер пайдаланылады:
FLOAT-бірлік дәлділікті сандар;
DOUBLE-екілік дәлділікті сандар.
Екілік жолдар.
Екілік жолдар салыстырмалы сирек қолданылады. Әдетте мұндай типті өрістер
Символдық жолдар сияқты, екілік жолдар белгіленген және айнымалы ұзындықты
BIT (n)-
Мұндағы n-байтпен берілген жол ұзындығы.
Айнымалы ұзындықты жолды хабарлау түрі мынадай:
BIT VARYING (n)
Мұндағы n- байтпен берілген жолдың максималды ұзындығы.
2.3 Күні мен уақытты берілген типтер.
Аты айтып тұрғандай бұл типтер дата мен уақытқа
SQL-стандартында дата мен уақыт туралы ақпаратты сақтауға арналған келесі
DATE-датаны сақтау үшін пайдаланылады;
TIME-уақытты сақтау үшін пайдаланылады;
TIME STAMP-дата мен уақытты сақтайды;
INTERVAL-екі дата мен уақыт моментіндегі уақыт аралығын сақтайды.
Кестелерді құру, түрлендіру және жою.
Кесте, ақпаратты реляционды мәліметтер қорында сақтаудың негізгі объектісі болып
Шектік шарттар- мәліметтер қорының кестесінің өрісінде шама мәнін шектейтін
Үндемей қабылданатын мәндер- жаңа жазу қосқанда, егер пайдаланушы осы
CREATE TABLE операторы.
Кестені құру үшін CREATE TABLE операторы пайдаланылады. Бұл оператордың
CREATE TABLE имя_таблицы (
Имя_поля_1 тип_данных.
Имя_поля_2 тип_данных.
_
имя_поля_N тип_данных)
Мысал, ФИЗИЧЕСКИЕ ЛИЦА кестесін құру операторы мына түрде болады:
CREATE TABLE STUDENTS
SNUM INTEGER.
SIMA CHAR (25).
SFAM CHAR (25).
SOTCH CHAR (25).
SROZH DATE.
SADR CHAR (25).
STEL VARCHAR (25).
ALTER TRABLE операторы.
Құрылған кестені ALTER TABLE операторын пайдаланып түрлендірге болады. Осы
Жалпы түрде ALTER TABLE операторының синтаксисі былай болады:
ALTER TABLE имя_таблицы [MODIFY][имя_поля тип_данных]
[ADD][имя_поля тип_данных]
[DROP][имя_поля тип_данных]
ALTER TABLE операторымен орындалатын әрекет кесте атынан кейін көрсетіоіп
MODIFY- өріс анықтамасын береді;
ADD- кесмтеге жаңа өріс қосады;
DROP-кестеден өрісті жояды.
Өрістің мәліметтерінің типін өзгерту үшін ALTER TABLE операторының келесі
ALTER TABLE имя_таблицы ADD (имя_поля тип_данных)
Мысалы,STUDENTS кестесінестуденттің электронды почтасынан тұратын өрісті қосу үшін келесі
ALTER TABLE STUDENTS ADD (E-mail CHARACTER (25))
Егер бар өрістің мәліметтерінің типін өзгерту қажет болса, ALTER
ALTER TABLE имя_таблицы MODIFY(имя_поля тип_данных)
Мысалы, STUDENTS кестесіне E-mail өрісін енгізгеннен кейін CHARACTER типінің
ALTER TABLE STUDENTS MODIFY(E-mail VARCHAR(25))
Бар өрісті өшіру үшін ALTER TABLE операторын DROP негізгі
ALTER TABLE имя_таблицы DROP (имя_поля)
DROP TABLE операторы.
Кестелерді жою үшін DROP TABLE операторы пайдаланылады. Бұл оператордың
DROP TABLE имя_таблицы [RESTRICT |CASCADE]
Егер DROP TABLE операторын шақыру кезінде RESTRICT негізгі сөзі
Сыртқы кілт шектеуі.
Сыртқы кілт шектеуі мәліметтер қорының сілтемелік тұтастығын қолдаудың негізгі
Сыртқы және ата-аналық кілттің өрістерінің типтері міндетті түрде сәйкес
Сыртқы кілт бір өрістен тұруы міндетті емес. Алғашқы кілт
Кесте өрісі сыртқы кілт болған кезде, ол қандай да
Сыртық кілт шектеуін пайдалану иллюстрациясы ретінде қандай да бір
ФАКУЛЬТЕТ -қызметкерлердің мамандықтық мәліметтері туралы ақпараттан тұрады;
СТУДЕНТЫ-студенттердің жеке мәліметтері туралы ақпараттан тұрады;
СПЕЦИАЛЬНОСТЬ-мамандығы туралы ақпараттан тұрады.
Бұл мәліметтер қорының негізгі кестесі екі басқа кестелерге сілтелетін
2.1 сурет. Факультет студенттерінің мәліметтер қоры
Сыртқы кілт шектеуі (FOREIGN KEY) не CREATE TABLE операторында,
FOREIGN KEYимя_внешнего_ключа (список полей внешнего ключа)
REFERENCES имя_родительской_таблицы (список полей родительского ключа)
Өрістердің бірінші тізімі- үтірмен бөлінген, кестенің бін немесе бірнеше
Екеуінде бірдей өріс саны болуы керек;
Тізімдерде өрістердің тізбектелу реті сәйкес болуы керек, және де
Байланысқан кестелі мәліметтер қорын құру мысалын қарастырамыз:
CREATE TABLE СТУДЕНТЫ (
Номер_зач_книжки INTEGER NOT NULL PRIMARY KEY.
Имя VARCHAR (25) NOT NULL.
Фамилия VARCHAR (25).
Отчество VARCHAR (25)
Дата_рождения DATE.
Адрес VARCHAR (50).
Телефон VARCHAR(25))
CREATE TABLE Специальность (
Шифр_специальности INTEGER NOT NULL PRIMARY KEY.
Должность VARCHAR(50) NOT NULL UNIQUE.
Курс INTEGER NOT NULL.
Стипендия DECIMAL(7.2)NOT NULL )
CREATE TABLE Сотрудники (
Код_сотрудника INTEGER NOT NULL PRIMARE KEY.
Код_должности INTEGER.
Код_физического_лица INTEGER NOT NULL.
Рейтинг DECIMAL(4.2).
Дата_приема DATE NOT NULL.
Дата_увольнения DATE.
FOREIGN KEY Физ_ВК (Код_физического_лица)
REFERENCES Физические_лица (Код_физического_лица)
FOREIGN KEY Долж_ВК (Код_должности)
REFERENCES Должности (Код_должности)
Сыртқы кілт кесте құрылғаннан кейін де қосылуы мүмкін-ALTER TABLE
ALTER TABLE имя_таблицы
ADD CONSTRAINT имя_внешнего_ключа FOREIGN KEY (список полей внешнего ключа)
REFERENCE имя_родительской_таблицы (список родительского ключа)
Сыртқы кілт кестеге енгізуге болатын мәндерді шектейді. Сыртқы кілтті
Сыртқы кілт үшін NOT NULL шектеуі берілуі мүмкін, бірақ
Сыртқы кілт шектеуі де ата-аналық кестенің жазуларын жойып және
Дәл сол сияқты қандай да бір сыртқы кілт сілтелетін
Каскадтық жаңарту мен жолдың синтаксистік варианттарының бірі келесі болыр
UPDATE OF имя_родительской_таблицы CASCADES
DELETE OF имя_родительской_таблицы CASCADES
UPDATE OF және DELETE OF кілттік фразалары CREATE TABLE
CREATE TABLE СОТРУДНИКИ (
Код_сотрудника INTEGER NOT NULL PTIMARY KEY.
Код_должности INTEGER.
Код_физического_лица INTEGER NOT NULL.
Рейтинг DECIMAL(4.2).
Дата_приема DATE NOT NULL
Дата_увальнения DATE.
FOREIGN KEY Физ_ВК (код_физического_лица)
REFERENCES Физические_лица (код_физического_лица)
FOREIGN KEY Долж_ВК (Код_должности)
REFERENCES Должности (Код_должности)
UPDATE OF Физические_лица CASCADES
DELETE OF Физические_лица RESTRICTED).
Шектеуді бірнеше өрістер үшін де беруге болады. Ол үшін
CONSTRAINT CHK_RATE CHECK (разряд<=20 AND Зарплата<=1000))
Үнсіз қабылданатын мәндерді беру
Кесте өрістері үшін, егер бұл өрістер мәні анықталмаса, кестеге
Үндемей қабылданатын мәндерді беру үшін өрісті сипаттау кезінде CREATE
CREATE TABLE (
...
имя_поля_N тип_данных DEFAULT=значение_по_умолчанию
...
)
Қарастырылып отырған мысалда үндемей қабылданатын мән СОТРУДНИКИ кестесінің "Рейтинг"
CREATE TABLE СОТРУДНИКИ (
Код_сотрудника INTEGER NOT NULL PRIMARY KEY.
Код_должности INTEGER.
Код_физического_лица INTEGER NOT NULL.
Рейтинг DECIMAL (4.2) DEFAULT=0.
Дата_приема DATE NOT NULL.
...)
Индекстарды құру және жою.
Қазіргі кезде ANSI стандарты индекстарды қолдамайды. Сонда да индекстар
Индексті құру операторының синтаксисі пайдаланылатын SQL таратуына қарай өзгешеленуі
CREATE INDEX имя_индекса
ОN имя_таблицы (имя_поля_1.[имя_поля_2...])
Ұсыныстармен жұмыс.
Ұсыныс (VIEW) мәліметтер қорының объектісі. Онымен жұмыс қарапайым кестемен
Шындығында ұсыныстар әрбір хабарласқан сайын орындалатын сұраныс болып табылады.
Ұсыныс мазмұнын өзгертсе, осы ұсынысты құруда негізге алынған кесте
2.2 сурет. Ұсыныстың тұжырымдалу схемасы.
Ұсынысты пайдалану кесетені пайдаланудан өзгешеленеді. Ұсыныс- тардан мәліметтерді таңдау
Ұсыныстар кестелерден айырмашылығы дискілік кеңістіктен орын алмайды (немесе дәлірек
Ұсыныстың қолданылу облыстары.
Ұсыныстар көбінде екі жағдайда қолданылады:
Мәліметтерді қорғау мақсатында,
Қорытынды мәліметтерді тұжырымдау үшін.
Бірінші жағдайда ұсыныстар бүкіл кестеден емес, тек кейбір өрістеріндегі
Келесі мысалды қарастырайық. Мысалы, "СОТРУДНИКИ " кестесінің "Рейтинг" өрісінде
Ұсыныстар өрістерге ғана емес, сондай-ақ кесте жазуларына кіру рұқсатына
Сондай-ақ ұсыныстар есептерді тұжырымдауда қорытынды нәтижелерді тұжырымдау үшін де
Ұсыны, сұраныс негізінде құрылуы мүмкін болғандықтан ақпаратты базалық кестелер
Ұсыныстарды құру.
Ұсыныстарды құру үшін CREATE VIEW операторы пайдаланылады. Ұсыныс бір
CREATE VIEW имя_представления AS
{оператор выборки данных}
Ұсыныс құрылған соң онымен ұсыныс аты ретінде берілген аты
Ұсыныстарды жою.
Ұсыныстарды жою DROP VIEW операторының көмегімен орындалады, оны шақырғанда
DROP VIEW операторының типтік синтаксисі келесі түрде болады:
DROP VIEWимя_представления [RESTRICT | CASCADE]
Сақталатын процедуралар, оларды құру, орындау және жою
Сақталатын процедуралар (Stored Procedure)- олар байланысқан SQL-операторларының топтары. Сақталатын
Сақталатын процедуралар орындалудың жоғары жылдамдығын қамтамасыз ететін мәліметтер қорында
Сақталатын процедураларға кіретін параметрлер ала-алады, қосымшаға мәндерді қайтарады
Сақталатын процедураларды пайдаланудың негізгі артықшылықтары келесіде қорытындыланады:
Сақталатын процедуралар логика бөлігін мәліметтер қорының серверіне шығаруға мүмкіндік
Сақталатьын процедуралар жобаның модульдігін қамтамасыз етеді. Олар бір
Сақталатын процедуралар қосымшалардың бәрге жүруін оңайлатады:процедуралар жаңартқан кезде өзгерулер
Сақталатын процедуралар ақпараттық жүйенің жұмысының тиімділігін арттырады:олар клиентпен емес,
Сақталатын процедуралардың орындалу жылдамдығы жеке SQL операторлар тізбегінен жоғары.
Сақталатын процедуралардың екі түрін бөледі:
Таңдау процедуралары қосымшалар оларды мәліметтерді таңдау операторында кесте немесе
Орындалатын процедуралар олар арнайы операторлар пайдаланылып шақырылады. Орындалатын процедура
Сақталатын процедураларды құру.
Сақталатын процедураларды құру үшін CREATE PROCEDURE опрераторы пайдаланылады.
CREATE PROCEDURE операторы мәліметтер қорынан жаңа сақталатын процедураны анықтайды.
Шартты операторлар;
Цикл операторларының әртүрлі түрлерін;
Ерекше жағдайларды өңдеу мүмкіндіктерін.
Сақталатын процедуралар тақырыптан және денесінен тұрады. Процедураның тақырыбы:
Мәліметтер қорындағы кесте мен процедура аттарының ішінде ерекше болуы
Процедура шақырылатын программадан қабылдайтын кіретін параметрлер және олардың мәліметтері
Шығатын параметрлер және олардың мәліметтері типтерінің тізімінен тұрады, егер
Процедура денесі мыналардан тұрады:
Жергілікті айнымалылар және олардың мәліметтері типтерінің тізімінен (егер олар
BEGIN және END кілттік сөздерінің арасында қорытылған процедуралар және
Сақталатын процедураларды орындау.
Сақталатын процедураны орындауға жіберетін оператор процедураға тәуелді болады. Таңдау
Орындалатын процедураны шақыру үшін арнайы EXECUTE операторын пайдаланған жөн.
Сақталатын процедураларды жою.
Сақталатын процедураларды жою үшін DROP PROCEDURE операторы пайдаланылады. Бұл
DROP PROCEDUREимя_хранимой_процедуры
Мәліметтерді басқару, кестедегі берілгендерді өзгерту
Мәліметтер қорында сақталатын мәліметтерді басқару үшін, командалардың жеке типтері
SQL тілінде тек қана 3 негізгі DML операторы анықталған:
INSERT;
UPDATE;
DELETE.
Кестеге жаңа ақпаратты қосу
Мәліметтер қорының кестесіне жаңа ақпаратты қосу процесі әдетте мәліметтерді
Кестеге жаңа жазу қосу
Кестеге жаңа жазу қосу үшін INSERT операторының келесі синтаксистік
INSERT INTO имя_таблицы
VALUES (значение_1.значение_2….значение_N)
INSERT операторының бұл формасын пайдаланғанда VALUES тізімінде мәндер саны
Символдық типтер мен даталарға қатысты мәндер апостроф ішінде тұруы
Мысал қарастырайық. СПЕЦИАЛЬНОСТЬ кестесі келесі оператор пайдаланылып құрылған:
CREATE TABLE ДОЛЖНОСТИ (
Код_должности INTEGER NOT NULL PRIMARY KEY
Должность VAR CHAR (50) NOT NULL UNIQUE.
Разряд INTEGER NOT NULL).
Зарплата DECIMAL (7.2) NOT NULL).
Осы кестеге жаңа жазу қосу үшін келесі INSERT операторын
INSERT INTO Должности
VALUES (12 ‘Ведущий программист’.12.2000.00)
Кестенің жеке өрістеріне мәліметтер енгізу
Кестеге мәліметтер қосқанда барлық өрістерін емес, кейбіреулерін ғана толтыруға
INSERT INTO имя_таблицы (имя_поля_1.имя_поля_2…имя_поля_N)
VALUES (значение_1.значение_2…значение_ N)
Мысалы, СТУДЕНТЫ кестесіне жаңа студент туралы ақпарат қосқанда, студенттің
INSERT INTO Студенты (Номер_зач_книжки.Имя. Фамилия.Отчество)
VALUES (234.’Абылгазина’.’Айнур’.’Кадыровна’)
Бұл оператор орындалғанда басқа барлық өрістерге NULL мәні
Басқа кестедегі мәліметтерді кестеге енгізу
Кейде бір кестедегі ақпаратты екінші кестеге тасымалдау қажет болады.
INSERT және SELECT операторын біріктіріп, басқа кестеге сұраныс орындалуы
INSERT INTOимя_таблицы(имя_поля_1.имя_поля_2…имя_поля_N)
FROM имя_таблицы
WHERE условие.
Бұл операторда VALUES сөйлемінің орнына SELECT операторы пайдаланылады. Бұл
Кесте атынан кейін INSERT операторында жақша ішінде көрсетілетін өрістердің
Кестеде сақталатын мәліметтерді өзгерту
Кестеге енгізіліп қойылған мәліметтерді өзгерту үшін UPDATE операторы
Кестенің бір өрісіндегі мәліметтерді түрлендіру
Кестенің бір ғана өрісіндегі мәліметтерді өзгерту үшін UPDATE операторының
UPDATE имя_таблицы
SET имя_поля=значение
[WHERE условие]
UPDATE операторының синтаксистік элементтерінің мағынасы мынадай: UPDATEкілттік сөзінен кейін
Мысалы, СТУДЕНТЫ кестесінде сақталған факультет студентінің телефон номерін
UPDATE Физические_лица
SET Телефон=(095)2347890
WHERE Код_физического_лица=16
Бұл оператор мәліметтер қорында 146 номерімен тіркелген қызметкерге сәйкес
Кестенің бірнеше өрістеріндегі мәндерді өзгерту
UPDATE операторының көмегімен бір уақытта кестенің бірнеше өрістерінің мәндерін
UPDATE имя_таблицы
SET имя_поля_1=значение_1
имя_поля_2=значение_2

имя_поля_N=значение_ N
[WHERE условие]
Кестеден мәліметтерді өшіру
Кестеден мәліметтерді өшіру DELETE операторының көмегіен орындалады. Бұл оператор
DELETE FROM имя_таблицы
[WHERE условие]
Өшірілетін жазулар міндетті емес WHERE сөйлемінің көмегімен берілген шартқа
Мәліметтер қорының қауіпсіздігін басқару
Мәліметтер қорын басқарудың ең маңызды есептерінің бірі мәліметтердің қауіпсіздігін
Қолданушылардың артықшылықтары
Артықшылықтары деп қолданушылардың өкілеттік деңгейлерін айтады. Мәліметтер қорында сақталатын
Артықшылықтардың екі түрін бөледі:
Жүйелік артықшылықтар;
Объектілік артықшылықтар.
Жүйелік артықшылықтар
Жүйелік артықшылықтар мәліметтер қорының пайдаланушысына, оны администрациялаумен байланысты әрекеттерді
Мүмкін болатын жүйелік артықшылықтар пайдаланылатын МҚБЖ тәуелді болады. Бірақ
Кестені құру;
Ұсыныстарды құру;
Сақталатын процедураларды құру;
Кестелерді өшіру;
Ұсыныстарды жою;
Сақталатын процедураларды жою.
Бұл тізім одан әр і қарай кеңеюі мүмкін және
Объектілік артықшылықтар.
Объектілік артықшылықтар дегеніміз мәліметтер қорының объектілеріне таралатын пайдаланушының өкілеттік
ANSI стандартымен келесі объектілік артықшылықтар қарастырылған:
SELECT–көрсетілген кесьеден мәліметтер таңдамасын жүргізуге рұқсат береді;
INSERT(имя_поля)-көрсетілген кестенің қандай да бір өрісіне мәліметтерді қосуды орындауға
INSERT-көрсетілген кестенің барлық өрістеріне мәліметтерді қосуға рұқсат береді;
UPDATE(имя_поля)-көрсетілген кестенің берілген өрісінде мәліметтері түрлендіруге рұқсат береді;
UPDATE-көрсетілген кестенің барлық өрістерінде түрлендіру жүргізуге рұқсат береді;
REFERENCE(имя_поля)-көрсетілген кестенің берілген өрісіне сілтелуге рұқсат береді (бұл артықшылық
REFERENCE- көрсетілген кестенің барлық өрістеріне сілтелуге рұқсат береді.
Мәліметтер қорының кіру рұқсатын басқару
Пайдаланушылардың мәліметтер қорына кіру рұқсатын басқару үшін SQL тілінде
GRANT;
REVOKE.
Ереже бойынша бұл операторлар мәліметтер қорының администраторымен немесе оның
GRANT операторы
GRANT операторы пайдаланушыға жүйелік және объектілік артықшылықтарды беру үшін
GRANT привелегия_1[.привелегия_2]
ON имя_объекта
TO имя_пользователя [WITH GRANT OPTION]
USER атты пайдаланушыға СОТРУДНИКИ кестесінен мәліметтерді таңдау хұқын беру
GRANT SELECT
ON СОТРУДНИКИ
TO USER
Бір GRANT операторының көмегімен бірнеше артықшылықтарды беруге болады. Мысалы,
GRANT SELECT.INSERT
ON СОТРУДНИКИ
TO USER.
Шақырғанда GRANT операторы міндетті емес WITH GRANT OPTION сөйлемін
GRANT SELECT.INSERT
ON СОТРУДНИКИ
TO USER
WITH GRANT OPTION
REVOKE операторы
REVOKE операторы пайдаланушыға берілген артықшылықтарды тойтару үшін пайдаланылады. Бұл
CASCADE режимін пайдаланғанда басқа пайдаланғанда басқа пайдаланушыларға қалып-қалған барлық
REVOKE операторының синтаксисі:
REVOKE привелегия_1[.привелегия_2]
On имя_объекта
FROM имя_пользователя [RESTRICT/ CASCADE]
3. Желілік қосымшаларды құру.
3.1 ODBC технологиясы.
SQL-сервер мәліметтер қорына қосымшалардың қосылу тәсілдерінің бірі Open Database
ODBC мәліметтер көзінің утилитасы ODBC бірігуін, мәліметтер қорына кіру
2.1 сурет. ODBC бағыттау утилитасының сұхбат терезесі.
Жүйелік DSN-бұл профиль жеке компьютер профиліне ұқсамайды. Басқаша айтқанда
Файлдық DSN-драйверлер мен мәліметтер қрының орналасуы туралы ақпараттан тұрады,
Пайдаланушы DSN-жиі қолданылатын көз, ол туралы ақпарат Windowsсақталады. Windows
Енді мәліметтердің жүйелік көзін пайдаланып, SQL-сервердің мәліметтер қорына қосылуды
Алғашқы қадамында тізімнен SQL-serverайверін таңдау керек, шебер жұмысының келесі
3.2 сурет. SQL-сервер үшін мәліметтер көзін құру шебері:бірігу атын
Бұл диалогта құрылатын мәліметтер көзінің атын, оның сипаттамасын және
Шебердің келесі қадамы аутентификация параметрін күйге келтіруді ұсынады. Бұл
3.3 сурет. SQL-сервер үшін мәліметтер көзін құру шебері: аутентификация
Берілген диалогтың Настройка клента батырмасы экранда желілік кітапхананың бағыттау
3.4 сурет. SQL сервері үшін мәліметтер көзін құру шебері:желілік
3.5 сурет. SQL сервері үшін мәліметтер көзін құру шебері:
Шебер жұмысының келесі қадамы SQL-сервер объектілерімен құрылатын көзді пайдалануды
Шебер жұмысының соңғы қадамында қосымша параметрлер (3.6 сурет) қатарын
3.6 сурет. SQL сервері үшін мәліметтер көзін құру шебері:
Шебер жұмысы аяқталған соң атқарылған бағыттаулар туралы есеп беру
3.7 сурет. Жүргізілген бағыттаулар туралы есеп.
3.8 сурет. ODBC мәліметтер көзін тексеру
Шебер жұмысының нәтижелері терезесінде құрылған көздің SQL-сервермен қосылу мүмкіндігін
3.2 SQL-сервердің Word және Excel мен өзара әрекеттестігі
Администрациялық есептердің компьютерлік автоматизациялау жүйесін құрумен жұмыс істей отырып,
Microsoft Office комптектісінде мәліметтер қорына сұраныстар құрауға арналған арнайы
Осы жүйемен көрсетілген, Education оқу мәліметтер қорынан пәндер мен
3.1 сурет.Microsoft Query шебері: мәліметтер көзін таңдау
Сонымен шебер жұмысының бірінші қадамында көрсетілген тізімнен мәліметтер қорына
3.2 сурет. Microsoft Query шебері: сұранымға қатысатын кестені таңдау
Шебер жұмысының келесі қадамында таңдалған мәліметтер қорындағы барлық кестелер
Берілген сұхбат көмегімен PREDMET кестесін анықтап және кнопка
Кнопка және Кнопка батырмаларын пайдалану Столбцы списка тізімінен таңдалып
Шебер жұмысынң келесі қадамында ақпаратты таңдау шартын анықтайды (3.3
3.3 сурет. Microsoft Query шебері:жазуды таңдау шартын анықтау.
Шебердің келесі сұрыптау параметрлері анықталады(3.4 сурет). Сортировать по облысында
Шебер жұмысының соңғы қадамында жүйе құрылған сұраныспен орындалатын әрекеттерді
3.4 сурет. Microsoft Query шебері:сорттау параметрін орнату.
Сонымен жүргізілген нәтижесі сұраныс параметрін жұқа бағыттау үшін Microsoft
Кесте қосылғаннан кейін оның графикалық бейнесі терезенің диаграммалар облысында
Қойылған есепті шешудің келесі кезеңі TEACHERS кестесінен TFAM,
Нәтижесінде Microsoft Query утилитасының сұхбат терезесі диаграммалар облысында кестелер
Берілген уутилитаның Вид мәзірінен Запрос SQL командасын пайдаланып утилитамен
SELECT PREDMET.PNUM, PREDMET.PNAME, PREDMET.TNUM, PREDMET.HOURS, PREDMET.COURS, TEACHERS.TFAM, TEACHERS.TIMA, TEACHERS.TOTCH
3.7 сурет. Microsoft Query утилитасының сұхбат терезесі.
Утилитадан шығу үшін Файл мәзірінен утилита шақырылған жүйеге қайту
Сонымен мұнда Microsoft Query утилитасы көмегімен сұраныс құру процесі
Microsoft Word жүйесінде мәліметтер қорымен жұмыс істеу үшін сәйкес
Добавить базу данных Кнопка батырмасын пайдаланып, экранға сәйкес сұхбат
3.8 сурет. Microsoft Word-та мәліметтер қоры файлын таңдау сұхбат
Мәліметтер қорынан ақпаратты қосу терезесінде Microsoft Query-де сұраныс параметрлерін
Получить данные- Microsoft Query-да құрылған сұранысты редактілеуге қайту;
Отбор записей- Microsoft Word-та бар кестенің сыртқы бейнесін өңдеу
3.9 сурет. Мәліметтер қорынан ақпаратты Microsoft Word-қа қосу сұхбат
Автоформат таблицы-кестенің сыртқы бейнесін әсемдедің Microsoft Word-тағы шаблондарының бірін
Вставить данные- Microsoft Query көмегімен сұранысты құру кезінде алынған
Вставить данные батырмасын пайдаланғанда, экранда сұхбат терезесі көрінеді, оның
Жүргізілген әрекеттер нәтижесінде Microsoft Word бетінде құрылған сұраныс мәліметтерімен
Енді Базы данных құралдар тақтасында орналасқан Кнопка және Кнопка
Microsoft Excel жүйесінде мәліметтер қорынан ақпараттын пайдалану үшін Данные
Мұнда анықталған ақпараттар басталып орналасатын ұяшықты таңдауға болады. Ол
Біздің жағдайымызда Имеющийся лист опциясын пайдалану ұсынылады, сонда сұраныс
Сұраныс көмегімен алынған сыртқы мәліметтермен жұмыс істеу үшін, Microsoft
3.11 сурет. SQL-сервердің мәліметтер қоры кестесімен Microsoft Excel-дің сыртқы
3.3 SQL-сервер мәліметтерін Access МҚБЖ-де пайдалану
Microsoft Access-те МҚБЖ таза қолданушы жүйесі мен қосымша дайындау
Microsoft Access-те SQL-сервер мәліметтер қорынан ақпаратты алудың екі тәсілі
Microsoft Access жүйесіне SQL-серверінен мәліметтерді алу үшін Файл
Көрсетілген сұхбаттан Источник данных компьютера қатпарынан (закладка) таңдаған жөн,
Мәліметтер көзі анықталған соң жүйе экранға SQL-серверге қосылу үшін
Файл мәзірінен Внешние днные/Связь с таблицами командалары таңдалса, яғни
SQL-сервер мәліметтер қорының кестесін қосу процесі аяқталған соң, оның
SQL-сервер мен Visual Fox Pro-ның өзара байланысы
Microsoft Visual Fox Pro жүйесінде SQL-сервер мәліметтер қорының кестелеріне
Сонымен File мәзірінің New командасын пайдаланып жаңа проект құрамыз,
Проектімен жаңа мәліметтер қоры құрылған соң SQL-сервермен қосылысты құру
Мұнда сондай-ақ қосылыс процесін автоматтандыруға болады, ол үшін Userid,
Сондай-ақ қосылыс құрудың екінші тәсілі бар- арнайы қосылыс жолы
Қосылысты құрған соң оның негізінде алыстатылған көріністі бағыттайды. Ол
Сонымен көрсетілген кестелер тізімінен ADD батырмасымен дәйектеп PREDMET және
Егер параметрлер қате анықталса, онда бұл сұхбатта көрсетілген тізімдерде
PREDMET.TNUM=TEACHERS.TNUM
Кестелер мен олардың байланыс параметрлері анықталған соң сәйкес сұхбат
FIELDS қатпарында бар кестелердің өрістер тізімі көрсетілген. Берілген
Visual Fox Pro-да мәліметтерді жаңарту процесін бағыттауға ерекше назар
Бағыттау барысында толықтылық бақылау жүзеге асырылатын негізгі өрісті анықтау
Кнопка батырмасы көрініс редакторын іске қосады (BROWSE), оның көмегімен
SELECT Predmet.PNUM,Predmet.PNAME,
Predmet.TNUM, Predmet.HOURS,
Predmet.COURS,Teachers.TFAM,Teachers.TOTCH
FROM dpo.PREDMET,dpo.TEACHERS.Teachers
WHERE teachers.TNUM=Predmet.TNUM
Internet-пен SQL-сервер арасындағы өзара байланыс
Көп жағдайларда құрушыларға SQL-сервер негізінде қосымшалар құруға тура келеді,
Берілген шеберді пайдалану негізінд SQL Server Agent қызметінің мәні
Шеберді іске қосу үшін Management тобынан, SQL-сервер объектілерінің тізімінен
Шебердің бірінші қадамында мәліметтер қорын анықтау қажет, ол туралы
Data from tables and columns that I select –бұл
Result set(s) of a stored procedure I select-бұл опция
Data from the Transact-SQL statement I spesify- Web-жариялау құрудың
Мысал ретінде, EDUCATION мәліметтер қорының PREDMET және TEACHERS кестелерінен
SELECT PNUM,PNAM,HOURS,COURS,TFAM,TIMA,TOTCH,FROM PREDMET,TEACHERS WHERE PREDMET.TNUM=TEACHERS.TNUM.
Көрсетілген сұхбатта әр режим үшін өз бағыттаулары орындалады, бірақ
Only one time when I complete this wizard- бағыттау
On-demand- шебер жұмысы біткен соң Web-жариялауды қоспай-ақ параметрлерін кейін
Only one time at - Web-жариялау қосылған уақыты мен
When the SQL serverdata changes – SQL серверде мәліметтер
At regularly scheduled intervals – бұл опция Web жариялаудың
Келесі қадамда шебер құрылатын Web–беттің атын енгізетін сұхбат терезесін
Бағыттау процесі аяқталған соң қарапайым броузер көмегімен Web жариялаудың
SQL Server Agent қызметі кестені бағыттаудың жүргізілуіне байланысты оны
3.4Active Server Pages технологиясы.
Active Server Pages (ASP) – Web–серверды ұйымдастыру жүйелерінің облысындағы
Microsoft компаниясмен құрылған Web–серверді ұйымдастыру облыстарында қолданылатын программалық өнімдерден
Қазіргі кезде мәліметтер қорына кіру технологияларының әлде қайда прогрессивті
Бұл технологияларды қолдануды мысалдарда қарастырайық:
1–ші мысалда, бірінші Web–беттен екінші Web-бетке мәліметтерді беру мүмкіндігі
.3.5Мәліметтер қорымен VISUAL BASIC ортасында жұмыс
Қазіргі кезде АDО технологиясы VISUAL BASIC жүйесінде кең таралды.
АDО технологиясы программаның мәліметтер қорына кіру құралдарынұсынады. Өз кезегінде
VISUAL BASIC–те қажетті мәліметтер қорымен байланысқан басқару элементтері бар
Шебер VISUAL BASIC әрбір іске қосылған сайын жүктелуі үшін
Бірден іске қосқаннан кейін алдыңғы жұмыс сеанстарынан кейін сақталған
Екінші қадам форма құрылатын мәліметтер қорының типін көрсетуге қызмет
Form қадамында мәліметтер қоры таңдалған соң, формаға ат меншіктеп,
Single Record – жазуларды қарау және редактрлеу режимі, қолданушы
Grid (Data Shud) – жазуларды кесте түрінде көрсету, мысалы
Master/Detail – формада бас жазулардың бірін және онымен байланысқан
MS HfLexGrid MicroSoft Hierarchical Flex Grid – басқару элементі
MS Chart – қордағы кесте элементтері негізінде тұрғызылған диаграмма.
Форманың типін таңдау сыртқы түрі үшін ғана маңызды емес.
Сондай–ақ Form қадамында байланыстыру типін де таңдау керек. Бұл
ADO Data Control – ADO мәліметтерін басқару элементіне құрылатын
ADO Code – мәліметтер қорына кіру үшін тек программалық
Class – мәліметтер қорына кіру функциясы орындалатын программалық модуль
TEACHERS кестесімен жұмысты суреттейтін мысал үшін форманың Grid (Data
Шебердің келесі қадамы форма үшін мәліметтер көзін таңдаудан тұрады.
Record Source – ашылмалы тізімнен мәліметтер қорының құрамына кіретін
Формада көрсетілген өрістерді таңдау. Ол үшін олардың аттарын екі
2 тізімнің оң жағында орналасқан стрелкасы төмен және жоғары
Select Fields – тізімінде таңдалған өрістерді реттеу қажет болса,
Column to SortBy – тізімнен сұрыптау жүргізілетін бағанды тағдау.
3.134 суретте TEACHERS таңдалған кестемен терезе көрсетілген. Бұл кестеде
Шебердің кезекті қадамы форманың сыртқы түрін бағыттауға мүмкіндік береді.
Батырма Қолданылуы
Add Кестеге жаңа жазу енгізу формада енгізу өрістері тазаланады.
Edit Ағымдағы жазуды редактілеу.
Update Ағымдағы жазуға енгізілген өрістерді сақтау.
Delete Ағымдағы жазуды өшіру.
Refresh Егер мәліметтер басқа қолданушымен де редактіленіп жатса, кестеден
Close Форманы жабу.
Show Data Control Grid (DataShut) формасы үшін ADO Data
Сұхбат терезесіндегі Select all және Clear all екі батырмалары
Next батырмасын басқанда шебер процедурасының соңғы қадамға өтуі болады.
Finish батырмасын басу форма құру процесін аяқтайды. Жаңа форма
EDUCATION мәліметтер қорының TEACHERS кестесінің мазмұнын өңдеуге арналған форманың
Енді SQL-сұраным нәтижелерін көрсететін форма құрамыз. Мысал ретінде пәндер
Қосылудың қасиеттері терезесінде Proveder атты қатпары типіне байланысты мәліметтер
Использовать имя источника өрісінде DSN мәліметтер көзі таңдалады, біздің
Мәліметтер қорына сұраныс құру үшін ортаға жаңа команда қосу
Команданың көп қасиеттері бар, бірақ дұрыс жұмыс істеу үшін
Қасиеттер терезесінде командаға ат меншіктеуге болады. Сондай–ақ Connection тізімінен
Мәліметтер қорын басқару SQL көмегімен жүзеге асырылады. Кестелерден қажетті
SELECT PNUM, PNAME, HOURS, COURS, TFAM,
TIMA, TOTCH
FROM PREDMET, TEACHERS
WHERE PREDMET.PNUM=TEACHERS.TNUM
Алдын–ала қасиеттер терезесінде мәліметтер көзі ретінде SQL–Statement таңдау қажет.
Осылайша EDUCATION мәліметтер қорына сұраныс құрылып, PREDMET, TEACHERS кестелерінен
Сондай–ақ SQL операторды құру үшін SQL–ді жоғары деңгейде игеру
Мәліметтер қорына қосуды бағыттау алдын–ала орындалғандықтан, Data View терезесінен
Енді команда құрылған соң, алынған форманың қандай да бір
Ереже бойынша, кестедегі мәліметтерді жолдар мен бағандар түрінде
Бұл элемент стандартты жиынтыққа (набор) кірмейтіндіктен, оны Project/Components мәзірінің
Data Grid басқару элементін бағыттау, басқа байланысқан басқару элементтері
Data Grid басқару элементі мәліметтер көзіне негізделіп бағандарды автоматты
Data Grid элементінің оны бағыттауда қолдануға болатын көп қасиеттері
Төменде осы терезе құрамындағы, негізгі қасиеттер толығырақ қарастырылады.
Жалпы қолданылатын параметрлер. Бұл параметрлер тобы General қатпарында берілген.
Тордың сыртқы түрі келесі қасиеттермен беріледі:
Caption – қасиеті, кесте атын береді. Ол тордың үстіне
Column Headers – қасиеті, тордың ең үстінде орналасқан бағандардың
Appearance – қасиеті, кестені жазық болып береді, егер 0–dbgFlat
RowDividerStyle – қасиеті, кестенің жолдарының арасында жүргізілетін сызықтардың типін
Enabled – қасиетінің көмегімен кестемен орындалатын опреацияларға рұқсат етуге
General – қатпарында тордың сыртқы түріне жауап беретін қасиеттерден
AllowAddNew – қасиеті қолданушыға кестеге жаңа жазуларды енгізуге мүмкіндік
AllowDelete – қасиеті, True мәні орнатылса, кестедегі жазуды өшіруге
Кестедегі мәліметтерді редактілеуге шек қоюға болады, ол үшін мәні
Клавиатурамен жұмыс істеу параметрлері
AllowArrows — қасиеті кестенің ұяшықтарымен орын ауыстыру үшін курсорды
Кестелерді редактілеу үшін TabAction қасиеті қте маңызды. Ол келесі
Бөлімдерді қолдану. Data Grid басқару элементі бір мәліметтер жиынтығымен
Үндемеген жағдайда тор Split0 атты бір бөлім қосады.
Торға қосылатын бөлімдер Split1, Split2 және т.с.с. тізбектелген аттар
Locked – жалаушасы, белгіленсе бөлімді редактілеуге шек қояды;
AllowFocus – жалаушасы белгіленбеген бөлім, фокус алмайды;
AllowSizing – қасиеті, True мәні орнатылса, программа жұмыс істегенде
AllowRowSizing – қасиеті, True мәні орнатылса, программа жұмыс істегенде
RecordSelectors – жалаушасы жолдың сол жағына жазудың селекторын қосуға
Тордың жазылуы (раскладка) Тордың автоматты жазылуы ыңғайлы болса да,
Columns қатпарында кестедегі өрістердің нөл, бірінші және т.б. бағандар
Columns қатпары қандай мәліметтер бағандарда көрсетілетінін анықтаса, Layout қатпары
Форматтау әрбір бөлімде әрбір баған үшін жеке–жеке орындалады. Ең
Locked – жалаушасы, егер орнатылса, Splits қатпарындағы ұқсас қасиетінің
AllowSizing – қасиеті программаны орындау кезінде бағанның енін өзгертуге
Visible – қасиеті, егер осы жалауша түсірілген болса, экранда
Wraptext – жалаушасы, бағанның берілген еніне текст сыймаған жағдайда,
Button – қасиеті берілген бағанның ұяшығы үшін ашылмалы тізімнің
DiriderStyle – қасиеті General бетіндегі RowDiriderStyle қасиетіне ұқсас, бірақ
Alignment – түзудің төрт типінің біреуін береді;
Width – өрісі бағанның енін анықтайды. Бағанның енін тікелей
DataList басқару элементін пайдалану Data Grid элементіне қарағанда қарапайымдау.
DataList басқару элементін Toolbox тақтасына қосу үшін, Project/Components мәзірінің
Формада орналасып, DataList элементі мәдіметтерді екі қасиет көмегімен көрсетуге
Өзінің қарапайымдылығына қарамастан DataList басқару элементінің Data Grid элементінде
CаusesValidation – қасиеті, фокус басқа басқару элементіне ауысқанда Validatе
IntegralHeight – қасиетінің көмегімен басқару элементінің өлшемі үлкен емес
MatchEntry – қасиеті клавиатурадан символдыенгізгенде сәйкес жазуға өту режимін
3.6 Visual C++ -ті SQL серверге кіру үшін қолдану.
TEACHERS кестесінің жазулары … (перебор) қарапайым сұхбатын құру мысалында
Visual C++ -те AppWizard қосымшасын құру шеберінің көмегімен, көптеген
Бұл шебер CDatabase класының объектісін құру программасының текстін автоматты
Сонымен AppWizard шеберінің жұмысының басында жобаны құру сұхбат терезесінде
Шебер жұмысының келесі қадамы құрылатын қосымшадағы мәліметтер қорының қолдауын
Шебердің келесі қадамдарында біздің талаптарымызға байланысты параметрлерді анықтау керек.
Жүргізілген бағыттаулар нәтижесінде APP WIZARD шебері қажетті файлдарды құрады,
Келесі сатыда TEASHERS кестесінің жазуларын қарау үшін форма құру
Текстік өрістерді формаға қосу үшін Visual C++қосымшасынан дизайнердің Resource
Ол үшін тышқанмен қажетті объектіні таңдаймыз, одан кейін оң
Қосымшаны құрудың келесі қадамы TEACHERS кестесі өрістерінің нақты мәліметтерін
4 Еңбекті қорғау және адам өмірінің қауіпсіздік негіздері
Еңбекті қорғау –бұл ілеуметтік-технткалық ғылым, өндірістік қауіпті жағдайларды және
Еңбек жағдайларын жақсарту және оның қауіпсіздігі өндірістік жарақаттануды, кәсіптік
Еңбек жағдайларын жақсарту әлеуметтік жақсы нәтижелер береді –
Азаматтардың еңбек еркінділігіне сай конституциялық құқығына байланысты туындайтын Қазақстан
Табиғи жарықтандыру
Рационалды табиғи жарықтандыру психологиялық комфорт қамтамасыз етеді, көру және
Өндірістік бөлімшелерді жарықтандыруға еңбекті қорғау келесі негізгі талаптарды қояды:
Кәсіпорынның өндірістік, қосымша және әкімшілік-тұрмыстық бөлімшелерінде табиғи және жасанды
Табиғи жарық /күннің көрінетін жарық энергиясы/ организмнің жұмысын реттейді,
Күннің жерге түсетін барлық жалпы энергиясы мөлшерінің шамамен 52%
Ультракүлгін сәуленің ұзақ мерзімде болмауы немесе оның қажетті мөлшерден
Табиғи жарықтандырудың келесі жүйелерін ажыратады: жанама –күндізгі жарық бөлмеге
Бұл дипломдық жобада біржақта жанама жарықтандыруды қолдану қарастырылған.
Табиғи жарықтандыру коэффициентінің /ТЖК/мөлшерленген мағынасын анықтау
Мөлшерленген мағынасы /ТЖК/ келесідеі анықталады:
ен = е * m * c,
е – ТЖК мағынасы , %;
m- жарықтандыру климат коэффициенті /күннің тура сәулесін ескермейді/,
с – күн климатының коэффициенті / тура күн
Оргтехникамен жұмыс кезінде көру жұмысының сипаты жоғары дәлділікті қажет
Жобада біржақты жарықтандыру типі қарастырылған, қабылдаймыз: m = 1,00,
е = 2 * 1,00 * 0,85 = 1,7
Жарық ойықтары ауданын анықтау
Жанама жарықтандыруда жарық ойықтарының қажетті ауданы жуық мөлшермен келесі
Sок = ен * ηо * Sn * Кзд
ен – жанама жарықтандыруда ТЖК -ң мөлшерлі мағынасы,
τо - жарық ойығының сәулені өткізудің
Кзд - терезелердің қарсы
ηо – терезенің жарық түсіру сипаттамасы;
τ1 - коэффициент, ТЖК-ң
Sn – бөлме ауданы:
Sn = 5,35 * 6,14 = 32,849 м2.
Бөлме ұзындығының Z оның тереңдігіне В ара қатынасы
Z = 5,35 м,
В = b / 2, мұнда b – бөлменің
В = 6,14 / 2 = 3,07 м,
Z / В = 5,35 / 3,07 = 1,74
Жұмыс қабырғасынан терезеге дейінгі биіктігін анықтау үшін жұмыс қабырғасы
h1 = hок + 1,2 м – 0,8 м,
мұнда hок – терезе биіктігі.
hок = 2,4 деп қабылдаймыз.
Сонда :
h1 = 2,4 + 1,2 м – 0,8 =
Бөлімше терңдігініңВ оның биіктігіне h1 жұмыс қабырғасынан терезенің
В / h1= 3,07 / 2,8 = 1,096 =
Сол себепті 2.2 [1]
ηо = 9,5.
ρср – төбеден, қабырға мен еденнен шағылысып түсетін
а – ең жақын терезеден жұмыс орнына дейінгі ара
«а» қашықтығының бөлменің терңдігіне В ара қатынасы
а / В = 1 / 3,07 =
Жоғарыда көрсетілгеннен көреміз, коэффициент τ1 біржақты жанама жарықтандыруда
Sок = 1,7 * 9,5 * 32,849 * 1,0
Бір терезенің ауданы:
Sок = hок * b, (5.6)
мұнда b – терезенің ені:
b = Sок / hок
b = 16,076 / 2,4 = 6,698 м.
жобадағы бөлмелердің геометрикалық размерлерін ескере отырып нақтылы 6,698 м
S'1 ок = 2,4 * 4 = 9,6 м2
Sок / Sn = 16,076 / 32,849 = 0,489
Sок / Sn = 9,6 / 32,849 = 0,29
Sок / Sn = 1 / 2 ÷ 1
4.1 Сурет. Терезе ойықтарының орналасу схемасы
г/ Жасанды жарықтандыру
Жасанды жарықтандыру көбінесе электр жарық көздерінің екі түрінің
● сәуленің спектрлік құрамы табиғи, күндізгі жарыққа жуық;
● КПД жоғары /1,5- 2 есе қыздыру лампасының
● жарықты беруі жоғары / қыздыру лампасынан 3
● қызмет көрсету мерзімі ұзақ..
4.1.1 Оқыс жағдайларда дәрігерлік көмекке дейінгі көмек
Алғашқы, яғни дәрігерге дейінгі көмекті оқыс жағдайда жарақаттанған қызметкерге
Көрсетілетін көмектің тиімділігі көбінесе олардың тапқырлығына және істей білу
4.1.2. Кәсіптік аурулардың сипаттамасы
Көптеген компьютер тұтынушылар өзінің жұмыс орынына аз мән береді.
Монитордың орналасуы, жарықтандыру, креслоның биіктігі көзге маңызды әсер етеді.
● Коьпьютермен жұмыс кезінде жарқтандыру тым қатты болмауы қажет,
● Столды орналастырғанда терезе жұмыс істеушінің қарсы алдында
● Монитор экраны өте таза болуы тиіс, егер
● Монитор мен клавиатураны жұмыс столында тура орналастыру керек,
● Экранның ортасы шамамен көзге сәйкес келуі тиіс немесе
Басты үнемі тік ұстап отыру керек, алға қарай еңкеймей
Кейде арнайы көзілдірік пен сүзгі қолдану да ұсынылып жүр.олар
● Егер алыстан көрмеушілік 2-4 өлшемдерінен артық болса,екі жұп
Электромагнитті сәуленің деңгейі монитордың жанынан және артынан қарағанда, алдынан
Көбінесе мониторды тым төмен орналастырады. Адам оны өзі аңғармайды,
4.2 сурет. Компьютер операторының дұрыс отыруы
Арқасы бірнеше градусқа артқа қарй шалқайған. Мұндай отырыс омыртқаға
Ыңғайлы жұмыс креслосын ал,ан қажет, ол компьютерде жұмыс істегенде
Басқа қолданылатын заттардың орналасуы ұзақ уақытқа ың,айсыз еңкейіп отыруға
Егер адам клавиатурамен кө жұмыс жасаса, білектің астына
Эргономиканың негізгі факторы – жұмыс орынындағы шу. Жүйелік блоктар
● арнайы компьютер столын сатып алу, онда жүйелі
● компьютерді еденге (столдың астына) орналастыру;
● импозантты экран жасау, жұмыс орынын жүйелі блоктан алшақтатады,
Тек жүйелі блокты қалыпты жағдайда желдету жүйесін ұмытпау
Жұмыс орынын "дыбыстық ресімдеу" тиімді ұзақ жұмыс істеуге маңызды.
Компьютерде жұмыс істеу барысында әр сағаттан соң он минуттық
4.2 Жекелеме қорғау құралдары
Өндірісте жекелеме қорғау құралдары деп оларды қолданғанда жұмыс істеушіге
Ұжымдық қорғау құралдарына ауа ортасын қалыптандыру құралдары
Жекелеме қорғау құралдарына изоляциялауыш костюмдер, арнай киім мен
Сақтандыру құралдары кәсіпорынның жеке меншігінде болады және оны қолданып
Әкімшілік міндетті: жұмыс істеушілерді сақтандыру құралдарымен қамтамасыз етіп, оларды
Сақтандыру құралдарын дұрыс берудің инструкциялық талаптарын қатаң сақтау
4.3 Кәсіпорын мәдениеті
Кәсіпорын мәдениеті – бұл жаңа техника, прогрессивті технология, еңбекті
Кәсіпорындарда орындалуы тиіс шаралар:
● өндірістік жарақаттану мен кәсіптік аурулармен ауыру мөлшерін жүйелі
● құрал-жабдықтарды, бөлімшелер мен кәсіпорын территориясын техникалық
● жұмысшыларды мезгілінде сапалы және ыңғайлы арнайы жұмыс киімдерімен
Кәсіпорын мәдениетін көтеру шараларын ұжымдық келісім шартқа және еңбекті
4.3.1 Кәсіпорынның интерьері
Интерьер (франсуздың. Interieur-ішкі деген сөзінен)- бұл кез келген бөлімшенің
Интерьерге кәсіпорынның мәдениетін көтеру және еңбек жағдайларын жақсарту тұрғысынан
4.3.2 Функционалды бояу
Бөлімшелер мен жиһаздардың бояуы оларды сырттай жақсы қабылдауға және
Терезелердің орналасуына байланысты қабырғалар мен еден келесі түспен боялуы
оңтүстік жаққа қараған терезелер – қабырғалары жасыл-көгілдір немесе ашық
солтүстікке қараған терзелер – қабырғалары ашық-қызғылт немесе қызғылт-сары
терезелері шығысқа қараған – қабырғалары сары-жасыл түсті немесе жасыл;
терезелері батысқа қараған – қабырғалары сары-жасыл немесе көгілдір-жасыл түсті;
Компьютер орнатылған бөлмелерде шағылысу коэффициенттері дәрежесін қамтамасыз ету қажет:
4.4 Есептеу техникасын қолдануда қауіпсіздік техникасы
4.4.1 Жалпы ережелер
5.5.1.1 компьютер операторы мен басқа оргтехникамен (принтерлер, сканер,
● жасы 16-дан кем емес;
● медициналық тексеруден өткен;
● еңбекті қорғаудың алғашқы инструктажын, сонымен бірге жұмыс
● орындалатын жұмысы бойынша қауіпсіз жұмыс түрлеріне үйретілгендер.
5.5.1.2 оператор міндетті:
● ережелер мен нұсқауларда бекітілген ішкі еңбек ережелерін орындауға;
● еңбек қауіпсіздігі мен техника қауіпсіздігі ережелеріндегі талаптарды орындауға;
● жетекжісіне дербес компьютер мен басқа оргтехниканың ақауларын
● жұмыс орнында бөтен адамдардың болмауына;
● қажет болған жағдайда кәсіпорында оқыс жағдайларда жарақаттанғанға мүмкіндігінше
● өрт қауіпсіздігі талаптарын орындау;
● өз мамандығы бойынша қажетті мерзімде жүйелі түрде медициналық
4.4.1.3 Қызметкер берілген жұмыс орынындағы өндірістік қауіпті және зиянды
● электр тогынан жарақаттану немесе жермен жалғастыратын қондырғының жоқтығынан
● компьютер мониторының дұрыс орналаспау не дұрыс жұмыс атқармауынан
● монитордың, клавиатура, орындық пен столдың дұрыс орналаспауынан пайда
● желдетілмейтін бөлмелердегі көшірме және басатын оргтехника жұмысы кезінде
4.4.1.4 Қызметкер қала ішінде жұмысқа бара жатқанда және жұмыстан
4.4.1.5 Суды ашық су құбырларынан ішуге тиым салынады.
4.4.1.6 қызметкер кез келген жұмысты орындау кезінде қауіпті
4.3 сурет Монитордан көзге дейінгі ара қашықтық
4.5.2 Жұмыс басталар алдындағы еңбекті қоғауға қойылатын талаптар
4.5.2.1 Жұмыс басталар алдында оператор міндетті:
● жұмыс жетекшісінен қауіпсіз еңбек қауіпсіздігі
● киімді дұрыс киіп, жалбыраған шеттері көрінбейтіндей барлық
● жұмыс орынын қауіпсіз жағдайға бейімдеу;
● өкшесі тым биік аяқ киім киіп келуге тиым
4.5.2.5 Компьютерді не басқа оргтехниканы іске қоспас бұрын
Үшінші жермен қосатын тізбек болмаған жағдайда жермен қосу қарапайым
4.5.2.3 Жұмысқа қосылатын жабдықтың корпусы бүлінбегеніне көз жеткізу қажет
4.5.3 Жұмыс істеу кезіндегі қауіпсіздік талаптары
4.5.3.1 Жұмыс кезінде сусын ішуге, тамақ жеуге тиым салынады;
4.5.3.2 Жұмыс столына қандай да болмасын ыдыстардағы
4.5.3.3 Оргтехникамен жұмыс істейтін бөлмеде табиғи жәнежасанды жарықтандыру, табиғи
4.5.3.4 Компьютерлер орнатылған бөлменің терезелері солтүстік және солтүстік-шығыс жаққа
4.5.3.5 Бір компьютер тұтынушыға қажетті жұмыс ауданы 6
Компьютерді қосымша қондырғыларсыз (принтер, сканер и т.п.) қолданғанда
4.5.3.6 Бөлімше интерьерінің ішкі жағын безендіруге қолданылатын полимерлі материалдар
4.5.3.7 Бейнемонитордың экраны оператордың көзінен 60 – 700 мм
4.5.3.8. ПК мен үзіліссіз жұмыс уақыты 2 сағаттан артпауы
4.4 сурет Компьютер столы
4.5.4 Жұмыс аяқталғаннан кейінгі еңбек қауіпсіздінің талаптары
4.5.4.1 Жұмыс аяқталған соң қызметкер келесі талаптарды орындауға міндетті:
● жұмыс орынын тәртіпке келтіру;
● инструменттер мен саймандарды сақтауға арнайы арналған жерге жинау;
● барлық жұмыс кезіндегі ақаулар мен кемшіліктер жөнінде жетекшісін
● жұмыс орынын өрт қауіпсіздігі талаптарына сай тәртіпке
4.5.5 Авария, өрт, жарақат алу кезіндегі іс қимылдар
Авария болып қалған жағдайда не ситуацияда, егер оның болуы
5.5.5.2 Өрт туындаған жағдайда дереу жұмысты тоқтатып, 01 телефоны
5.5.5.3 Жарақат алған жағдайда дәрігерлік пунктке барып көмек алу
4.5.6 Нұсқауларды бұзғаны үшін жауапкершілік
4.5.6.1 Әрбір қызметкер осы аталған нұсқауларды сақтамағаны және бұзғаны
4.5.6.2 Бөлімшелер жетекшілері, цехтар мен участкелер бастықтары, бөлім бастықтары
4.5.6.3 Әкімшілік кінәлі адамдардан аварияның нәтижесінде болған шығындарды қайтарып
Пайдаланым талаптары
ПК жабық ,жылумен қамтамасыз етілетін бөлмелерде пайдалануға арналған, келесі
● қоршаған ауаеың температурасы 12 -27˚С шамасында;
● қоршаған ауаның салыстырмалы ылғалдылығы 60 ±
● атмосфералық қысым 84 –тен 107-ге КПа дейін;
● электрмен қоректендіру ПК-ны бір фазалы жүйеден кернеуі
● электрқондырғыларынң Ережесіне сәйкес жермен қосу
● ПК-ны қоректендіру үшін жеке электр линиясын пайдаланады,
● ГОСТ 63254-76 бойынша сыртқы электр жүйесінің кернеуі
● ішкі магнит өрісінің кернеуі 200 А/м артпауы
● қоршаған ортаның шаңдануы ГОСТ 16325-76 сәйкес 0,75
● қоршаған ортада коррозия тудыратын басқыншы сұйыұтар булары
● СН-245-71 санитарлық нормаларды сақтау қажет (компьютерлердің ара
● жүйелі блоктың артқы қабырғасындағы желдеткіш тесіктерді және
Ескерту: жиі күн күркірейтін географиялық зоналарда жүйені кернеуді шектеуіштер
ПК-да жұмыс істегенде келесі қауіпсіздік шараларын сақтау қажет:
● ПК –да жұмыс істеу кезінде сыртқы қосқыштарды
● сыртқы жапқышы шешіп алынған жағдайда жұмыс істеуге
● жүйелік шнур оралған немесе қысылып қалған жағдайда
● жүйелік шнурды зақымдау қауіпі бар жерге орналастырмау
● тұрақсыз орынға ПК-ны орналастыруға болмайды. Құлаған
● рұқсат берілгеннен жоғары температурада ПК-ны пайдалануға
● өздігінен ПК-ны жөндеуге болмайды. ПК-ныі қалыпты
● ПК-ны қайтадан іске қосу оны өшіргеннен
Желінің кернеуін тексеру
Компьютерді алғашқы іске қосар алдында желінің кернеуі компьютерге сәйкес
Кернеуді стабилизациялау
Біздің еліміздің көптеген жерлерінде жүйедегі кернеу қатты тербеліп
Компьютерді іске қосу
Компьютерді і ске қосу үшін қажет:
● егер компьютер кернеу стабилизаторы арқылы қосылған болса,
● принтерді қосу (егер қажет болса);
● мониторды іске қосу;
● компьютерді принтерді іске қосу ;
Осыдан кейін экранда бағдарламаның жұмысы туралы мәлімдеме және
Компьютерді өшіру
● Жұмыс істеп тұрған бағдарламалар жұмысын аяқтау және
● Компьютерді өшіру ( компьютер корпусындағы айырғышпен);
● Принтерді өшіру (егер ол қосылған болса);
● Мониторды өшіру ;
● егер компьютер кернеу стабилизаторы арқылы
Жүйелі блокты орнату
Компьютердің жүйелі блогын соққылар мен вибрация әсеріне шалдықпайтын жерге
Жермен қосу қондырғысының есебі
Жермен қосу қондырғысының есебі үшін вертикалды жерменқосқыштар мөлшері және
Токтың жүруіне қарсылық Rтр , Ом, жалғыз вертикалды жермен
Rтр = 0,366 * ρрас* ((lg(2 * l /
мұнда ρрас – топырақтың есептік қарсылығы, Ом * м;
l – вертикалды жерменқосқыштың ұзындығы, м;
d – жерменқосқыштың сыртқы диаметрі, м;
h – топырақ бетінен қосу кесіндісіне дейінгі ара қашықтық,
t – топырақ бетінен жерменқосқыштың ортасына дейінгі ара қашықтық,
t = h + 1 / 2,
t = 0,8 + 2 / 2 = 1,8
Топыраққа байланысты (құм) қабылдаймыз: ρрас = 700 Ом
l = 2 м;
d = 0,04 м;
h = 0,8 м.
Сондықтан:
Rтр = 0,366 * 700* ((lg (2 * 2
+ 2 / 4 * 1,8 – 2))
Артынан вертикалды жерменқосқыштардың мөлшерлі санын формуламен анықтаймыз:
n' = Rтр / Rдоп,
мұнда Rдоп – жерменқосқыш қондырғының рұқсатты қарсылығы, Ом
n' = 272,07 / 4 = 68,02.
Қабылдаймыз n' = 69.
Вертикалды жерменқосқыштар саны мен олардың ара қашықтығы арқылы 5.1
ηтр = 0,52.
Қосу кесіндісінің қарсылығы n ηтр ескере отырып формула
n = Rтр / Rдоп * ηтр,
n = 272,07 / 4 * 0,52 = 130,8.
n = 131 қабылдаймыз.
Қосу жолының қарсылығы Rп, Ом, формула бойынша анықталады:
Rп = 0,366 * ρрас / Lп * lg
мұнда Lп – жолдың ұзындығы, м;
b – жолдың ені, м.
Қабылдаймыз b = 0,3 м.
Lп = 1,05 * 2 * l * n
Lп = 1,05 * 2 * 2 * 131
Rп = 0,366 * 700 / 550,2 * lg
6.2 [1] графигі бойынша қосу жолын пайдалану
ηп = 0,28.
Артынан жерменқосу қондырғысының жалпы қарсылығы Rобщ, Ом, формуламен
Rобщ = Rтр * Rп / Rтр * ηтр
Rобщ = 272,07 * 2,98 / 272,07 * 0,52
Rобщ < Rдоп
3,2 Ом < 4 Ом
Адамдарды эвакуациялау қауіпсіздігі
Жобалау және ғимараттың құрылысы кезінде адамдарды эвакуациялауға қолайлы жағдайлар
Эвакуациялау жолы – сыртқа шығатын жолдағы кез-келген участок (коридорлар,
Эвакуациялау тиімділігі адамдар бөлмеден сыртқа шығуына кеткен ең аз
мұнда τд – адамдарды эвакуациялауға кеткен уақыт ұзақтығы
τр – мәжбүрлі эвакуацияныңесептік ұзақтығы;
0,85 – коэффициент, адамдардың қозғалу жағдайын ескереді;
l – ең алыс қашықтықта орналасқан жұмыс орынынан шығуға
υ – горизанталды жердегі адамдардың қозғалу жылдамдығы тең 16
N – эвакуацияланатын адамдар саны;
σ – есіктердің ені, м;
n – ені 1 м болатын эвакуациондық жолдың өткізу
m – ені бірдей есіктер саны.
Қабылдаймыз :
l = 4 м, N = 2, σ =
Сонда
τр = 0,85 * 4 / 16 + 2
Есептелген эвакуациялау уақыты 0,37 минут рұқсат етілген 1,5 минуттан
5.6 Электрқауіпсіздік
Көптеген қауіпті және зиянды өндірістік факторларға қарағанда электр тоғы
Адам денесінің электр тогына қарсылығы негізінен тері жамылғы қабатының
Зардап шеккен адамның денесіндегі токтың жүру жолы
Психофизиологиялық жағдайы көбінесе электрмен зақымдану дәрежесіне байланысты болады. өте
Адамда өлімге дейін соқтыратын ток мөлшеріне 0,05 А,
Компьютермен жұмыс істейтін адамдар медициналық тексеруден өтуі тиіс, қауіпсіз
Сонымен қатар, жерменқосылғыштар жағдайын үнемі тексеріп отырады, электротехникалық сақтандыру
5.7 Өртқауіпсіздігі
Ошақтан тыс материалды шығын келтіріп жанатын от өрт деп
Бұл үшін өртті болдырмау жүйесін ұйымдастырады - өрттің
Оттың тұтануы мен өрттер өртқауіпсіздігі инструктажын сапасыз өткізгенде, өрттің
Болуы мүмкін өрттен адамдар мен материалды құндылықтарды сыртқа алып
Негізгі өрт сөндіргіш құралдарға жататындар – су, судың буы,
Жобада бір ауалы көбікті өртсөндіргіш, 4-6 % -
4 ЭКОНОМИКАЛЫҚ БӨЛІМ
4.1 Техникалық экономикалық негіздеу
Жаңа бағдарламалық өнімді енгізудің экономикалық тиімділігін анықтағанда оны сауатты
Берілген бағдарламалық өнімді қолданудың маңыздылығы мен тиімділігі төмендегідей. Қазіргі
Бұл дипломдық жобада Қалалық телефондық станциясының жұмыс орынын
Бұл бағдарламаны өндіріске енгізуде түсетін жылдық үнемдеу келесі болады:
мәселені шешуді тездету арқылы машина уақытына төленетін төлем ақыдан
қызметкерлердің еңбек қауіпсіздігі мен техника қауіпсіздігіне кететін шығындарды азайту
4.2 Экономикалық тиімділік есебі
Қалалық телефондық станциясының автоматтандырылған жұмыс орынын экономикалық тиімділікке есептегенде
Жалпы шығындар есебі
Бағдарламамен қамтамасыз ету және автоматты құралдарды енгізудің экономикалық тиімділіген
4.1 кесте. Құрал- жабдықтардың құны
Бағдарла-маны қолданған-ға дейін Бағдар-ламаны қолдан-ғанда
Енгізген-ге дейін Енгізген-нен кейін
Компьютер Pentium IV 4 2 90 360 -
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар атауы Марка
Принтер HP LaserJet 1018 Сатып алынатын құрал-жабдықтардың, материал-дардың атауы
дана Көтерме сауда бағасы тг. Жалпы құны тг.
Бағдарла-маны қолданған-ға дейін Бағда-рлама-ны қолдан-ған кезде
Енгізуге дейін Енгізген соң
Компьютер Pentium IV 4 2 90 360 -
Принтер HP LaserJet 1018 Сатып алынатын жабдық-тар мен материал-дар
Компьютер столы - 4 2 15 60 -
Орындық - 4 2 12 48 -
Лицензион-ды бағдарла-мамен қамтамасыз ету Delphi 7.0 - - 455
Барлығы - - - - 937 455
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар мен материал-дар
Компьютер столы - 4 2 15 60 -
Орындық - 4 2 12 48 -
Лицензион-ды бағдарламамен қамтамасыз ету Delphi 7.0 - - 455
Барлығы - - - - 937 455
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар мен материал-дар
Лицензион-ды бағдарламамен қамтамасыз ету Delphi 7.0 - - 455
Барлығы - - - - 937 455
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар мен материал-дар
Бағдарла-маны қолданған-ға дейін Бағдарлама-ны қолда-ну кезін-де
Енгізген-ге дейін Енгізге-ннен кейін
Компьютер Pentium IV 4 2 90 360 -
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар мен материал-дар
Компьютер столы - 4 2 15 60 -
Орындық - 4 2 12 48 -
Лицензион-ды бағдарламамен қамтама-сыз ету Delphi 7.0 - - 455
Барлығы - - - - 937 455
Принтер HP LaserJet 1018 Сатып алынатын жабдықтар мен материал-дар
Компьютер столы - 4 2 15 60 -
Орындық - 4 2 12 48 -
Лицензион-ды бағдарлама-мен қамтамасыз ету Delphi 7.0 - - 455
Барлығы - - - - 937 455
Қалалық телефондық станциясының операторын енгізуге қойлатын бағдарламаны орнату үшін
Бағдарламаны орнату бағдарламамен қамтамасыз етудің құнының 6% шамамен анықталады
Сонымен , қосымша к.үрделі шығындар:
,
мұнда Собор – бағдарламамен қамтамасыз етудің құны;
Суст – бағдарламаны орнату құны;
Ақырында, қосымша күрделі шығындар 482,3 мың тенгені құрайды.
Ағымдағы шығындар есебі
АРМ өзіндік құнының сметалық калькулыциясына келесі шығындар кіреді:
Еңбек ақы төлемі;
Әлеуметтік қорларға жіберілетін төлем;
Еңбекті қорғау және техникалық қауіпсіздік
Шикізат пен материалдар.
Электр энергиясы есептелмейді, тек функцияларды орындаушылар саны қысқарады. Қалған
● Қалалық телефондық станциясының қызметкерінің айлық ақысы :
4.2 Кесте – Еңбек төлемі
Жұ-мыс-шылар саны адам Айлық ақысы мың.тенге Барлық жұмысшы-лардың айлық
тен-ге Барлық айлық ақша қоры әлеуметтік төлем ақылар-мен бірге
Енгізгенге дейін 4 30 120 20,4 140,4
1684,8
Енгізгеннен кейі 2 30 60 10,2 70,2
Барлық жұмысшылардың тарифтік қоры бір айлық ақыны жұмысшылар
Әлеуметтік қажеттіліктерге қызметкерлердің негізгі айлық ақысынан 17%
Еңбек ақының жалпы қоры әлеуметтік қажеттіліктерге төленетін ақымен бірге
● Еңбекті қорғау мен техника қауіпсіздігі
Еңбекті қорғау мен техника қауіпсіздігіне жұмсалатын шығындарды 1 жұмысшыға
4.3 Кесте – Еңбекті қорғау мен техника қауіпсіздігіне шығындар
Қызмет көрсетушілер саны, адам. Бір жұмысшыға жылына кететін шығын,
Енгізуге дейін 4 10 000 40 000
Енгізгеннен кейін 2 10 000 20 000
● көп еңбектілік
Қалалық телефондық станциясының қызметкерінің қағаз жұмысына кететін көп еңбектілігін
ЗПтр =160.165.1,17=30 888 тенге
● үстеме шығындар
Үстеме шығындарға құрал –жабдықтарды күту мен пайдалану, жабдықтар амортизациясына
Амортизациялық төлемдердің жылдық қорытынды қосындысы формула бойынша анықталады:
мұнда - жабдықтардың құны (күрделі шығындар), тенге;
- амортизация нормасы жабдықтар құнына %-і.
Компьютерлерге қажетті амортизация шығындарын олардың көтерме сауда бағасының 20%
Мағыналарды орынына қойып, келесі Кестеы аламыз:
4.4 Кесте- Амортизациялық төлемдер
Компьютерлер және т.б.құны. мың.тг. Амортизация жылына мың. тг.
Енгізген-ге дейін 937 187,4
Енгізген-нен кейін 703 140,6
4.5 Кесте – жылдық өзіндік құнның сметалық калькуляциясы
Көрсеткіштер Енгізуге дейінгі шығындар мың. тенге Енгізгеннен кейінгі шығындар
А/А әлеум.төлеммен бірге
1684,8
842,4
842,4
Еңбекті қорғау және техникалық қауіпсіздік
40
20 40
Жабдықтарды күтү мен пайдалануға кететін шығындар 46,85 35,15 11,7
Жабдықтар амортизациясы 187,4 140,6 46,8
Материалдар:
а) қағаз
б) принтер үшін қағаз 13
6
7 13
6
7 -
Барлығы 1985,05 1064,15 920,9
Күрделі шығындардың өзін ақтау мерзімі мен жылдық үнемдеу тиімділікті
Күрделі шығындардың өзін ақтауын уақыт анықтайды, бұл уақыт ішінде
Техникалық шаралардың күрделі шығындарының жалпы экономикалық тиімділігін анықтауда
Ток = ΔК / Эг.
Ток = 482,3 / 920,9=0,55 жыл
Қалалық телефондық станциясының операторының автоматтандырылған жұмыс орынын енгізудің
Жылдық экономияны формула бойынша анықтаймыз:
Эг1 = (С1-С2) ,
мұнда С1 и С2 – жұмыстың жылдық өзіндік құны,
Эг1 = 1985,05 -1064,15=1 920,9 мың.тенге
Эг= Эг1 + Эг2
мұнда Эг2 – көп еңбектілікті азайтудан түскен экономия..
Эг =920,9+30 888=951,8 мың.тенге
Экономикалық тиімділік есебінен технико-экономиялық көрсеткіштер туралы қорытынды жасауға болады,
Көрсеткіштер Енгізуге дейін Енгізгеннен кейін
Қосымша күрделі шығындар мың. тенге - 482,3
Қызмет көрсетуші персонал саны, адам. 4 2
Жұмыстың жылдық өзіндік құны, мың. тенге,
Соның ішінде: 1985,05 1064,15
Шикізат пен материалдар 13 13
А/А әлеумет.төлемқорымен 1684,8 842,4
Жабдықтарды күту мен пайдалану шығындары 46,85 35,15
Жабдықтар амортизациясы 187,4 140,6
Еңбекті қорғау мен техника қауіпсіздігі 40 20
Жылдық экономия, мың. тг. - 920,9
Өзін ақтау мерзімі, жыл - 0,55
Қорытынды.
Бұл бітіру жұмысымда «SQL сеорверін қолданып қосымшалар жүйесін
Жұмыстың негізгі назар қойылған программасы SQL-құрылымдық сұранымдар тілі. Бірінші
Екінші бөлімде SQL командалары, олардың типтері, қауіпсіздігін басқару шаралары,
Үшінші бөлімде желілік қосымшаларды құру тәсілдері қарастырылады. Бұл бөлімде
Қолданылған әдебиеттер:
Фаронов В. В. «Delphi 5: Руководство разработчика баз данных».
Издательство «Нолидж». Москва – 1999.
Microsoft SQL Server. Комплект документации.
Шуленин А.В. «Системы Управления Базами Данных».
Издательство «Питер». Санкт-Петербург – 1998.
Хьюгс С. «РНР. Руководство разработчика».
Издательство «ДиаСофт». Москва – 2001.
Фаронов В. В. «Delphi 5: Учебный курс».
Издательство «Нолидж». Москва – 2000.
6. Глушаков С.В.Ломотько Д.В. «Базы данных:Учебный курс»
www.delphiworld.narod.ru
Қосымша 1
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, ActnList, DB, ADODB, StdCtrls, ExtCtrls, Runit,
DBCtrls;
type
Tf1 = class(TForm)
ADOConnection1: TADOConnection;
q1: TADOQuery;
ActionList1: TActionList;
Action1: TAction;
DataSource1: TDataSource;
StringGrid1: TStringGrid;
Panel2: TPanel;
Panel1: TPanel;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Label7: TLabel;
Label8: TLabel;
fam: TEdit;
nam: TEdit;
ot: TEdit;
god: TEdit;
uli: TEdit;
dom: TEdit;
kva: TEdit;
Panel3: TPanel;
efam: TEdit;
ename: TEdit;
eot: TEdit;
egod: TEdit;
eul: TEdit;
edom: TEdit;
ekva: TEdit;
DBNavigator1: TDBNavigator;
Label9: TLabel;
Image1: TImage;
procedure Action1Execute(Sender: TObject);
procedure famKeyPress(Sender: TObject; var Key: Char);
procedure namKeyPress(Sender: TObject; var Key: Char);
procedure otKeyPress(Sender: TObject; var Key: Char);
procedure godKeyPress(Sender: TObject; var Key: Char);
procedure uliKeyPress(Sender: TObject; var Key: Char);
procedure domKeyPress(Sender: TObject; var Key: Char);
procedure kvaKeyPress(Sender: TObject; var Key: Char);
procedure DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
procedure FormShow(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
f1: Tf1;
implementation
uses Unit2;
{$R *.dfm}
function UpperCase(s: string): string;
var
i: integer;
begin
result := s;
for i := 1 to length(result) do
if (result[i] in ['a'..'z', 'а'..'я']) then
result[i] := chr(ord(result[i]) - 32);
end;
procedure GridShow;
var i:word;
begin
i:=1;
f1.q1.First;
repeat
f1.StringGrid1.Cells[0,i]:= cryptx( ProDel(f1.q1.FieldByName('fam').AsString,2), '21' );
f1.StringGrid1.Cells[1,i]:= cryptx( ProDel(f1.q1.FieldByName('name').AsString,2), '21' );
f1.StringGrid1.Cells[2,i]:= cryptx( ProDel(f1.q1.FieldByName('otch').AsString,2), '21' );
f1.StringGrid1.Cells[3,i]:= ProDel(f1.q1.FieldByName('god').AsString,2);
f1.StringGrid1.Cells[4,i]:= ProDel(f1.q1.FieldByName('uli').AsString,2) + ' ' + ProDel(f1.q1.FieldByName('dom').AsString,2);
if length( ProDel(f1.q1.FieldByName('kvar').AsString,2) )>0 then f1.StringGrid1.Cells[4,i] := f1.StringGrid1.Cells[4,i] +
f1.q1.Next;
inc(i);
until f1.q1.Eof;
f1.StringGrid1.RowCount:=i;
f1.q1.First;
end;
procedure showrec;
begin
if f1.q1.RecordCount = 0 then
MessageDlg('Ничего не найдено',MtInformation,[mbOk],0);
f1.efam.Text := cryptx( ProDel(f1.q1.FieldByName('fam').AsString,2), '21' );
f1.ename.Text := cryptx( ProDel(f1.q1.FieldByName('name').AsString,2), '21' );
f1.eot.Text := cryptx( ProDel(f1.q1.FieldByName('otch').AsString,2), '21' );
f1.egod.Text := f1.q1.FieldByName('god').AsString;
f1.eul.Text := f1.q1.FieldByName('uli').AsString;
f1.edom.Text := f1.q1.FieldByName('dom').AsString;
f1.ekva.Text := f1.q1.FieldByName('kvar').AsString;
end;
function notcorrect:boolean;
begin
if (f1.fam.Text='') and
(f1.nam.Text='') and
(f1.ot.Text='') and
(f1.god.Text='') and
(f1.uli.Text='') and
(f1.dom.Text='') and
(f1.kva.Text='') then begin
MessageDlg('Заполните хотя бы один параметр поиска',MtInformation,[mbOk],0);
result := true
end
else result := false
end;
procedure Tf1.Action1Execute(Sender: TObject);
begin
Screen.Cursor := crHourGlass;
q1.Close;
q1.SQL.Clear;
q1.SQL.Add('select * from semeycr where '+
' fam like '+''''+ cryptx( UpperCase( f1.fam.Text) , '21'
' name like '+''''+ cryptx( UpperCase( f1.nam.Text) , '21'
' otch like '+''''+ cryptx( UpperCase( f1.ot.Text) , '21'
' god like '+''''+ UpperCase( f1.god.Text) +'%''' + 'and'+
' uli like '+''''+ UpperCase( f1.uli.Text) +'%''' + 'and'+
' dom like '+''''+ UpperCase( f1.dom.Text) +'%''' + 'and'+
' kvar like '+''''+ UpperCase( f1.kva.Text) +'%''' );
//
q1.Open;
GridShow;
f1.Label9.Caption := 'Найдено ' + its(f1.q1.RecordCount);
Screen.Cursor := crdefault;
end;
procedure Tf1.famKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.namKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.otKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.godKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.uliKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.domKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.kvaKeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
if notcorrect then exit;
f1.Action1.Execute;
showrec;
end
end;
procedure Tf1.DBNavigator1Click(Sender: TObject; Button: TNavigateBtn);
begin
showrec;
end;
procedure Tf1.FormShow(Sender: TObject);
begin
f1.StringGrid1.Cells[0,0] := ' Фамилия';
f1.StringGrid1.Cells[1,0] := ' Имя';
f1.StringGrid1.Cells[2,0] := ' Отчество';
f1.StringGrid1.Cells[3,0] := ' Дата';
f1.StringGrid1.Cells[4,0] := ' Адрес';
f1.StringGrid1.ColWidths[0] := 130;
f1.StringGrid1.ColWidths[1] := 130;
f1.StringGrid1.ColWidths[2] := 130;
f1.StringGrid1.ColWidths[3] := 60;
f1.StringGrid1.ColWidths[4] := 160;
f1.Label9.Caption := '';
f2.show
end;
end.
Қосымша 2
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, DBGrids, DB, ADODB, ActnList, StdCtrls, Runit, ExtCtrls;
type
Tf1 = class(TForm)
ADOConnection1: TADOConnection;
qu1: TADOQuery;
ActionList1: TActionList;
Action1: TAction;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
Edit4: TEdit;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Action2: TAction;
n1: TAction;
n2: TAction;
n3: TAction;
n4: TAction;
Action3: TAction;
Label1: TLabel;
Image1: TImage;
Image2: TImage;
Image3: TImage;
Image4: TImage;
Image5: TImage;
Image6: TImage;
Edit5: TEdit;
procedure Action1Execute(Sender: TObject);
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
procedure FormShow(Sender: TObject);
procedure Action2Execute(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Edit2KeyPress(Sender: TObject; var Key: Char);
procedure n1Execute(Sender: TObject);
procedure n2Execute(Sender: TObject);
procedure n3Execute(Sender: TObject);
procedure n4Execute(Sender: TObject);
procedure Action3Execute(Sender: TObject);
procedure Edit3KeyPress(Sender: TObject; var Key: Char);
procedure Edit4KeyPress(Sender: TObject; var Key: Char);
procedure Image2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
f1: Tf1;
implementation
uses Unit2;
{$R *.dfm}
function UpperCase(s: string): string;
var
i: integer;
begin
result := s;
for i := 1 to length(result) do
if (result[i] in ['a'..'z', 'а'..'я']) then
result[i] := chr(ord(result[i]) - 32);
end;
procedure showrec;
begin
if f1.qu1.RecordCount = 0 then
MessageDlg('Ничего не найдено',MtInformation,[mbOk],0);
f1.Edit1.Text := Dos_Win_font( f1.qu1.FieldByName('NUM_PHON').AsString );
f1.Edit2.Text := Dos_Win_font( f1.qu1.FieldByName('NAME_ABON').AsString );
f1.Edit3.Text := Dos_Win_font( f1.qu1.FieldByName('F_NAM_PLAC').AsString );
f1.Edit4.Text := Dos_Win_font( f1.qu1.FieldByName('ADR_PLAC').AsString );
end;
procedure Tf1.Action1Execute(Sender: TObject);
var ft : string;
begin
// ft := Win_Dos_font(Edit1.Text);
ft := Edit1.Text;
qu1.Close;
qu1.SQL.Clear;
qu1.SQL.Add('select * from gts_a where num_phon like ' +chr(39)
qu1.Open;
f1.Edit5.Text := 'Найдено ' + its( qu1.RecordCount );
showrec;
end;
procedure Tf1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
f1.Action1.Execute;
f1.Edit1.SelectAll
end;
end;
procedure Tf1.FormShow(Sender: TObject);
begin
f2.show;
f1.Edit5.Text := '';
{ f1.ADOConnection1.ConnectionString := 'Provider=SQLOLEDB.1;'+
'Persist Security Info=False;'+
'Password=555;'+
'User ID=sa;'+
'Initial Catalog=GTS;'+
'Data Source=192.168.13.202';
f1.ADOConnection1.Connected := true}
end;
procedure Tf1.Action2Execute(Sender: TObject);
var ft : string;
begin
ft := Win_Dos_font( UpperCase(Edit2.Text) );
qu1.Close;
qu1.SQL.Clear;
qu1.SQL.Add('select * from gts_a where name_abon like ' +chr(39)
qu1.Open;
f1.Edit5.Text := 'Найдено ' + its( qu1.RecordCount );
showrec;
end;
procedure Tf1.Button1Click(Sender: TObject);
begin
f1.Edit3.Text:= UpperCase(f1.Edit2.text);
end;
procedure Tf1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
f1.Action2.Execute;
f1.Edit1.SelectAll
end;
end;
procedure Tf1.n1Execute(Sender: TObject);
begin
qu1.First;
showrec;
end;
procedure Tf1.n2Execute(Sender: TObject);
begin
qu1.Prior;
showrec;
end;
procedure Tf1.n3Execute(Sender: TObject);
begin
qu1.Next;
showrec;
end;
procedure Tf1.n4Execute(Sender: TObject);
begin
qu1.Last;
showrec;
end;
procedure Tf1.Action3Execute(Sender: TObject);
var ft : string;
dom : string;
begin
ft := Win_Dos_font( UpperCase(Edit3.Text) );
// dom := Edit4.Text;
qu1.Close;
qu1.SQL.Clear;
qu1.SQL.Add('select * from gts_a where f_nam_plac like ' +chr(39)
qu1.Open;
f1.Edit5.Text := 'Найдено ' + its( qu1.RecordCount );
showrec;
end;
procedure Tf1.Edit3KeyPress(Sender: TObject; var Key: Char);
begin
if key = #13 then begin
f1.Action3.Execute;
f1.Edit1.SelectAll
end;
end;
procedure Tf1.Edit4KeyPress(Sender: TObject; var Key: Char);
begin
{ if key = #13 then begin
f1.Action3.Execute;
f1.Edit1.SelectAll
end;
end;
procedure Tf1.Image2Click(Sender: TObject);
begin
application.Terminate
end;
end.
92
Номер зач.книжки
Имя
Фамилия
Отчество
Дата рождения
Адрес
Телефон
Шифр специальности
Номер зач.книжки
Рейтинг
Дата поступления
Дата окончания
Номер зач.книжки
Специальность
Курс
Кесте
Мәліметтер
SQL
сұраныс
Ұсыныс
Сұраныс негізінде кестедегі мәліметтерді көрсетеді
2,4 м
5,35 м
6,14 м
КНОПКА





23 қазан 2019ж.
2008-2018 topreferat.com - Қазақша рефераттар, курстық, дипломдық жұмыстар

^