pb fermeture connexion Access avec ADODCRésolu

Question

Bonjour a tous, j'ai un petit probleme avec des connexions ADODC
En fait, je fais une appli qui g&egrave;re des contacts d'une entreprise, a partir d'une base access contenant les donn&#233;es (mise sur le r&#233;seau) et d'un petit programme en VB qui g&egrave;re les donn&#233;es.
Je me connecte &agrave; la base &agrave; l'aide de connection ADO, ADODC exactement.
Mais le probl&egrave;me, c'est que mon prog est install&#233; sur plusieurs machines, dont une qui n'est jamais arr&ecirc;t&#233;e, et au bout d'un moment, la base de donn&#233;es est satur&#233;e de connexion, car les liens adodc ne se ferme jamais.
Lorsque je voudrais fermer mes connexions, je fais du :
    Adodc1.RecordSource = ""
    Adodc1.Recordset.Close
    Adodc1.ConnectionString = ""
Mais ca ne change rien.
Si vous avez des id&#233;es, sur comment fermer ces connexions, merci de m'aider.
Merci d'avance

cimcim · Accepted Answer

Bon, ben c bon...
Ca marche !!
Merci beaucoup...
Et maintenant, il me ferme bien ma connexion. J'ai plus qu'&agrave; g&#233;n&#233;raliser &ccedil;a sur tout mon projet, car je dois bien avoir mis une vingtaine de ADODC cach&#233; partout...
Merci &agrave; mfritsch alias [mailto:M@X M@X] et &agrave; MAX68
Bye a tous

mfritsch · Answer

Bonjour,


Tu dois surement avec une variable "connection". Et bien tu la fermes (la variable bien sur ;) en faisant connection.close, ou sinon ptete Adodc1.close


Voila


[mailto:M@x M@x]

cimcim · Answer

Merci de ta r&#233;ponse, mais il n'y a pas de variable connection sur ces controles, et adodc1.close plante.

Je ne sais vraiment plus quoi faire, et je n'ai pas envie de changer tous mes controles, car mon prog commence &agrave; devenir gros, il y en a beaucoup, et je n'ai plus tellement de temps...

Merci de continuer &agrave; donner des id&#233;es.

mfritsch · Answer

Tu peux alors faire de l'ado avec oledb, et ainsi ne pas utiliser un controle datasource.

cimcim · Answer

Heu... La, je suis pas contre, mais je ne sais pas comment ca marche. Je suis sur la marche d&#233;butant. 
Donc, si tu peux &#233;clairer un peu ce que je dois d&#233;clarer pour utiliser ca...
Merci d'avance, et surtout merci de te donner la peine de m'aider.

cs_max68 · Answer

Donc vala, je te mets le code en VB 6. Au cas o&#249; tu es sous .net, pas de pb, je te le traduis:

A rajouter dans les r&#233;f&#233;rences ou composants, je sais plus : Microsoft ADO 2.6

Dans un module: 

public co as connection
public rs as recordset

Dans ta feuille:

'Initialisation de la connexion
set co = new connection
co.provider = "Microsoft.jet.OLEDB.4.0" 'pour access 2000, sinon c'est 4.1 pour 2003

co.connectionstring = "c:\mabase.mdb"
co.open

'Initialisation d'un recordset
set rs = new recordset
rs.open "table", co, adOpenDynamic 'tu peux remplacer table par une requete SQL ou existante dans la table

'Pour atteindre une valeur
var = rs.fields("table").value

'Pour rentrer une nouvelle valeur
rs.fields("table").value = var

'Fermer co et rs
rs.close
co.close

Voila, si tu veux + de recordset un recordset par table ou par requete, il faut le d&#233;clar&#233; dans le module, pour qu'il soit accessible dans tout le projet.

Si tu as b'soin encore d'aide, je suis la. Ca me plait d'aider en VB now que je m'y connais un peu, avant c'&#233;tait d'autres qui m'aidaient, c'est un peu la destin&#233;e de chacun &#224; quiconque qui est pass&#233; par vbfrance ... lol

M@x

cimcim · Answer

Ok, ben merci beaucoup.
Je teste &ccedil;a, et je te tiens au courant.

cimcim · Answer

Heu, question comme &ccedil;a, pour savoir...Faudrait pas faire du "set rs nothing" et "set co nothing" avant de faire les .close ?

cimcim · Answer

Voila des news du front : 
Lorsque j'execute, il me dit : utilisation incorrecte du mot cl&#233; New, sur la ligne set co = new connection
et si je met 
set co = New ADODB.Connection
Il plante sur co.provider
Que faire ?
Le pb vient il d'une librairie ? 
La librairie ADO 2.6, c'est bien le ActiveX Data Object 2.6 ?
Ou c'est une r&#233;f&#233;rence qu'il me faut aller chercher dans le fin fond du system32 de mon poste ?

mfritsch · Answer

Normalement, c'est: 
co.Provider = "Microsoft.jet.OLEDB.4.0"

Tu as quoi comme base de donn&#233;es?

M@x

cimcim · Answer

Petit message post&#233; apr&egrave;s la fermeture du topic, au cas ou quelqu'un ai le m&ecirc;me probl&egrave;me.
Je n'ai pas tout modifi&#233; comme on me l'a propos&#233; ci dessus, mais j'ai trouv&#233; ce qui faisait que mes connexions restaient ouvertes...
En fait, j'utilisais des connexions adodc pour ouvrir la base dedonn&#233;es, et des textbox pour g&#233;rer les donn&#233;es.
Mes text box &#233;taient configur&#233;es en mode graphique, dans les propri&#233;t&#233;s, datasource, j'avais mis adodc1. 
Et c'est &ccedil;a le probl&egrave;me.
Maintenant, je fais, dans les form_load : 
Set TexteBox.DataSource = adodc1
et dans les form_unload :
Set TextBox = Nothing
Et toutes mes connexions se ferment sans probl&egrave;mes.
Voila, si &ccedil;a peut aider quelqu'un d'autre...

Pb fermeture connexion Access avec ADODC

11 réponses

Discussions similaires