Подключение к базу данных SQL Server на VB.Net

[uchenik]

Вопрос заключается в следующем: Надо сохранит некоторую Информацию из приложения на базу SQL Server.
База: Proba
ODBC: Test


Я попробовал в Access следующим образом:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sSql As String
        sSql = "INSERT INTO Table1 " & _
                "(Pole1, Pole2) " & _
                "VALUES (" & TextBox1.Text & ",'" & _
                RichTextBox1.Rtf & "')"
        Try
            ExecSQL(sSql)
            Me.DialogResult = Windows.Forms.DialogResult.OK
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

    Public Sub ExecSQL(ByVal sSQL As String)
        Dim sConnect As String
        sConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Admin\Мои документы\db1.mdb;Persist Security Info=False"
        Dim Myconnection As New OleDb.OleDbConnection(sConnect)
        Myconnection.Open()
        Dim mycommand As New OleDb.OleDbCommand(sSQL, Myconnection)
        mycommand.ExecuteNonQuery()
        Myconnection.Close()
    End Sub

и у меня получился! Но я хочу это сделать на SQL Server например через ODBC.


Скажите пожалуйста как можно подключатся?