Bonjour à tous
SVP j'ai un problème de connexion lors ce que je veux importer une feuille excel à ma base SQL Server voilà ma chaine de connexion et voilà le msg d'erreur

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim Conn As ADODB.Connection
   ' Dim strSQL As String
    Dim lngRecsAff As Long
 
    Set Conn = New ADODB.Connection
    Conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & _
        "Data Source=" & Me.Text1.Text & ";" & _
        "Extended Properties=Excel 8.0"
 
    'Import by using Jet Provider.
 
        strSQL = "SELECT * INTO [ODBC;Driver={SQL Server} ;" & _
        "Server=" & ServName & " ;Database=" & Dossier & ";" & _
        "UID=" & con & ";PWD=" & MtPasse & "].XLImport9 " & _
        "FROM [" & Me.DataCombo1.BoundText & "$]"
 
        Debug.Print strSQL
    Conn.Execute strSQL, lngRecsAff, adExecuteNoRecords
    Debug.Print "Records affected: " & lngRecsAff
 
    Conn.Close
    Set Conn = Nothing

et voilà le msg d'erreur

ODBC--Echec de la connexion à <<Driver=SQL Server PC-Devel>>
merciii d'avance