Siti Al Mutmainah

Assalamualakum,,
        Ketemu lagi. Nah kali ini pengalaman muth sekaligus projek yang sedang dalam masa penyelesaian. TA bikin apa yah?? sempet bingung. Namun setalah tanya ama yang di atas eh tiba- tiba kepikiran buath bikin progam yang sedang muth kerjain di tempat kerjaku seakarang. Dijamin semua serba manual sehingga kadang muth mengalami kepusingan bahkan hampir collapse ngerjain laporan yang harus segera dikirim.
        Ini mut lagi punya ide buat komputerisasiin, sambil nyelem minum aer. Bikin program gag hanya bermanfaat buath kerjaan juga bisa dijadiin bahan buath TA. Programnya seputar inventory sepatu.Banyak kesulitan yang muth alami antara lain :
1. Database sepatu, untuk penyimpanan size sepatu
2. Bingung memilih database apa yang cocok untuk bikin program, maklum saja muth masih pemula. Materi di kuliah pun hanya dasar-dasarnya.
3. Pemilihan bahasa yang cocok buat tampilan formnya, kalu inggris tpi gag bisa inggris, bahasa indonesia terlalu biasa, apa pake bahasa jawa aj kali yah.
Lanjut yah muth disini pake Database Acces dengan koneksi ODBC.
berikut ini tahap awal koneksi.

• Bikin dulu database, di acces. Mut disini pake MS.ACCESS 2007 , diingat yah format penyimpanannya (2000-2003)format. Buat contoh muth namain database yang dah muth bikin dengan nama Databasemae.mdb.
• Buka Control Panel, setelah itu pilih System and Security setelah terbuka pilih Aministrative Tools. Pilih Data Sources (ODBC) di User DSn ada pilihan Add, Remove, Configure. Pilih aj Add aj yah soalnya kita akan nambahin database kita dalam sistem komputer kita. Setelah klik ADD pilih Ms.ACCES Driver (.*mdb). 
• Setelah MS. ACCes Driver nya. klik finish maka akan muncul jendela seperti gambar diatas yah. Isi Data sourcename= Databasemae. Description gag diisi juga gag apa- apa. Setelah itu Klik database select. SELECT ini seperti Browse ke komputer kita cari lokasi dimana tadi kita naroh database kita. udah Klik OK. System Databasenya None aj.
• Kembali lagi ke Jendela awal yaitu User Dsn liat daftar list disitu apakah sudah ada databasemae atau database yang temen-temen bikin. Klik Ok untuk mengakhiri.
• Lanjut yuuk, kita buka VB tambahin module, untuk listing kode koneksi nya sebagai berikut :

• Option Explicit 

•  module ini dipakai untuk pencarian smua record yg ada

• Global conn As New ADODB.Connection, rs As New ADODB.Recordset

• Public Sub dbkonek()
•  'membuat koneksi ke database
•   Set conn = New ADODB.Connection
•   conn.ConnectionString = strcon
•   conn.Open
• End Sub
• Public Function strconn()
• strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\databasemae.mdb;Persist Security Info=False "
• End Function
• Public Sub opencon()
• 'membuka koneksi
• Set conc = New ADODB.Connection
• strcon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\databasemae.mdb;Persist Security Info=False "
• conc.Open strcon
• End Sub
• Public Sub closecon()
• 'menutup koneksi
• conc.Close
• End Sub
• 
  

Setelah kita bikin modulenya lanjut kita bikin formnya yah. Desain- desain formnya tulis listing program di form load :

              call openconn

kenapa muth tambahin close con, karna nanti ketika kita bikin MDI form yang bisa buka macem - macem form itu biar gag eroor soalnya kalu kita ngakses dengan cara pake listing database harus dibuka ditutup kembali,hehe kayak rumah aj yah,  Tunggu yah kalu program muth dah jadi insyallah ditulisin lagi deh..wassalamualaikum.