'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence

by Sankar Sastry (1 Submission)
Category: Databases/Data Access/DAO/ADO
Compatability: VB.NET
Difficulty: Unknown Difficulty
Originally Published: Tue 3^rd January 2006
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence Microsoft DAO 3.51 Object Library

API Declarations
Dim myTab As TableDef

Rate 'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence



    Set myDb = DBEngine.Workspaces(0).OpenDatabase("C:\Program Files\Microsoft Visual Studio\VB98\Nwind.mdb")
    List1.Clear
    For Each myTab In myDb.TableDefs
        If Mid(myTab.Name, 1, 4) <> "MSys" Then List1.AddItem myTab.Name
    Next
End Sub

Download this snippet Add to My Saved Code

'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence Comments

No comments have been posted about 'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence. Why not be the first to post a comment about 'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence.

'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence

'To see all tables available in a mdb file. 'Add a Listbox-List1 'Add a CommandButton 'Add Refrence Comments

Post your comment

Difficulty