Thanks for your help!

I finally got it to work. This is my code.

Dim dsData As New DataSet

adapt.TableMappings.Add("Table", "dsData")
adapt.Fill(dsData)

TextBox1.Text = dsData.Tables("dsData").Rows.Item(0).Item(1).ToString

My God! It drove me crazy!


Thanks again for your great help.