Minggu, 06 November 2011

KONEKSI DATABASE DARI DELPHI KE Ms.Access Melalui ODBC

                                                    KONEKSI DATABASE DARI DELPHI KE
MS. ACCESS  MELALUI ODBC

Membuat koneksi database *.mdb dari Delphi ke Ms Access bisa dilakukan
melalui ODBC Data Source Adminstrator yang ada pada  Control Panel ->
Administrative  Tools  (Windows  XP).  Namun  bagi  anda  yang  suka  sekali
                    bermain script pada registry bisa mencoba cara yang kedua.

A. KONEKSI MELALUI ODBC DATA SOURCE ADMINISTRATOR 
Berikut  ini  adalah  contoh  langkah-langkah  mengkoneksikan
database sederhana dari Delphi ke Ms Acces  :
1.      MENYIAPKAN DATABASE MS.ACCESS
Buatlah  sebuah  database  menggunakan  Ms  Acces  (penulis
menganggap  anda  sudah  familiar  dengan  Ms  Acces  sehingga
tidak  perlu  dijelaskan  bagaimana  cara  membuat  database
melalui  Ms  Access).  Misalnya  database  sebuah  toko  buku
sederhana, database disimpan dengan nama Latihan.mdb dan
                                           table dengan nama TkBuku,  seperti contoh berikut :
Gb. Table TkBuku 

MENGATUR KONFIGURASI  ODBC DAN BDE Buka  ODBC  Data  Source  Adminstrator,  (untuk  Windows  XP)
caranya klik tombol Start -> All Programs -> Control Panel -> 
Administrative  Tools  ->  Data  Sources  (ODBC).  Atau  melalui
Start menu -> Run kemudian ketikkan odbcad32 dan klik Ok,
Pada tab User DSN, klik tombol Add, kemudian pilih Microsoft
                                           Acces Driver (*.mdb).  dan klik finish.

                                                              Gb. Setting ODBC

Kemudian  muncul  form  ODBC  Microsoft  Access  Setup.  Disini
kita  akan  mengatur  nama  alias  untuk  database  (Data  Source
Name),  database  file  serta  password.  Isikan  Data  Source
Name  dengan  DbTkBuku.  Untuk  database  filenya  klik  select
pada  group  database,  lalu  cari  file  database  Latihan.mdb.
Apabila  anda  ingin  menambahkan  password  untuk  keamanan
data,  klik  tombol  Advanced,  lalu  isikan  Login  Name  dan
Password  sesuai  keinginan  anda.  Apabila  tidak  menghendaki
adanya  password,  maka  opsi  advanced  bisa  diabaikan.
Kemudian klik Ok. Database Latihan1.mdb dengan nama alias
                                           DbTkBuku sudah terdaftarkan.
Gb. DbTkBuku yang sudah didaftarkan 
3.         MENGAKSES DATABASE DARI DELPHI


 1.Buatlah  sebuah  aplikasi  baru.  Tempatkan  sebuah
 komponen  TTable.  Pada  property  database  name  pilih
DbTkBuku.  Lalu  pilih  TkBuku  pada  property  Tablename.
Isikan login name dan password sesuai pada langkah 2.
Bila  anda  tidak  memasukkan  login  name  dan  password
maka       abaikan        kotak       dialog      password        tersebut..
Kemudian ubah property Aktive menjadi true
Gb. Property Komponen Table 







2. Letakkan komponen Datasource, pada property DataSet
pilih Table1.

3. Tambahkan sebuah komponen DBGrid dan DBNavigator.
Set  masing-masing  property  DataSource  menjadi
DataSource1.
   Gb. Contoh aplikasi sederhana koneksi database *.mdb 

                                             4.Cobalah  menjalankan  aplikasi.  Apabila  tidak  muncul
  Error  maka  pada  langkah  ini  koneksi  sederhana
          Database dari Delphi ke Acces telah berhasil anda buat. 

B. KONEKSI MELALUI REGISTRY (SCRIPT)
             Berikut adalah cara lain mengkoneksikan database *.mdb. 
             Salin script berikut pada aplikasi notepad kemudian simpan dengan
             Nama  mdbodbc.reg.  Kemudian  jalankan  file  tersebut  dengan  cara
                                             Klik kanan mdbodbc.reg lalu klik merge.
Windows Registry Editor Version 5.00


[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\coba]
"Driver"="C:\\WINDOWS\\System32\\odbcjt32.dll"
"DBQ"="c:\\db1.mdb"
"DriverId"=dword:00000019
"FIL"="MS Access;"
"SafeTransactions"=dword:00000000
"UID"=""


[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\coba\Engines]


[HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\coba\Engines\Je
t]
"ImplicitCommitSync"=""
"MaxBufferSize"=dword:00000800
"PageTimeout"=dword:00000005
"Threads"=dword:00000003
                                "UserCommitSync"="Yes" 
[HKEY_USERS\S-1-5-21-854245398-492894223-839522115-
1003\Software\ODBC\ODBC.INI\ODBC Data Sources]
"MS Access Database"="Microsoft Access Driver (*.mdb)"
"Excel Files"="Microsoft Excel Driver (*.xls)"
"dBASE Files"="Microsoft dBase Driver (*.dbf)"
"coba"="Microsoft Access Driver (*.mdb)"




[HKEY_USERS\S-1-5-21-854245398-492894223-839522115-
1003\Software\ODBC\ODBC.INI\coba]
"Driver"="C:\\WINDOWS\\System32\\odbcjt32.dll"
"DBQ"="c:\\db1.mdb"
"DriverId"=dword:00000019
"FIL"="MS Access;"
"SafeTransactions"=dword:00000000
"UID"=""


[HKEY_USERS\S-1-5-21-854245398-492894223-839522115-
1003\Software\ODBC\ODBC.INI\coba\Engines]


[HKEY_USERS\S-1-5-21-854245398-492894223-839522115-
1003\Software\ODBC\ODBC.INI\coba\Engines\Jet]
"ImplicitCommitSync"=""
"MaxBufferSize"=dword:00000800
"PageTimeout"=dword:00000005
"Threads"=dword:00000003
"UserCommitSync"="Yes"


[HKEY_USERS\S-1-5-21-854245398-492894223-839522115-
1003\Software\ODBC\ODBC.INI\ODBC Data Sources]
"MS Access Database"="Microsoft Access Driver (*.mdb)"
"Excel Files"="Microsoft Excel Driver (*.xls)"
"dBASE Files"="Microsoft dBase Driver (*.dbf)"
                                "coba"="Microsoft Access Driver (*.mdb)"
Keterangan : 
                                                  Data Source Name      : coba 
                                                  Data Base File             :C:\db1.mdb -> tertulis c:\\db1.mdb


 
                           Gb. Script pada mdbodbc.reg notepad 
Kemudian anda tinggal membuat aplikasi dari delphi seperti pada cara
                          pertama langkah 3

Tidak ada komentar:

Posting Komentar