Dim conn As New MySqlConnection(ConnString) ‘ConnString is defined elsewhere conn.Open() Dim cmd As MySqlCommand = conn.CreateCommand cmd.CommandText = "SELECT * FROM widgets WHERE widgetID=1" ‘Create a datareader and execute it Dim dr As MySqlDataReader dr = cmd.ExecuteReader() ‘Create a datatable to put the schema into Dim dtSchema As New DataTable dtSchema = dr.GetSchemaTable
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)