Torna al Thread
Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect
Dim thisConnection As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\nomeDABASE.mdf;Integrated Security=True;User Instance=True")
'Sql Query
Dim sql As String = "SELECT * From " & e.Node.Text
Try
' Open Connection
thisConnection.Open()
' Create Data Adapter
Dim da As New SqlDataAdapter(sql, thisConnection)
' Create and fill Dataset
Dim ds As New DataSet
da.Fill(ds, e.Node.Text)
' Get Data Table
Dim dt As DataTable = ds.Tables(e.Node.Text)
Me.DataGridView1.DataSource = dt
'Questo codice serve per nascondere eventuali colonne
Dim col As DataGridViewColumn
For Each col In Me.DataGridView1.Columns
If col.Name.StartsWith("id_") = True Then
col.Visible = False
End If
Next
'Qui formattiamo la nostra DGV
Me.DataGridView1.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
Me.DataGridView1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
Me.DataGridView1.MultiSelect = False
Catch ex As SqlException
' Display error
Console.WriteLine("Error: " & ex.ToString())
Finally
' Close Connection
thisConnection.Close()
Console.WriteLine("Connection Closed")
End Try
End Sub