Bonjour, j'ai tenté en vain de connecter mon programme a une base de donnée

Voici mes informations de connexion (evidemment elles ont été instancié)

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
    Set cnx = New ADODB.Connection
 
    On Error GoTo GestErreur
 
    cnx.ConnectionString = "Provider=SQLOLEDB;Data Source=NOMSERVER;Initial Catalog = NOMDATABASE; User id=USER; password = MDP;Workstation id=GetComputerName;"
    cnx.ConnectionTimeout = 10
    cnx.Open
GestErreur:
    If Err <> 0 Then
        lblConnexion.Caption = "Connexion impossible"
    Else
        lblConnexion.Caption = "Connexion réussit!"
    End If
Cela marche en utilisant les memes informations avec le Data Environnement (Que je ne souhaite pas utiliser)....

Une idée?