J'ai récupéré un module pour mon application ACCESS.
Ce module est prévu pour lire des tables et faire des calculs.
Lorsque mes tables étaient dans ma base pas de problème, les calculs
s'effectuaient.
Il se trouve que mes tables sont maintenant attachées mon module ne veut
plus faire les calculs.
Quelqu'un peut-il me donner la syntaxe à modifier.
Merci
A+
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 [mvp]
Bonjour.
En principe il n'y a rien à changer, mais...... peux-tu afficher un exemple de calcul, mais court .
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" a écrit dans le message de news:c168bd$ioo$
J'ai récupéré un module pour mon application ACCESS. Ce module est prévu pour lire des tables et faire des calculs. Lorsque mes tables étaient dans ma base pas de problème, les calculs s'effectuaient. Il se trouve que mes tables sont maintenant attachées mon module ne veut plus faire les calculs. Quelqu'un peut-il me donner la syntaxe à modifier. Merci A+
ManuT
Bonjour.
En principe il n'y a rien à changer, mais......
peux-tu afficher un exemple de calcul, mais court .
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" <etrarieux@wanadoo.fr> a écrit dans le message de
news:c168bd$ioo$1@news-reader4.wanadoo.fr...
J'ai récupéré un module pour mon application ACCESS.
Ce module est prévu pour lire des tables et faire des calculs.
Lorsque mes tables étaient dans ma base pas de problème, les calculs
s'effectuaient.
Il se trouve que mes tables sont maintenant attachées mon module ne veut
plus faire les calculs.
Quelqu'un peut-il me donner la syntaxe à modifier.
Merci
A+
En principe il n'y a rien à changer, mais...... peux-tu afficher un exemple de calcul, mais court .
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" a écrit dans le message de news:c168bd$ioo$
J'ai récupéré un module pour mon application ACCESS. Ce module est prévu pour lire des tables et faire des calculs. Lorsque mes tables étaient dans ma base pas de problème, les calculs s'effectuaient. Il se trouve que mes tables sont maintenant attachées mon module ne veut plus faire les calculs. Quelqu'un peut-il me donner la syntaxe à modifier. Merci A+
ManuT
ManuT
Voici le détail de mon module qui plante lorsque j'attavhe la table "Table des Jours fériés"
Merci pour la réponse
Public Function Jour_Férié(Jour As Date) As Boolean
Dim MonEspace As Workspace
Dim MaBd As Database
Dim Matable As Recordset
Set MonEspace = DBEngine.Workspaces(0)
Set MaBd = MonEspace.Databases(0)
Set Matable = MaBd.OpenRecordset("Table des Jours fériés", dbOpenTable)
Matable.Index = "Jour férié"
Matable.Seek "=", Jour
If Matable.NoMatch Then
Jour_Férié = False
Else
Jour_Férié = True
End If
Matable.Close
MaBd.Close
End Function
ManuT
[mvp]" a écrit dans le message de news:eCOoyrG%
Bonjour.
En principe il n'y a rien à changer, mais...... peux-tu afficher un exemple de calcul, mais court .
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" a écrit dans le message de news:c168bd$ioo$
J'ai récupéré un module pour mon application ACCESS. Ce module est prévu pour lire des tables et faire des calculs. Lorsque mes tables étaient dans ma base pas de problème, les calculs s'effectuaient. Il se trouve que mes tables sont maintenant attachées mon module ne veut plus faire les calculs. Quelqu'un peut-il me donner la syntaxe à modifier. Merci A+
ManuT
Voici le détail de mon module qui plante lorsque j'attavhe la table "Table
des Jours fériés"
Merci pour la réponse
Public Function Jour_Férié(Jour As Date) As Boolean
Dim MonEspace As Workspace
Dim MaBd As Database
Dim Matable As Recordset
Set MonEspace = DBEngine.Workspaces(0)
Set MaBd = MonEspace.Databases(0)
Set Matable = MaBd.OpenRecordset("Table des Jours fériés", dbOpenTable)
Matable.Index = "Jour férié"
Matable.Seek "=", Jour
If Matable.NoMatch Then
Jour_Férié = False
Else
Jour_Férié = True
End If
Matable.Close
MaBd.Close
End Function
ManuT
[mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:eCOoyrG%23DHA.1632@TK2MSFTNGP12.phx.gbl...
Bonjour.
En principe il n'y a rien à changer, mais......
peux-tu afficher un exemple de calcul, mais court .
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" <etrarieux@wanadoo.fr> a écrit dans le message de
news:c168bd$ioo$1@news-reader4.wanadoo.fr...
J'ai récupéré un module pour mon application ACCESS.
Ce module est prévu pour lire des tables et faire des calculs.
Lorsque mes tables étaient dans ma base pas de problème, les calculs
s'effectuaient.
Il se trouve que mes tables sont maintenant attachées mon module ne veut
plus faire les calculs.
Quelqu'un peut-il me donner la syntaxe à modifier.
Merci
A+
Voici le détail de mon module qui plante lorsque j'attavhe la table "Table des Jours fériés"
Merci pour la réponse
Public Function Jour_Férié(Jour As Date) As Boolean
Dim MonEspace As Workspace
Dim MaBd As Database
Dim Matable As Recordset
Set MonEspace = DBEngine.Workspaces(0)
Set MaBd = MonEspace.Databases(0)
Set Matable = MaBd.OpenRecordset("Table des Jours fériés", dbOpenTable)
Matable.Index = "Jour férié"
Matable.Seek "=", Jour
If Matable.NoMatch Then
Jour_Férié = False
Else
Jour_Férié = True
End If
Matable.Close
MaBd.Close
End Function
ManuT
[mvp]" a écrit dans le message de news:eCOoyrG%
Bonjour.
En principe il n'y a rien à changer, mais...... peux-tu afficher un exemple de calcul, mais court .
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" a écrit dans le message de news:c168bd$ioo$
J'ai récupéré un module pour mon application ACCESS. Ce module est prévu pour lire des tables et faire des calculs. Lorsque mes tables étaient dans ma base pas de problème, les calculs s'effectuaient. Il se trouve que mes tables sont maintenant attachées mon module ne veut plus faire les calculs. Quelqu'un peut-il me donner la syntaxe à modifier. Merci A+
ManuT
Raymond [mvp]
réponse donnée sur l'autre post, reste bien dans la même conversation
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" a écrit dans le message de news:c17sr9$hek$
Voici le détail de mon module qui plante lorsque j'attavhe la table "Table des Jours fériés"
Merci pour la réponse
Public Function Jour_Férié(Jour As Date) As Boolean
Dim MonEspace As Workspace
Dim MaBd As Database
Dim Matable As Recordset
Set MonEspace = DBEngine.Workspaces(0)
Set MaBd = MonEspace.Databases(0)
Set Matable = MaBd.OpenRecordset("Table des Jours fériés", dbOpenTable)
Matable.Index = "Jour férié"
Matable.Seek "=", Jour
If Matable.NoMatch Then
Jour_Férié = False
Else
Jour_Férié = True
End If
Matable.Close
MaBd.Close
End Function
ManuT
réponse donnée sur l'autre post, reste bien dans la même conversation
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"ManuT" <etrarieux@wanadoo.fr> a écrit dans le message de
news:c17sr9$hek$1@news-reader1.wanadoo.fr...
Voici le détail de mon module qui plante lorsque j'attavhe la table "Table
des Jours fériés"
Merci pour la réponse
Public Function Jour_Férié(Jour As Date) As Boolean
Dim MonEspace As Workspace
Dim MaBd As Database
Dim Matable As Recordset
Set MonEspace = DBEngine.Workspaces(0)
Set MaBd = MonEspace.Databases(0)
Set Matable = MaBd.OpenRecordset("Table des Jours fériés",
dbOpenTable)