Dim cnString3 As String = My.Settings.DataCon
Dim strQuery3 As String = "SELECT * From t_user"
Using adapter As New MySqlDataAdapter(strQuery3, cnString3)
Dim myDataSet As New DataTable()
Try
adapter.Fill(myDataSet)
Catch exError As Exception
MessageBox.Show(exError.Message, _
Me.Text, _
MessageBoxButtons.OK, _
MessageBoxIcon.Error)
Exit Sub
End Try
'FILL DATAGRIBVIEW FROM DATABASE
Me.DataGridView1.DataSource = myDataSet
End Using
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.
”The time we save is the biggest benefit of E-E to our team. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange.
Our community of experts have been thoroughly vetted for their expertise and industry experience.