makasih kang aksan, tapi kalo obyek yang lain kira - kira bisa ndak ya ?
misalnya query, form, modul dan makro ....

makasih, maaf ngrepotin ....

2008/5/29 aksan kurdin <[EMAIL PROTECTED]>:

>   Sub ListTableOnDB(dbName As String)
> Dim db As DAO.Database
> Set db = DBEngine(0).OpenDatabase(dbName)
>
> Dim td As DAO.TableDef
> For Each td In db.TableDefs
> Debug.Print td.Name
> Next td
>
> Set td = Nothing
> db.Close
> Set db = Nothing
> End Sub
>
> example:
> ListTableOnDB "C:\Documents and Settings\Aksan\Desktop\New
> Files\db\db2.mdb"
>
> result:
> MSysAccessObjects
> MSysACEs
> MSysObjects
> MSysQueries
> MSysRelationships
>
> aksan kurdin
>
> ps. sebenarnya tetap 'membuka' tapi dari sisi programming.
>
> 2008/5/29 Muntahar <[EMAIL PROTECTED] <eyoung24%40gmail.com>>:
>
> > hallo teman-temanku yang baik,
> > aku ada butuh bantuan nih,
> > saya lagi cari skrip yang
> > bisa menampilkan daftar table yang ada di file lain , tanpa membukanya,
> > ada yang punya code nya atu linknya ?
> > makasih sebelumnya ....
> >
> > --
> > ---------------------------------------------
> > grapyak-semanak-cluthak
> > http://djmumun.wordpress.com
> > ---------------------------------------------
> >
> >
>
> --
> Aksan Kurdin
>  
>



-- 
---------------------------------------------
grapyak-semanak-cluthak
http://djmumun.wordpress.com
---------------------------------------------

Kirim email ke