Info

Contact Me

Nama: Ilham M
Email: ilham@xs-mediatech.org
Status: Pelajar + Freelance Web Developer
Alamat: Jl. Cp'one No 11 - Sirkuit Sentul - Kab. Bogor
Chatt Me
Orang Bijak Adalah Orang Yang Selalu Belajar Dari Kegagalannya.. Sedangkan Orang Yang Bodoh Adalah Orang Yang Selalu Menutupi Kegagalannya..... Tegas Akan Diri Sendiri, Buang Fikiran Negatif., Lakukan Yang Terbaik.. Kegelisahan Hanya Milik Mereka Yang Putus Asa !! (PRIBADI TANGGUH, PANTANG MENGELUH)

Pesan Ilham Sundanist

Belajarlah tuk mengagumi bukan iri.., tuk memuji bukan merayu,. tuk menghargai bukan meniru.., dan maka hidup ini akan lebih berarti. .

Koneksi Database Acces dengan Visual Basic 6.0



Pertama anda buka Microsoft Visual Basic 6.0 , kemudian Buat sebuah Module di VB. dan tulislah Kode di bawah ini di dalam modul tersebut.


 Seperti Ini Sreenshoot nya





Public Conn As New ADODB.Connection
Public KoneksiData As String
Public RSData As New ADODB.Recordset

Sub Main() ' buatlah Sub Main untuk membuka awal project
    Call BukaDB
    frm_MAIN.Show   'Membuka Form
   
End Sub

Sub BukaDB()
    Set Conn = New ADODB.Connection
    Set RSData = New ADODB.Recordset
        Conn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database\SISGM.mdb"
  
End Sub



Note : Sub Main berfungsi untuk menjalankan Project di Awal...Setting Sub Main tersebut di Project > NamaProject Properties > Pilih Startup Object dengan Sub Main ..

Related Post



2 komentar:

  • nice sob,
    informativ sekali,,
    numpang nyimake ye,,

  • dengan menggunakan modul lebih praktis kita tinggal panggil prosedurenya ya mas

  • Tulis Komentarnya

    About the author

    Ilham outSIDers
    Kita Berantas Kebodohan, Tau Diri, Kenal diri, Dan bisa jaga diri.. Hantam Ketidak Pastian Diri, Pengecut Bukanlah Jati Diri Yang Sejati . Tunjukan pada dunia kita adalah manusia yang harus dipuji !! Karna Kita Pembrontak S.I.D