Home
Cara Menghilangkan Password Database,
ya itulah topik yang akan saya ulas pada kesempatan kali ini karena ada
salah seorang sahabat menanyakan masalah ini via email kurang lebih
pertanyaan nya seperti ini "Mas kalau untuk me-remove atau menghapus password Microsoft Access dengan VB gimana yah".Okelah kalau begitu kita langsung aja kepokok permasahalahan sebagai contoh buatlah sebuah File Database Ms. Access dengan nama test.mdb dan password 123321, yang nantinya akan kita hilang password tersebut dengan menggunakan coding Visual Basic
langkah - langkah persiapan
- Tambah References Microsoft DAO 3.6 Object Library pada project Sobat
Public Sub CLearDatabasePassword()
On Error GoTo Salah
Dim DtBase As Database
Set DtBase = OpenDatabase(App.path & "\Database\test.mdb", True, False, ";pwd=123321")
DtBase.NewPassword "123321", ""
DtBase.Close
Exit Sub
Salah:
If Err.Number <> 0 Then
MsgBox Err.Description & vbCrLf & Err.Source, , "Error"
End
End If
End Sub
* Catatan file Ms. Access (test.mdd) harus satu folder dengan Aplikasi (Project)
Sekarang sobat tinggal memanggil fungsi diatas pada form sintax nya seperti ini Call CLearDatabasePassword kalau tidak ada aral melintang maka password database tersebut akan kabur (hahahaha .. kekekeke). Mudah - mudahan tutorial singkat ini ada mamfaatnya bagi sobat-sobat VB developer, kalau ada kesempatan akan saya lanjutkan untuk pembahasan yang lain yang pasti masih seputar Tutorial Visual Basic ... salam.
klo yang menggunakan acces 2007 bisa gak??