cakbudi

Koneksi Databases MS-Acces berpassword dengan file DSN

In Visual Basic Programming on November 3, 2008 at 1:24 am

tulisan ini mencoba menjawab pertanyaan dari sodara BENI pada September 25, 2008 jam 9:33 am

SAYA PUNYA MASALAH DIKIT NI CAK
1. SAYA INGIN MENYIMPAN FOTO DIDALAM DATABASE ACSES. TAPI BUKAN NAMA FILENYA YANG DI ACSES. GIMANA YA CAK CARANYA SUPAYA FOTONYA BERADA DI DALAM DATABASE
2. SAYA BUAT DATABASE YANG DI KASI PASSWORD DI ACSESS. TAPI SAYA BELUM TAU BUAT PROGRAM VB YANG BISA BACA DATABASE YANG DI KASI PASSWORD. TOLONG DONG CAK BUATIN CONTOHNYA ?
3. CAK GIMANA SIH BUAT DATABASE YANG EXTENSIONNYA TXT, DAN GIMANA CARA MENGHUBUNGKANNYA DENGAN PROGRAM VB, TOLONG YA CAK BUATIN JUGA CONTOHNYA
TERIMA KASIH CAK UNTUK SEMUANYA

1. Untuk yang ini sepertinya saya pernah lihat di vb-bego.com, monggo dicek dulu.
2. Untuk koneksi databases yang diberi password, bisa dengan membuat file DSN,
Start-Setting-Control panel

admtools.jpg
Administrative Tools

adodc.jpg
Data Source (ODBC)

dsn.jpg
Add
dsn2.jpg
Pilih Driver dan ikuti proses selanjutnya,
jangan lupa simpan file dsn anda satu folder dengan aplikasi anda untuk memudahkan dalam pemanggilan. Jika anda melakukannya dengan benar, maka akan menghasilkan satu file dsn, misal file dsn-nya anda beri nama dengan koneksi.dsn yang isinya kurang lebih sbb:

[ODBC]
DRIVER=Microsoft Access Driver (*.mdb)
UID=admin
UserCommitSync=Yes
Threads=3
SafeTransactions=0
PageTimeout=5
MaxScanRows=8
MaxBufferSize=2048
FIL=MS Access
DriverId=25
DefaultDir=C:\folderaplikasi
DBQ=C:\folderaplikasi\namadatabases.mdb

nah selanjutnya
buat aplikasi divisual basic seperti biasa
pasangkan satu datagrid saja.

1. Pada General-Declaration tuliskan kode berikut

Dim cKoneksi As New ADODB.Connection
Dim tblnya As New ADODB.Recordset

2. Pada Form – Load tuliskan kode berikut

If cKoneksi.State = 1 Then
cKoneksi.Close
End If
cKoneksi.CursorLocation = adUseClient
Filenya = “file name=” & App.Path & “\koneksi.dsn”
cKoneksi.Open Filenya, “Admin”, “passwordnya”

tblnya.Open “Select * from namatabel”, cKoneksi, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = tblnya

Kalau tidak ada kesalahan, maka pada datagrid akan ditampilkan isi dari tabel yang dibuka.

3. Saya akan coba untuk bahas secara khusus.

Demikian Mas Beni, semoga membantu, bagi sodara-sodara yang mau menambahkan silahkan posting di komentar. Terim kasih, Selamat berdjoeang dan tetap semangat.

Iklan
  1. cak bud,….ma’af ya ini beni lagi
    saya sudah baca, tapi masih belum ngerti cak.
    soalnya cak bud bilang buat file dsn dulu.
    gimana caranya buat file dsn nya? trus gimana buat file databasenya, struktur databasenya juga belum dikasi tau cak.
    sebelumnya terima kasih ya cak atas bantuannya

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout /  Ubah )

Foto Google+

You are commenting using your Google+ account. Logout /  Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout /  Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout /  Ubah )

Connecting to %s

%d blogger menyukai ini: