Discussion :

[spideywebswing]

Bonjour à tous,

cela fait un bout de temps que je développe en DAO sur access, et je me mets doucement à ADO (il est bien temps, tiens) pour accélérer un peu les connexions qui laissent salement à désirer dès qu'on est à 2 connectés.
bref.

j'ai réussi à me connecter à la base "distante" grâce à une chaîne de connexion, et j'arrive à modifier ces données SAUF quand je veux mettre une requête (ou une bête table d'ailleurs) en source d'un formulaire.
les champs de mon formulaire sont liés comme si les tables de la base distante étaient liées (comprenez que le champ controlsource est renseigné), et les données s'affichent bien dans ces champs à l'ouverture du formulaire.
mais dès que je veux modifier une valeur dans un de ces champs, eh ben ça veut pas.

mon code de connexion, à l'ouverture du formulaire :

Code :

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

1
2
3
4
5
6
7
8
Set ADOBDD = New ADODB.Connection
 
ADOBDD.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=\\128.39.5.1\GROUPE\OUTILS\Gestion des Affaires\Gestion des Risques Affaires - BDD.accdb;Persist Security Info=false;"
 
Set ADORS = New ADODB.Recordset
ADORS.Open "SELECT * FROM APP_Affaires", ADOBDD, adOpenKeyset, adLockOptimistic
 
Set Me.Recordset = ADORS

et là, j'ai bien les données à l'écran, dans les bons champs, mais impossible de mettre à jour, ça fait "impossible d'attribuer une valeur à cet objet" !


quelqu'un aurait-il une idée ?

merci de me lire en tous cas,

djo

[jimbolion]

spideywebswing bonjour,

Si APP_Affaires est une table, tu ne devrais pas avoir de problème spécifiques. Je pense que le problème vient de tes verrous et mode d'ouverture.

Une petite lecture ici :

http://drq.developpez.com/vb/tutoriels/ADO/

et ta réponse ici :

http://vb.developpez.com/bidou/recor...?page=curseurs

JimBoLion

[LedZeppII]

Bonsoir,

Essaie de remplacer ...

Code :

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

1
2
Set ADORS = New ADODB.Recordset
ADORS.Open "SELECT * FROM APP_Affaires", ADOBDD, adOpenKeyset, adLockOptimistic

...par...

Code :

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

1
2
3
Set ADORS = New ADODB.Recordset
ADORS .CursorLocation = adUseClient
ADORS.Open "SELECT * FROM APP_Affaires", ADOBDD, adOpenStatic, adLockOptimistic

Je ne sais pas pourquoi, mais ça à l'air de ne fonctionner qu'avec un curseur côté client.

A+

[spideywebswing]

merci pour vos réponses et vos liens.

je les ai d'ailleurs déjà parcourus, mais probablement pas assez en détail.
je dois avouer que la complexité du tout m'a un peu refroidi, surtout pour seulement faire une bête connexion.
mais je vais me pencher un peu plus sur la question.
je vais également tenter demain le bout de code proposé, et si ça fonctionne essayer de comprendre pourquoi grâce aux liens

merci en tous cas

[spideywebswing]

aaAAaaAaaAaaah ça maaaaarche !

non il ne me reste plus qu'à comprendre pourquoi, mais en tout cas ça fonctionne !

j'ai essayé direct avec une requête avec jointures là c'était plus chaud mais faut que je me penche sur le problème.

bon en tous cas merci pour le tuyau j'ai plus qu'à réfléchir un peu

[jimbolion]

spideywebswing,

Bon courage alors.

Tiens nous au parfum

JimBoLion

[nico84]

Bonjour,

Serait-il possible de savoir si ça marche mieux, c'est à dire plus vite qu'avec des tables liées ?

Merci d'avance

[spideywebswing]

pour le moment c'est encore un peu tôt pour des réponses aussi précises
le problème c'est que je travaille sur plusieurs choses à la fois donc j'avance assez lentement sur chacune.
du seul essai que j'ai pu faire sur un accès distant,c'était assez peu concluant.
par contre, là où ça devrait me sauver la vie, c'est en accès à plusieurs en même temps !

[spideywebswing]

Bonjour,

Serait-il possible de savoir si ça marche mieux, c'est à dire plus vite qu'avec des tables liées ?

Merci d'avance

rebonjour !

bon alors donc oui, ça marche quand même mieux qu'avec des tables attachées, mais surtout si on est plusieurs à attaquer la base.
si t'es tout seul je pense pas que ça serve à quoi que ce soit.