Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond
Bonsoir.
Vérifie si la référence à microsoft ActiveX data Object 2.7 library est bien cochée (ADO). compile ton application jusqu'à ce qu'aucune erreur n'apparaisse.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Guy" a écrit dans le message de news:00a801c3966b$279662a0$ A l'ouverture du menu général acces me donne le message Erreur de chargement de DLL pourquoi.
Que faire ? sur quel Bibliothethe Pointe le Men général.
' Open the table of Switchboard Items, and find ' the first item for this Switchboard Page.
--------- Voici la ligne Coupable ------------
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
Bonsoir.
Vérifie si la référence à microsoft ActiveX data Object 2.7 library est bien
cochée (ADO).
compile ton application jusqu'à ce qu'aucune erreur n'apparaisse.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Guy" <brusson.guy@free.fr> a écrit dans le message de
news:00a801c3966b$279662a0$a501280a@phx.gbl...
A l'ouverture du menu général acces me donne le message
Erreur de chargement de DLL pourquoi.
Que faire ? sur quel Bibliothethe Pointe le Men général.
' Open the table of Switchboard Items, and find
' the first item for this Switchboard Page.
--------- Voici la ligne Coupable ------------
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
Vérifie si la référence à microsoft ActiveX data Object 2.7 library est bien cochée (ADO). compile ton application jusqu'à ce qu'aucune erreur n'apparaisse.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Guy" a écrit dans le message de news:00a801c3966b$279662a0$ A l'ouverture du menu général acces me donne le message Erreur de chargement de DLL pourquoi.
Que faire ? sur quel Bibliothethe Pointe le Men général.
' Open the table of Switchboard Items, and find ' the first item for this Switchboard Page.
--------- Voici la ligne Coupable ------------
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