Membuat Form Ganti Password di VB6.0

Assalamu'alaikum Wr Wb

Selamat siang dan salam pelajar! Beberapa waktu yang lalu saya iseng-iseng untuk membuka salah satu grub besar pemrograman Indonesia dengan nama "Visual Basic Indonesia" di Facebook. Saya membaca satu persatu postingan di timeline tersebut, namun yang didapatkan adalah pertanyaan yang cukup sulit untuk saya tebak, apalagi menjawabnya. Namun saya tetap fokuskan untuk membaca pertanyaan-pertanyaan member tersebut, hingga saya menemukan pertanyaan yang bunyinya seperti ini...

teman-teman mau tanya dong,
cara buat form ganti password gmn ya, ane udah googling tpi gak ada yg pass,,,

Yah, dia adalah Pembriyan Ashter, salah satu member Grub Visual Basic Indonesia yang mungkin sedang mengalami kesulitan dalam membuat Program Ganti Password di Visual Basic atau lagi mencari cara/ algoritma lain untuk membuat program tersebut. Saya senang, sebenarnya ini pertanyaan yang menurut saya cukup mudah untuk dijawab. Akhrinya saya mencoba membantu membuatkan tutorial bagaimana caranya membuat Aplikasi Ganti Password di VB6.0. Saya harapkan tutorial yang singkat namun padat ini dapat membantu dia dan teman-teman sekalian yang mungkin saat ini sedang mengalami masalah yang sama.

Tutorial Membuat Program Ganti Password di VB6.0 :

1. Persiapkan diri dan niat anda.

2. Saya asumsikan anda telah membuat database dan tabel untuk aplikasi ini. Sebagai contoh saya akan membuat database dengan skema sebagai berikut :

Jenis Database : Microsoft Access

Nama Database : db.mdb

Nama Tabel : login

Field/Kolom Tabel :

Field Name	Data Type
Username	Text
Password	Text

3. Buka Visual Basic 6.0

4. Buat roject VB dengan nama : prjganti_password

5. Buat Form dengan nama : frmganti_password

6. Tekan ctrl+T untuk membuka jendela komponen, kemudian pilih dan ceklis komponen yang harus diincludekan, sebagai berikut :

a. Microsoft ADO Data Control 6.0 (OLEDB)

b. Microsoft DataFrid Control 6.0 (OLEDB)

c. Microsoft DataList Controls 6.0 (OLEDB)

Kemudian klik OK

7. Setelah itu, desain program yang akan anda buat. Contoh gambar desain dan pilihan komponen dapat anda lihat dibawah ini.

Membuat Form Ganti Password di VB6.0

8. Name yang ditulis harus anda sesuaikan dengan gambar diatas.

9. Koneksikan program VB anda dengan Database Access, caranya yaitu :

a. Klik kanan Adodc1

b. Klik ADODC Properties

c. Klik Tab General

d. Pilih Use Connection String

e. Klik Build

f. Tab Provider > Klik Microsoft Jet 4.0 OLE DB Provider

g. Klik Next

h. Pilih Select or enter a database name

i. Klik browse (...) > Pilih database Access yang telah dibuat tadi (db.mdb)

j. Klik Test Connection

k. Jika berhasil maka akan muncul pesan “Test connection succeeded”

l. Klik Tab RecordSource

m. Pilih Command Type > 2 -adCmdTable

n. Pilih Table or Stored Procedure Name > login

o. OK

10. Lakukan hal yang sama untuk adodc2

11. Sinkronkan Datagrid dan Adodc dengan cara :

a. Klik DataGrid1

b. Pada jendela properties disebelah kanan, pilih DataSource > Adodc2

12. Klik 2x pada DataCombo dcusername, kemudian masukkan koding seperti dibawah ini :

Private Sub dcusername_Click(Area As Integer)
Adodc2.Recordset.Find "Username='" & dcusername.Text & "'", , adSearchForward, 1
txtpassword.Text = Adodc2.Recordset!Password
End Sub

13. Klik 2x pada CommondButton cmdedit, kemudian masukkan koding seperti dibawah ini :

Private Sub cmdedit_Click()
If txtpassword.Text <> "" Then
Adodc2.Recordset!Password = txtpassword.Text
Adodc2.Recordset.Update
MsgBox "Sukses Diedit"
End If
End Sub

14. Save Project

15. Running (F5)

16. Selesai

Klik suka FansPage Melodigulis Group pada sidebar kanan anda, agar menjadikan blog ini lebih berkualitas. Wassalamu'alaikum Wr Wb