Visual Basic

Dim connectionstring As String = "Driver={Microsoft Paradox Driver(*.db )};DriverID=538;Fil=Paradox 5.X;DefaultDir=C:\Data Feeds\;Dbq=C:\Data Feeds\;CollatingSequence=ASCII"<br />
<br />
        Dim querystring As String = "SELECT * FROM PriceBooks.DB"<br />
        Dim tableName As String = "PriceBooks.DB"<br />
<br />
        Dim dataSet As DataSet = New DataSet<br />
<br />
        Using connection As New Odbc.OdbcConnection(connectionstring)<br />
            Dim adapter As New OdbcDataAdapter()<br />
            adapter.SelectCommand = New OdbcCommand(querystring, connection)<br />
            Dim builder As OdbcCommandBuilder = New OdbcCommandBuilder(adapter)<br />
<br />
<br />
            connection.Open()<br />
            adapter.Fill(dataSet, tableName)<br />
<br />
            adapter.Update(dataSet, tableName)<br />
            Me.DataGridView1.DataSource = dataSet<br />
            Me.DataGridView1.DataMember = "PriceBooks.DB"<br />
        End Using