=== BEGIN ARIEFWT'S POSTING === Kalau mas mau cara untuk akses Query dgn ADODC, pake code ini...
=== COPY FROM HERE === dbPath = App.Path & "\db.mdb" dbPassword = "password" Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbPath & ";Persist Security Info=True;Jet OLEDB:Database Password=" & dbPassword Adodc1.CommandType = adCmdStoredProc Adodc1.RecordSource = "[Query1]" Adodc1.Refresh === COPY UNTIL HERE === === END ARIEFWT'S POSTING === PS: Semoga informasi ini dapat bermanfaat secara positif bagi kita semua... Kalau ada pertanyaan, silahkan hubungi saya di [EMAIL PROTECTED] :-) Akhir kata, mohon maaf bila ada kata-kata yang menyinggung hati. Salam, (Arief Wibowo, C.Hts, RM) Computer Programmer and Alternative Therapist --- In [email protected], setiyawan emond <[EMAIL PROTECTED]> wrote: > > haloo semua, > salam kenal, > aku mau tanya dikit nich, tentang filter yang di hubungkan sama combo box. > data di ambil dari adodc > > Private Sub form_activate( ) > if combo1.list = sidorejolor then > rslurahsidor. Filter = "KELURAHAN=" + "SIDOREJO LOR""" > set grddatagrid. datasource = rslurahsidor > end if > End Sub > > tapi hasilnya malah ga bisa, error pada combo1.list > pada coding filter juga salah. > tolong donk. penting nich > mohon pencerahannya > thanks.. > > > > ________________________________________________________ > Lelah menerima spam? Surat Yahoo! mempunyai perlindungan terbaik terhadap spam. > http://id.mail.yahoo.com/ >
