Dim sqlConnection1 As New SqlConnection("server=XXX;DataBase=XX;Integrated Security=SSPI;User Instance=True") Dim cmd As New SqlCommand Dim reader As SqlDataReader cmd.CommandText = "SELECT * FROM AlarmesPanelsRef" cmd.CommandType = CommandType.Text cmd.Connection = sqlConnection1 sqlConnection1.Open() reader = cmd.ExecuteReader() ' Data is accessible through the DataReader object here. sqlConnection1.Close()