Discussion :

[Kalion]

(Re) Bonjour à tous,

J'ai réussi à lier mes tables Sql server 2008 à Access, MAIS mon chef de projet ne veut pas lier les tables... Il veut ouvrir et fermer une connexion par du code et pouvoir ainsi changer le nom du serveur et de la base de données par la suite.

Mais j'ai vraiment du mal avec les différents codes trouvés.
de 1 j'ai pas réussi à avoir une connexion qui marche,
de 2 je ne vois pas comment lier des éléments de mes form aux tables qu'Access ne voit même pas...

Si quelqu'un arrive à comprendre ce que je raconte, j'aimerais bien trouver un tutoriel ou des exemples car je patauge depuis ce matin...

Merci à tous!

[Domi2]

Bonjour,

Ce tutoriel de LedZeppII, Connexion ODBC, peut-il t'être utile ?

Domi2

[Kalion]

A vue d'oeil c'est exactement ce que je cherchais!!
Bref j'essai de coder et je reviens en cas de problème!!
Merci beaucoup!!

[Kalion]

Je suis pas sur que ce soit ce que je cherche...
Soit j'ai pas tout compris (fatigue oblige), soit j'ai l'impression que ce code permet de lier les tables par le code.
Hors je ne veux pas lier les tables mais agir dessus par le code sans qu'Access ne les connaissent...
De plus je veux en retirer des informations pour l'affichage de mes éléments...
Je change un peu de boulot, j'y arrive plus pour aujourd'hui!!
Je reprendrais demain matin!

[LedZeppII]

Bonsoir,

Regardes du côté des recordsets ADO.

Tu as des exemples de chaînes de connexion OLE DB ici : Connection strings for SQL Server 2008.
Ne sont utiles, que les exemples sous "SQL Server Native Client 10.0 OLE DB Provider".

Si tu n'as pas le fournisseur de données "SQL Native Client" tu dois pouvoir utiliser le fournisseur "SQL Server"
-> Connection strings for SQL Server 2000

A+

[Kalion]

J'avance petit à petit...
J'ai mon pilote installé sur mon poste (je ferait une fonction de création automatique de pilote pour les autres postes plus tard...)
J'essai de me connecter simplement à ma BDD mais j'ai un message 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
 
Dim str_chaine As String
Dim cnADO As New ADODB.CONNECTION
Dim NomServeur As String
Dim NomBaseDeDonnées As String
NomServeur = "ECK"
NomBaseDeDonnées = "D:\Mes Documents\Site\App_Data\Database.mdf"
Set cnADO = New ADODB.CONNECTION
 
'Définition de la chaîne de connexion
str_chaine = "DRIVER={SQL Server Native Client 10.0};Server=" & NomServeur & ";Database=" & NomBaseDeDonnées & ";"
 
cnADO.Open str_chaine
 
MsgBox (cnADO.State)

ECK est le nom de mon pilote que j'ai créé (machine...) il est fonctionnel car en l'utilisant par liaison des tables, j'arrive à voir mes tables.
Seulement, j'ai un message d'erreur dans ce petit bout de code qui teste ma connexion :

Erreur d'execution '-2147467259 (80004005)':
[Microsoft][SQL Server Native Client 10.0]Fournisseur de canaux nommés : Impossible d'ouvrir une connexion à SQL Server [53]

Alors que le pilote devrait être fonctionnel...
Je cherche juste à afficher l'état de ma connexion.
Si vous avez une idée...

Merci