PERTEMUAN KE-5

Proses membuat data base dan mengkoneksikan dengan Ms. Access

1.       Buka Ms. Access

2.       File -> new ->blank database

3.       Buat table baru

4.       Mebuat rincian field” (Nama, NIM, Jurusan, Kelas, dll)

5.       Sesuaikan type menggunakan Text, Date/Time

6.       Sesuaikan value sesuai ukuran (field size : 25, 10, 15)

7.       Simpan

Buat program interface(antarmuka) database Ms. Access dengan Delphi 7.0

1.       Buka Delphi

2.       Pillih ADO->Connecttion string->pilih ile database yang akan dimasukkan dalam delphi->connected(True)->Login Prompt->(False)

3.       ADOTable1->connection(ADOconnection1)->TableName->Active(True)

4.       DataSource1->DataSet(ADOTable1)

5.       DBGrid1->DataSource(DataSource1)

6.       DBNavigator->DataSource(DataSource1)

7.       Button1-> caption(Simpan)

Button2-> caption(Batal)

Button3-> caption(Laporan)

8.       Label1->caption->Nama

Label2->Caption->NIM

Label3->Caption->Jurusan, dst

9.       Edit1->Text (hapus tlisan “Text”)

Edit2->Text (hapus tlisan “Text”)

Edit3->Text (hapus tlisan “Text”)

Edit4->Text (hapus tlisan “Text”), dst.

10.   Klik dua kali pada button “Batal” dan isikan Source Code

edit1.Text:='';

edit2.Text:='';

edit3.Text:='';

edit4.Text:='';   dst.

11.   Klik dua kali pada button “Simpan” dan isikan Source Code

Adotable1.Open;

AdoTable1.Append;

ADOTable1.FieldByName('Nama').AsString:=edit1.Text;

ADOTable1.FieldByName('NIM').AsString:=edit2.Text;

ADOTable1.FieldByName('Fakultas').AsString:=edit3.Text;

ADOTable1.FieldByName('Jurusan').AsString:=edit4.Text;

ADOTable1.FieldByName('Kelas').AsString:=edit5.Text;

ADOTable1.Post;

12.        Lalu jalankan dengan “RUN”

SELAMAT MENCOBA ^^