OVH Cloud OVH Cloud

DLL

10 réponses
Avatar
Didier
Bonjour

J'avais une application Access qui fonctionnait tr=E9s bien,
je lui ai approt=E9 quelques modifs mais sans toucher au=20
formulaire "menu g=E9n=E9ral"=20
Sur mon poste tout marche bien
par contre quand je change de poste il bloque sur la=20
fonction
Set con =3D Application.CurrentProject.Connection
et met Erreur de compilation
Erreur de chargement de DLL

Quelqu'un aurait-il une id=E9e?

J'ai copi=E9 le formulaire "menu g=E9n=E9ral" de l'ancienne=20
base sur la nouvelle m=EAme probl=E8me et si je copie le=20
formulaire "menu g=E9n=E9ral" de la nouvelle base sur=20
l'ancienne j'ai le probl=E8me aussi sur l'ancienne

10 réponses

Avatar
Raymond [mvp]
bonjour.

il te manque les références à la librairie ADO.
sur ton poste tu fais:
alt +F11
menu outils / références
repère et note toutes les lignes cochées microsoft Activex Data Object
....... (ADO)
il te faut les même sur l'autre poste.
sur l'autre poste alt+F11et coche les mêmes lignes.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Didier" a écrit dans le message de
news:1b8aa01c45062$00a336d0$
Bonjour

J'avais une application Access qui fonctionnait trés bien,
je lui ai approté quelques modifs mais sans toucher au
formulaire "menu général"
Sur mon poste tout marche bien
par contre quand je change de poste il bloque sur la
fonction
Set con = Application.CurrentProject.Connection
et met Erreur de compilation
Erreur de chargement de DLL

Quelqu'un aurait-il une idée?

J'ai copié le formulaire "menu général" de l'ancienne
base sur la nouvelle même problème et si je copie le
formulaire "menu général" de la nouvelle base sur
l'ancienne j'ai le problème aussi sur l'ancienne
Avatar
Anor
Bonjour,
Tape Alt+F11 et vérifie les références cochées (menu outils > références)
coche les mêmes que sur ton poste (apparemment il te faut ADO ?)

a+
Arnaud

Didier wrote:
| Bonjour
|
| J'avais une application Access qui fonctionnait trés bien,
| je lui ai approté quelques modifs mais sans toucher au
| formulaire "menu général"
| Sur mon poste tout marche bien
| par contre quand je change de poste il bloque sur la
| fonction
| Set con = Application.CurrentProject.Connection
| et met Erreur de compilation
| Erreur de chargement de DLL
|
| Quelqu'un aurait-il une idée?
|
| J'ai copié le formulaire "menu général" de l'ancienne
| base sur la nouvelle même problème et si je copie le
| formulaire "menu général" de la nouvelle base sur
| l'ancienne j'ai le problème aussi sur l'ancienne
Avatar
Didier
Re

C'est ce que j'ai vérifié en premier que j'ai les mêmes
reférences cochées sur les 2 postes

Par contre j'ai aucune ligne cochées microsoft Activex
Data Object sur les 2 postes

De plus j'ai essayé de faire un package avec le runtime
et sur les autres poste impossible à lancer

-----Message d'origine-----
bonjour.

il te manque les références à la librairie ADO.
sur ton poste tu fais:
alt +F11
menu outils / références
repère et note toutes les lignes cochées microsoft
Activex Data Object

........ (ADO)
il te faut les même sur l'autre poste.
sur l'autre poste alt+F11et coche les mêmes lignes.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Didier" a écrit
dans le message de

news:1b8aa01c45062$00a336d0$
Bonjour

J'avais une application Access qui fonctionnait trés
bien,

je lui ai approté quelques modifs mais sans toucher au
formulaire "menu général"
Sur mon poste tout marche bien
par contre quand je change de poste il bloque sur la
fonction
Set con = Application.CurrentProject.Connection
et met Erreur de compilation
Erreur de chargement de DLL

Quelqu'un aurait-il une idée?

J'ai copié le formulaire "menu général" de l'ancienne
base sur la nouvelle même problème et si je copie le
formulaire "menu général" de la nouvelle base sur
l'ancienne j'ai le problème aussi sur l'ancienne


.



Avatar
didier
re

J'ai déjà vérifié, j'ai les mêmes
par contre aucun DLL ADO sur les 2 postes, DAO oui mais
pas ADO
-----Message d'origine-----
Bonjour,
Tape Alt+F11 et vérifie les références cochées (menu
outils > références)

coche les mêmes que sur ton poste (apparemment il te
faut ADO ?)


a+
Arnaud

Didier wrote:
| Bonjour
|
| J'avais une application Access qui fonctionnait trés
bien,

| je lui ai approté quelques modifs mais sans toucher au
| formulaire "menu général"
| Sur mon poste tout marche bien
| par contre quand je change de poste il bloque sur la
| fonction
| Set con = Application.CurrentProject.Connection
| et met Erreur de compilation
| Erreur de chargement de DLL
|
| Quelqu'un aurait-il une idée?
|
| J'ai copié le formulaire "menu général" de l'ancienne
| base sur la nouvelle même problème et si je copie le
| formulaire "menu général" de la nouvelle base sur
| l'ancienne j'ai le problème aussi sur l'ancienne


.



Avatar
Raymond [mvp]
Si tu n'utilises que DAO, je ne vois pas la raison d'utiliser l'instruction:
Set con = Application.CurrentProject.Connection
ne travaillerais-tu pas avec des tables attachées odbcdirect ?
tu devrais avoir d'autres lignes de ce genre qui provoquent des erreurs de
compilation ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum



"Didier" a écrit dans le message de
news:1ba7b01c4509c$092c8790$
Re

C'est ce que j'ai vérifié en premier que j'ai les mêmes
reférences cochées sur les 2 postes

Par contre j'ai aucune ligne cochées microsoft Activex
Data Object sur les 2 postes

De plus j'ai essayé de faire un package avec le runtime
et sur les autres poste impossible à lancer
Avatar
didier
Bonjour

Non je n'ai pas de table attaché
Mais le pire c'est que la même procédure fonctionne trés
bien avec l'ancienne version
-----Message d'origine-----
Si tu n'utilises que DAO, je ne vois pas la raison
d'utiliser l'instruction:

Set con = Application.CurrentProject.Connection
ne travaillerais-tu pas avec des tables attachées
odbcdirect ?

tu devrais avoir d'autres lignes de ce genre qui
provoquent des erreurs de

compilation ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum



"Didier" a écrit
dans le message de

news:1ba7b01c4509c$092c8790$
Re

C'est ce que j'ai vérifié en premier que j'ai les mêmes
reférences cochées sur les 2 postes

Par contre j'ai aucune ligne cochées microsoft Activex
Data Object sur les 2 postes

De plus j'ai essayé de faire un package avec le runtime
et sur les autres poste impossible à lancer



.



Avatar
Anor
Bonjour,

eh bien alors dis nous ce que tu fais après
Set con = Application.CurrentProject.Connection

mets le en remarque (avec un ' devant)
puis
fais le menu déboguer > compiler afin d'identifier les autres instructions
qui ne manqueront pas de nous aiguiller sur le bon chemin.

à+

Arnaud
--------------------------------------------------
Conseils d'utilisation : http://users.skynet.be/mpfa/
Site Perso : http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------


didier wrote:
| re
|
| J'ai déjà vérifié, j'ai les mêmes
| par contre aucun DLL ADO sur les 2 postes, DAO oui mais
| pas ADO
|| -----Message d'origine-----
|| Bonjour,
|| Tape Alt+F11 et vérifie les références cochées (menu outils >
|| références) coche les mêmes que sur ton poste (apparemment il te
|| faut ADO ?)
||
|| a+
|| Arnaud
||
Avatar
didier
J'ai construit cela avec l'assitant de menu général
proposé par access
Voila la fonction complète
Me![Option1].SetFocus
For intOption = 2 To conNumButtons
Me("Option" & intOption).Visible = False
Me("OptionLabel" & intOption).Visible = False
Next intOption

Set con = Application.CurrentProject.Connection
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND
[SwitchboardID]=" & Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset

If (rs.EOF) Then
Me![OptionLabel1].Caption = "Il n'y a aucun
élément pour cette page de Menu Général"
Else
While (Not (rs.EOF))
Me("Option" & rs![ItemNumber]).Visible = True
Me("OptionLabel" & rs![ItemNumber]).Visible =
True
Me("OptionLabel" & rs![ItemNumber]).Caption =
rs![ItemText]
rs.MoveNext
Wend
End If
rs.Close
Set rs = Nothing
Set con = Nothing


-----Message d'origine-----
Bonjour,

eh bien alors dis nous ce que tu fais après
Set con = Application.CurrentProject.Connection

mets le en remarque (avec un ' devant)
puis
fais le menu déboguer > compiler afin d'identifier les
autres instructions

qui ne manqueront pas de nous aiguiller sur le bon
chemin.


à+

Arnaud
--------------------------------------------------
Conseils d'utilisation : http://users.skynet.be/mpfa/
Site Perso : http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------


didier wrote:
| re
|
| J'ai déjà vérifié, j'ai les mêmes
| par contre aucun DLL ADO sur les 2 postes, DAO oui mais
| pas ADO
|| -----Message d'origine-----
|| Bonjour,
|| Tape Alt+F11 et vérifie les références cochées (menu
outils >

|| références) coche les mêmes que sur ton poste
(apparemment il te

|| faut ADO ?)
||
|| a+
|| Arnaud
||


.



Avatar
Raymond [mvp]
Bonjour.

c'est bien de l'ADO que tu utilises, mais il prend l'objet connection DAO
pour l'objet ADO qu'il ouvre en Createobject. il lui faut de toute façon les
librairies ado pour fonctionner.
coches les références:
microsoft Activex Data Objects 2.7 library ( ou autre niveau)
microsoft Activex Data Objects recordset 2.7 library ( ou autre niveau)
qu'est-ce que ça dit.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit dans le message de
news:1bbdf01c4515b$10642990$
J'ai construit cela avec l'assitant de menu général
proposé par access
Voila la fonction complète
Me![Option1].SetFocus
For intOption = 2 To conNumButtons
Me("Option" & intOption).Visible = False
Me("OptionLabel" & intOption).Visible = False
Next intOption

Set con = Application.CurrentProject.Connection
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND
[SwitchboardID]=" & Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset

If (rs.EOF) Then
Me![OptionLabel1].Caption = "Il n'y a aucun
élément pour cette page de Menu Général"
Else
While (Not (rs.EOF))
Me("Option" & rs![ItemNumber]).Visible = True
Me("OptionLabel" & rs![ItemNumber]).Visible True
Me("OptionLabel" & rs![ItemNumber]).Caption rs![ItemText]
rs.MoveNext
Wend
End If
rs.Close
Set rs = Nothing
Set con = Nothing


-----Message d'origine-----
Bonjour,

eh bien alors dis nous ce que tu fais après
Set con = Application.CurrentProject.Connection

mets le en remarque (avec un ' devant)
puis
fais le menu déboguer > compiler afin d'identifier les
autres instructions

qui ne manqueront pas de nous aiguiller sur le bon
chemin.


à+

Arnaud
--------------------------------------------------
Conseils d'utilisation : http://users.skynet.be/mpfa/
Site Perso : http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------


didier wrote:
| re
|
| J'ai déjà vérifié, j'ai les mêmes
| par contre aucun DLL ADO sur les 2 postes, DAO oui mais
| pas ADO
|| -----Message d'origine-----
|| Bonjour,
|| Tape Alt+F11 et vérifie les références cochées (menu
outils >

|| références) coche les mêmes que sur ton poste
(apparemment il te

|| faut ADO ?)
||
|| a+
|| Arnaud
||


.



Avatar
didier
Autant pour moi j'avais bien de cocherMicrosoft activeX
data 2.1 library

-----Message d'origine-----
Bonjour.

c'est bien de l'ADO que tu utilises, mais il prend
l'objet connection DAO

pour l'objet ADO qu'il ouvre en Createobject. il lui
faut de toute façon les

librairies ado pour fonctionner.
coches les références:
microsoft Activex Data Objects 2.7 library ( ou autre
niveau)

microsoft Activex Data Objects recordset 2.7 library (
ou autre niveau)

qu'est-ce que ça dit.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit
dans le message de

news:1bbdf01c4515b$10642990$
J'ai construit cela avec l'assitant de menu général
proposé par access
Voila la fonction complète
Me![Option1].SetFocus
For intOption = 2 To conNumButtons
Me("Option" & intOption).Visible = False
Me("OptionLabel" & intOption).Visible = False
Next intOption

Set con = Application.CurrentProject.Connection
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND
[SwitchboardID]=" & Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset

If (rs.EOF) Then
Me![OptionLabel1].Caption = "Il n'y a aucun
élément pour cette page de Menu Général"
Else
While (Not (rs.EOF))
Me("Option" & rs![ItemNumber]).Visible = True
Me("OptionLabel" & rs![ItemNumber]).Visible =
True
Me("OptionLabel" & rs![ItemNumber]).Caption =
rs![ItemText]
rs.MoveNext
Wend
End If
rs.Close
Set rs = Nothing
Set con = Nothing


-----Message d'origine-----
Bonjour,

eh bien alors dis nous ce que tu fais après
Set con = Application.CurrentProject.Connection

mets le en remarque (avec un ' devant)
puis
fais le menu déboguer > compiler afin d'identifier les
autres instructions

qui ne manqueront pas de nous aiguiller sur le bon
chemin.


à+

Arnaud
--------------------------------------------------
Conseils d'utilisation : http://users.skynet.be/mpfa/
Site Perso : http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------


didier wrote:
| re
|
| J'ai déjà vérifié, j'ai les mêmes
| par contre aucun DLL ADO sur les 2 postes, DAO oui
mais


| pas ADO
|| -----Message d'origine-----
|| Bonjour,
|| Tape Alt+F11 et vérifie les références cochées (menu
outils >

|| références) coche les mêmes que sur ton poste
(apparemment il te

|| faut ADO ?)
||
|| a+
|| Arnaud
||


.




.