Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub Fill_Supplier_DGV() Try Me.Supplier_DataGridView.EndEdit() Me.Supplier_DataGridView.DataSource = Nothing Dim sSQL As String sSQL = "SELECT * FROM Suppliers" Dim connection As New OleDbConnection(ConnectionString) Dim dataadapter As New OleDbDataAdapter(sSQL, connection) Dim ds As New DataSet() connection.Open() dataadapter.Fill(ds, "Suppliers_table") connection.Close() Me.Supplier_DataGridView.DataSource = ds Me.Supplier_DataGridView.DataMember = "Suppliers_table" Me.Supplier_DataGridView.Refresh() Catch ex As Exception MsgBox(ex.Message) End Try End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.