GetTableColumns – Retrieving the column names of a table in a database

GetTableColumns – Retrieving the column names of a table in a database

' Returns the names of all the columns in the specified database table. The ' database is identified by the input connection string' Requires Imports System.Data.OleDb'' Example:'   Dim columns() As String = GetTableColumns' ("PROVIDER=Microsoft.Jet.OLEDB.4.0; Data Source=d:	estdb.mdb", "TestTable")'   Dim column As String'   For Each column In columns'       Debug.WriteLine(column)'   NextFunction GetTableColumns(ByVal connString As String, ByVal table As String) As _    String()    Dim cn As New OleDbConnection(connString)    cn.Open()    ' get a DataTable with all the info    Dim dt As DataTable = cn.GetOleDbSchemaTable(OleDbSchemaGuid.Columns, _        New Object() {Nothing, Nothing, table, Nothing})    cn.Close()    ' save the column names into a string array    Dim columns(dt.Rows.Count - 1) As String    Dim i As Integer    For i = 0 To dt.Rows.Count - 1        columns(i) = dt.Rows(i)(3)    Next    Return columnsEnd Function

See also  5 Ways to Improve Customer Experience

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist