login Delphi dengan access

Membuat form login dengan MS.Access

Sebelumnya kita sudah membuat form1  sbb dengan nama database dbmhs.mdb

 

Tambahkan tabel di database Access  tersebut dengan nama tblogin

Tambahkan form lagi untuk pembuatan login bila berhasil login maka akan menuju form1 yang sudah di buat sebelumnya

Berikut pembuatannya:

Pilih file -->new-->form,maka otomatis akan muncul form2

Buat desain  dan tambahkan ADO Connection,ADOQuery 

Hasilnya sbb:

Setting properties

ADOConnectionàname = con1,Connection String = koneksikan ke database yang telah dibuat,loginForm=false

ADOQuery àname = qry1 , Connection = con1

Koneksikan  ke form1 = Tekan alt+f11 àpilih form1àUse Unit

Double klik pada form2 ketikan coding sbb:

 

double klik pada button login ketikan coding sbb:

   

coding untuk button Exit

begin

Application.Terminate; 

end;

Maka hasilnya sbb:

 

 

semoga bermanfaat heee,,,,