Discussion :

[Pompompom]

Bonjour,

J'ai développé une application dans laquelle j'ai eu recours à plusieurs controles Adodc.

Jusqu'à présent j'avais renseigné les infos sur les tables correspondantes dans les propriétés de ces controles Adodc.

Seulement j'aimerais désormais que mon appli fonctionne quelque soit le répertoire où se trouve mon .exe

Je me lance donc dans la suppression des infos dans les propriétés des controles Adodc pour les remplacer par des lignes de code afin que tout se fasse dynamiquement...

Cependant je rencontre des problèmes lorsque je veux utiliser le recordset associé, celui ci semblant ne pas exister...

Voici mon code, que dois je rajouter pour pouvoir continuer à utiliser des fonctions comme Adodc1.Refresh, Adodc1.Recordset.MoveFirst, etc...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
With Adodc1
    .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & MaDb & ";Persist Security Info=False"
    .recordSource = "SELECT * FROM Auteurs ;"
End With
 
Set Nom.DataSource = Adodc1
Nom.DataField = Adodc1.Recordset.Fields(0).Name
 
(...)

Merci d'avance de l'aide que vous pourrez m'apporter !!!

[Pompompom]

Bonjour,

J'ai essayé en enlevant un des controles Adodc et en le remplacant complètement par du code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Set Adodc1 = New ADODB.Connection
Adodc1.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = " & MyDb & ";Persist Security Info=False"
Set RsAdodc1 = New ADODB.Recordset
With RsAdodc1
    .CursorLocation = adUseClient
    .ActiveConnection = Adodc1
    .Open "SELECT * FROM Auteurs ;", , adOpenStatic, adLockOptimistic, adCmdText
End With

Non seulement j'ai dû modifier beaucoup de code par la suite en raison de l'appellation différente du Recordset mais en plus cela ne fonctionne pas parfaitement.
En effet, lorsque je change de form et que je reviens à ma form principal, la connexion Adodc1 ne réagit plus, je ne peux plus me ballader dans les enregistrements...

J'aimerais donc vraiment si possible rester avec mes controles Adodc physiquement présents sur ma form tout en les configurant dynamiquement au lancement de mon appli...

Est ce possible ? S'il vous plait aidez moi

Merci.

[ThierryAIM]

un peu de lecture : http://vb.developpez.com/cours/#fichiers_bd

[Gaetch]

Il manque pas le nom de la connection ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

RsAdodc1.Open "SELECT * FROM Auteurs", nom de la connexion, adOpenStatic, adLockOptimistic, adCmdText

[Pompompom]

J'ai déjà lu tout ca et je n'ai trouvé nul part comment bien configurer dynamiquement un controle Adodc positionné sur ma feuille afin d'utiliser son Recordset, ce que je souhaiterais faire plutôt que d'utiliser la méthode New ADODB.Connection, New ADODB.Recordset...

Dans un des tutos on ne parle que de la configuration du contrôle via ses propriétés, donc le chemin de la bdd est figé.

Dans un autre on explique ses défauts.

Et c'est tout je crois bien.

Meme si c'est pas ce qu'il y a de mieux, j'aimerais vraiment utiliser les controles Adodc...

Et pour le nom de la connection il est indique juste au dessus nan Gaetch ?

[Gaetch]

Ben tu mets :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.Open "SELECT * FROM Auteurs ;", , adOpenStatic, adLockOptimistic, adCmdText

Mais entre des deux virgules faut mettre le nom de ta connexion c'est à dire Adodc1 ou alors mettre le .activeconnection après, non ?