Bonjour à tous,
J'ai une nouvelle question VBA qui concerne aussi SQL.
Je voudrais que quand je clic sur un bouton, j'envoi des données dans une base de données SQL.
J'ai trouvé se bout de code sur le site de microsoft qui me permets de me connecter a la base de donnée sauf que ma connexion ne se fait pas par authentification Windows.
Je ne trouve pas les lignes a utiliser pour renseigner directement les paramétrages de connections avec une authentification sql.
Je n'ai pas de soucis pour mettre les info de connexion en dur car ils sont utilisé que pour se fichier qui sera verrouillé et utilisé par une seule personne.
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
23
24
25
26
27
28
29
30
31 'Initialisation des variables Dim cn As New ADODB.Connection 'Specification du fournisseur OLE DB On Error GoTo DisplayErrorInfo cn.Provider = "sqloledb" 'Propriétés de la connexion SQLOLEDB cn.Properties("Data Source").Value = "APEDBSDDC806" cn.Properties("Initial Catalog").Value = "SUIV_BIL_CC" 'Authentification windows cn.Properties("Integrated Security").Value = "SSPI" 'Ouverture de la base de données. cn.Open 'ICI LES DIFFERENTES REQUETES SQL 'Fermeture de la connexion cn.Close 'Etiquettes de gestion des erreurs GoTo DisplayEnd DisplayErrorInfo: MsgBox ("Impossible de se connecter à la base de données") GoTo DisplayEnd DisplayEnd:
Merci par avance pour vos lumières
Partager