Like this:

Form Login kerap dijumpai pada program aplikasi, terutama program basis data khususnya yang berbasis client/server. Tujuannya untuk memastikan keabsahan pengguna program aplikasi. Juga bisa digunakan untuk klasifikasi pengguna dan menampilkan menu yang berhak diakses pengguna tersebut. Bagian pertama tulisan ini membahas teknik dan cara pembuatan Form Login sederhana dengan Delphi 7 dan SQL Server 2000.

Pertama kita buat dulu tabel pengguna yang menampung User ID dan Password. Saya juga menambahkan satu field khusus sebagai penanda group user tersebut. Tabel yang dibuat yaitu tabel users yang dibuat pada database AKADEMIK. Buatlah struktur tabel users berikut dengan menggunakan Enterprise Manager (tentukan field userid sebagai Primary Key).

No.	Nama Field	Tipe/Panjang	Allow Nulls	Keterangan
1	userid	varchar(10)	No	ID User untuk login
2	username	varchar(30)	No	Nama User
3	userpass	varchar(20)	No	Password untuk login
4	usergroup	char(1)	No	Group user

Untuk contoh data, isilah dua record berikut:

userid	username	userpass	usergroup
admin	Administrator	admin	A
user1	User Program 1	user1	U

Nah sekarang buka Delphi 7 dan rancanglah Form Login seperti gambar dibawah ini:

Atur properti masing-masing obyek sbb:

txtUserID: Text=<kosongkan>
txtUserPass: Text=<kosongkan> | PasswordChar=*
frmLogin: BorderIcons=[biSystemMenu] | BorderStyle=bsDialog | Caption=Login | Position=poScreenCenter
btnLogin: Caption=LOGIN | Default=True
ADOQuery1: Connection=ADOConnection1
ADOConnection1: LoginPrompt=false

Tentang ADOConnection baca Koneksi SQL Server via ADODB

Klik ganda form frmLogin dan ketiklah program berikut:

Klik ganda tombol LOGIN dan ketiklah program berikut:

Run program dan cobalah input UserID/Password yang salah dan coba juga inputkan User ID/Password yang benar.

Form Login diatas masih sangat sederhana, karena belum menggunakan Data Module dan belum bisa mengklasifikasi pengguna yang login. Next kita akan bahas teknik penggunaan Data Module serta Form Login yang bisa mengklasifikasi pengguna yang login untuk menampilkan menu yang berhak diakses pengguna tersebut serta menyembunyikan menu yang bukan haknya. –CU–

Advertisement