Posting kali ini saya coba membuat Login Username dan Password pada VB 6.0 dengan database SQL Server 2000, mungkin tema yang saya buat ini sedikit membantu buat temen2, atau kalo ada masukkan silahkan share ya….
Langkah pertama pada Button Login (XPText1) silahkan tulis Syntax berikut :
Sub bersih()
XPText1.Text = “”
XPText2.Text = “”‘
End Sub
Sub awal()
XPText1.SetFocus
XPButton1.Enabled = False
End Sub
Private Sub xpbutton1_click()
If XPText1.Text = “” Or XPText2.Text = “” Then
pesan$ = MsgBox(“Maaf, Password dan User Name Anda Kurang Valid!!”, vbInformation + vbOKOnly, “System Message by Sito”) bersih
awal
Else
Set rs = con.Execute(“select * from Registrasi where Nama = ‘” & XPText1.Text & “‘ and Pass=’” & XPText2.Text & “‘”)
If Not rs.EOF Then With x: .Visible = True: .Enabled = True: End With
Unload Me
Else
pesan$ = MsgBox(“Maaf, Password dan User Name Anda Salah!!”, vbInformation + vbOKOnly, “System Message by Sito”)
If pesan$ = vbOKOnly Then
bersih
awal
Else
bersih
awal
End If: End If: End If
End Sub
Langkah ke-dua Buat table Registrasi Password pada database SQL-nya ya:
Create table Registrasi (
Nama varchar (50) primary key,
Pass varchar (20) null,
Konfirmasi Varchar (50) null,
Pertanyaan Varchar (50) null,
Jawab Varchar (50) null)
Note : Untuk Tabel Registrasi anda design dahulu pada form VB guna memudahkan pengisian data Username dan Password. Nah untuk form Login anda tinggal memanggil data pada form Registrasi saja misalkan “Select * from Registrasi” mudah khan…
Form Registrasi kurang lebih saya desain seperti dibawah ini:
Selamat mencoba.
Pada pertemuan kali ini, penulis mencoba untuk membahas tentang syntax untuk menyimpan data ke dalam Database. Database yang penulis pergunakan yaitu Database SQL Server 2000, untuk lebih detailnya perhatikan gambar berikut :
1. Rancang form untuk mengeksekusi data yang akan anda input.
2. Jika data berhasil disimpan maka data akan terlihat pada DataGrid seperti gambar dibawah :
Nah…. Mudah kan, selamat mencoba…!!
Artikel ini mengenai koneksi Visual Basic 6 dengan database SQL Server 2000, caranya sangat mudah kok ikuti langkah2 berikut ini:
1. Pertama anda terapkan ADODC1 dulu didalam salah satu form seperti gambar dibawah.
2. Langkah selanjutnya yaitu pada kolom Adodc1, anda klik kanan lalu pilih menu Properies seperti gambar dibawah :
3. Langkah berikutnya anda klik tombol “Build” untuk mencari nama database-nya
4. Langkah berikutnya pilih nama database anda pada combo Box
disini penulis mengambil contoh database Apotek yang telah penulis buat sebelumnya. Lalu klik “Ok” -> kemudian klik “Tes Connection”
Jika anda mengikuti langkah2 diatas dengan benar maka hasilnya koneksi berhasil seperti gambar dibawah:
Mudah bukan… semoga bermanfaat.
Catatan:
“Untuk koneksi sebuah aplikasi dengan banyak Form, disarankan menggunakan Module supaya syntax tidak terlalu panjang”
Membuat tampilan untuk form Login Menu sangat membantu untuk mengakses Form rancangan tampilan pada sub-sub menu sebuah aplikasi. Disini penulis mencoba untuk mengambil contoh dari aplikasi penjualan obat pada suatu apotek. Untuk itu penulis mencoba untuk mendesign menu serta bagaimana syntax-nya, coba perhatikan dibawah ini:
1. Langkah pertama anda desain form tampilan dahulu
2. Langkah berikutnya tuliskan syntax sebagai berikut :
Nah gampang kan…. Selamat Mencoba
Diskusi
Belum ada komentar.