Connexion à une base sql server à partir de ms access

Salut à tous.
Je débute avec sql server et souhaiterais savoir comment faire une connexion une base de données crée sur ce serveur à partir d'access ou de visual basic. Je rappelle que je debute également en vb.

La connection doit etre similaire entre access (vba) et vb : utilise ado :
pre-requis ADO (en reference de ton projet vb)

Dim conSQL as ADODB.connection
Dim strConnexionnectionString  as String

strConnexionnectionString = "Provider=SQLOLEDB.1;" & _
                            "Data Source= <ton serveur>1433;" & _
                            "Network Library=dbmssocn;" & _
                            "User ID=<ton user>;" & _
                            "Password=<ton password>;" & _
                            "Initial Catalog= <ta base de données>"
    
    Set conSQL = New ADODB.Connection
    With conSQL
        .CommandTimeout = 15
        .ConnectionTimeout = 15
        .Open strConnexionnectionString
    End With