connexion sql server et vb.net

Bonjour,
Je voudrais faire une connexion à une base de donnée sqlserver via visual studio. J'ai fait une connexion avec acces et ca marche bien le code est le suivant:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Connection = New OleDbConnection() Connection.ConnectionString = strConn Connection.Open() 'Ouvrir la connexion strSql = "SELECT * FROM compte" 'Instanciation d'un Objet Connexion Command = New OleDbCommand(strSql) 'Instancer un objet Commande DataAdapter = New OleDbDataAdapter(Command) 'Instancer un objet Adapter Command.Connection() = Connection 'initialiser l'objet Command DataAdapter.Fill(DataSet, "dbo.compte") DataTable2 = DataSet.Tables("dbo.compte") If RowNumber < 0 Then Exit Sub If RowNumber > DataTable2.Rows.Count - 1 Then Exit Sub

---

Mais quand j'ai voulu transformer ce code pour faire la connexion a une base donnée sql server, j'ai rencontré des erreurs.
Est ce que vous avez une idée ?
Merci

voila le code que j'ai fait mais j'ai un probléme au niveau de l'adapter

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim Connection As New SqlConnection Connection.ConnectionString = "Persist Security Info=False;Integrated Security=SSPI;database=ConsortiumDataBaseSQL;server=rcham-pc" Connection.Open() Dim Command As New SqlCommand("SELECT * FROM dbo.compte", Connection) Dim DataAdapter As SqlDataAdapter(Command,Connection) Command.Connection() = Connection   DataAdapter.Fill(DataSet, "dbo.compte") DataTable2 = DataSet.Tables("dbo.compte") If RowNumber < 0 Then Exit Sub If RowNumber > DataTable2.Rows.Count - 1 Then Exit Sub

---