Ақпараттық қауіпсіздік және компьютерлік жүйелерде ақпаратты қорғау

Автор работы: Пользователь скрыл имя, 09 Декабря 2014 в 17:21, курсовая работа

Краткое описание

Кадрлар құрамы мен құрылымы келесі көрсеткіштермен сипатталады: білім деңгейі, мамандығы, кәсібі, квалификациясы, жұмыс стажы, жасы, т.с.с.
Кадр бөлімі қызметінің мәселелері:
- мекеменің ерекшеліктеріне сәйкес мамандығы, квалификациясы, кәсібі бойынша басқарушы және жұмысшы қызметкерлермен қамту;
Кадр қозғалысын, карьералық өсуін қамтамасыз ету;
Қызметкерлердің квалификациясын көтеру;
Кадр құрамын тіркеу.

Содержание

КІРІСПЕ........................................................................................................
6
1 ЖАМБЫЛ ОБЛЫСЫ БАЙЗАҚ АУДАНЫНЫҢ ӘКІМШІЛІГІНІҢ ҚҰРЫЛЫМЫ.
1.1 Жамбыл облысы Байзақ ауданының әкімшілігі туралы жалпы мәлімет...........................................................................................................
1.2 Жамбыл облысы Байзақ ауданы әкімшілігінің ұйымдастыру құрылымы ......................................................................................................
1.3 Мәселенің қойылымы..............................................................................



8

8
19
2 АВТОМАТТАНДЫРЫЛҒАН ЖҰМЫС ОРТАЛАРЫ
2.1 Жұмыс орнын автоматтандыру принциптері мен оған
қойылатын талаптар......................................................................................
2.2 Автоматтандырылған жұмыс орнының құрамы..................................


22
23
3 BORLAND DELPHI ОРТАСЫНДА МӘЛІМЕТТЕР ҚОРЫМЕН ЖҰМЫС ІСТЕУ ТЕХНОЛОГИЯЛАРЫ
2.1 BDE Administrator арқылы мәліметтерге қатынасуды ұйымдастыру
2.2 Active XDate Object (ADO) технологиясының ерекшеліктері ..........
2.3 BDE технологиясының көмегімен мәліметтер қорының байланысы үшін қолданылатын компоненттер ..........................................................


29
32

32
4 ПРАКТИКАЛЫҚ БӨЛІМ
4.1 Кадр бөлімінің мәліметтер базасын Delphi 7 ортасында құру технологиясы..................................................................................................
4.2 Бағдарламаның іске қосылуы және қолданылуы..............................


36
40
5 АҚПАРАТТЫҚ ЖӘНЕ ТЕХНИКАЛЫҚ ҚАУІПСІЗДІК
5.1 Ақпараттық қауіпсіздік және компьютерлік жүйелерде ақпаратты қорғау..............................................................................................................
5.2 Мекемедегі еңбекті қорғау шаралары...................................................


46
50
ҚОРЫТЫНДЫ.............................................................................................
52
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ...................

Вложенные файлы: 1 файл

Акимат.doc

— 779.00 Кб (Скачать файл)

  showmessage('Дұрыс мәлімет енгізіңіз!!!');

end;

 

end;

 

procedure TForm1.Button12Click(Sender: TObject);

begin

try

form1.VoinT.Edit;

form7.showmodal;

except

  showmessage('Дұрыс мәлімет енгізіңіз!!!');

end;

 

end;

 

procedure TForm1.Button11Click(Sender: TObject);

begin

try

form6.showmodal;

except

  showmessage('Дұрыс мәлімет енгізіңіз!!!');

end;

 

end;

 

procedure TForm1.Button13Click(Sender: TObject);

begin

form1.Query1.SQL.Clear;

  form1.Query1.SQL.Add('Select *');

  form1.Query1.SQL.Add('from "t1.db"');

  form9.showmodal;

end;

 

procedure TForm1.FormShow(Sender: TObject);

begin

  form2.ShowModal;

end;

 

 

procedure TForm1.Button14Click(Sender: TObject);

begin

form1.SpisokS.DataSet:=form1.SpisokT;

  form1.Button2.Visible:=true;

    form1.Button3.Visible:=true;

      form1.Button4.Visible:=true;

        form1.Button5.Visible:=true;

          form1.Button6.Visible:=true;

  form1.Button14.Visible:=false;

form1.Visible:=true;

form1.Label26.Visible:=false;

  Form1.Caption:=form1.SpisokTfam.value + ' '+ form1.SpisokTName.value +

  ' ' + form1.SpisokTOtch.value;

 

end;

 

procedure TForm1.N1Click(Sender: TObject);

begin

form1.button6.Click;

end;

 

procedure TForm1.N3Click(Sender: TObject);

begin

close;

end;

 

procedure TForm1.DBGrid1DblClick(Sender: TObject);

begin

try

if form1.VoinTVoinOb.Value='Әскери міндетті' then form7.CheckBox1.Checked:=true else form7.CheckBox1.Checked:=false;

if form1.obrazTObrSred.Value='Орта' then form5.CheckBox1.Checked:=true else form5.CheckBox1.Checked:=false;

if form1.obrazTObrSpec.Value='Орта кәсіптік' then form5.CheckBox2.Checked:=true

else form5.CheckBox2.Checked:=false;

if form1.obrazTObrVis.Value='Жоғары' then form5.CheckBox3.Checked:=true else form5.CheckBox3.Checked:=false;

 

if form1.Button6.Visible=true then form1.DBGrid1.ReadOnly:=true;

except

end;

end;

 

procedure TForm1.N12Click(Sender: TObject);

begin

n12.ShortCut:=ShortCut(Word('S'), [ssCtrl]);

form1.Button4.Click;

end;

 

procedure TForm1.N20Click(Sender: TObject);

begin

form1.Button4.click;

end;

 

procedure TForm1.N21Click(Sender: TObject);

begin

form1.Button5.click;

end;

 

procedure TForm1.N13Click(Sender: TObject);

begin

form1.Button7.click;

end;

 

procedure TForm1.N14Click(Sender: TObject);

begin

form1.Button8.click;

end;

 

procedure TForm1.N15Click(Sender: TObject);

begin

form1.Button9.click;

end;

 

procedure TForm1.N16Click(Sender: TObject);

begin

form1.Button10.click;

end;

 

procedure TForm1.N17Click(Sender: TObject);

begin

form1.Button11.click;

end;

 

procedure TForm1.N18Click(Sender: TObject);

begin

form1.Button12.click;

end;

 

procedure TForm1.N22Click(Sender: TObject);

begin

Form9.ShowModal;

end;

 

procedure TForm1.N23Click(Sender: TObject);

begin

form11.showmodal;

form11.timer1.enabled:=true;

form11.timer1.interval:=1500;

end;

 

procedure TForm1.PageControl1Changing(Sender: TObject;

  var AllowChange: Boolean);

begin

if (button6.Visible=false) and ( form1.SpisokS.DataSet<>form1.Query1) then

messagedlg('Бірінші параққа өзгерістерді  сақтаңыз!!!',mtWarning,[mbOk],0);

end;

 

procedure TForm1.FormActivate(Sender: TObject);

begin

Form1.Caption:=form1.SpisokTfam.value + ' '+ form1.SpisokTName.value +

  ' ' + form1.SpisokTOtch.value;

form1.DBNavigator1.visible:=true;

SpisokT.Active:=true;

end;

 

procedure TForm1.N25Click(Sender: TObject);

begin

form1.button6.Click;

form1.Button2.Click;

end;

 

procedure TForm1.N26Click(Sender: TObject);

begin

form1.button6.Click;

form1.Button3.click;

end;

 

procedure TForm1.N19Click(Sender: TObject);

begin

Form1.Button5.Click;

end;

 

procedure TForm1.DBGrid5KeyDown(Sender: TObject; var Key: Word;

  Shift: TShiftState);

begin

form7.Button1.Enabled:=true;end;end.

 


 



Информация о работе Ақпараттық қауіпсіздік және компьютерлік жүйелерде ақпаратты қорғау