je dois int=E9grer dans une base que j'ai d=E9velopp=E9e la=20
num=E9rotation automatique des factures !!
qqun aurait il d=E9ja fait cela et pourrait il me le filer !!
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.
pourquoi ne pas te servir toi-même ? http://access.seneque.free.fr/bases_exemples.htm N° 20 il faudra peut-être une adaptation selon la condition de numérotation. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
merci
Bonjour.
pourquoi ne pas te servir toi-même ?
http://access.seneque.free.fr/bases_exemples.htm N° 20
il faudra peut-être une adaptation selon la condition de numérotation.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour une meilleure
efficacité de tes interventions sur MPFA
"David" <david@amiens.com> a écrit dans le message de
news:0bb801c3b32b$30a63370$a301280a@phx.gbl...
je dois intégrer dans une base que j'ai développée la
numérotation automatique des factures !!
qqun aurait il déja fait cela et pourrait il me le filer !!
pourquoi ne pas te servir toi-même ? http://access.seneque.free.fr/bases_exemples.htm N° 20 il faudra peut-être une adaptation selon la condition de numérotation. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour une meilleure efficacité de tes interventions sur MPFA
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
merci
Jeff
Bonjour
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser une fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB() Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]") If mj.RecordCount > 0 Then mj.MoveLast [Numero] = mj![Numero] + 1 Else [Numero] = 1 End If mj.Close db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
merci
Bonjour
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser une
fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB()
Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]")
If mj.RecordCount > 0 Then
mj.MoveLast
[Numero] = mj![Numero] + 1
Else
[Numero] = 1
End If
mj.Close
db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" <david@amiens.com> a écrit dans le message de
news:0bb801c3b32b$30a63370$a301280a@phx.gbl...
je dois intégrer dans une base que j'ai développée la
numérotation automatique des factures !!
qqun aurait il déja fait cela et pourrait il me le filer !!
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser une fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB() Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]") If mj.RecordCount > 0 Then mj.MoveLast [Numero] = mj![Numero] + 1 Else [Numero] = 1 End If mj.Close db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
merci
Jeff
Bonjour
J'avais oublié aussi (plus simple)
[Numero] = NZ(DMax("[Numero]", "TABLE")) + 1
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"Jeff" a écrit dans le message de news:
Bonjour
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser une
fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB() Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]") If mj.RecordCount > 0 Then mj.MoveLast [Numero] = mj![Numero] + 1 Else [Numero] = 1 End If mj.Close db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
merci
Bonjour
J'avais oublié aussi (plus simple)
[Numero] = NZ(DMax("[Numero]", "TABLE")) + 1
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"Jeff" <jf@jf.com> a écrit dans le message de
news:OZBocvzsDHA.2408@tk2msftngp13.phx.gbl...
Bonjour
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser
une
fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB()
Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]")
If mj.RecordCount > 0 Then
mj.MoveLast
[Numero] = mj![Numero] + 1
Else
[Numero] = 1
End If
mj.Close
db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" <david@amiens.com> a écrit dans le message de
news:0bb801c3b32b$30a63370$a301280a@phx.gbl...
je dois intégrer dans une base que j'ai développée la
numérotation automatique des factures !!
qqun aurait il déja fait cela et pourrait il me le filer !!
Il faudrait soit insérer un champ compteur dans ta table, soit utiliser une
fonction du style :
Dim db As Database, mj As Recordset
Set db = CurrentDB() Set mj = db.OpenRecordset("SELECT * FROM [TABLE] ORDER BY [Numero]") If mj.RecordCount > 0 Then mj.MoveLast [Numero] = mj![Numero] + 1 Else [Numero] = 1 End If mj.Close db.Close
Cordialement
Jeff
Charte du forum : http://users.skynet.be/mpfa/
"David" a écrit dans le message de news:0bb801c3b32b$30a63370$ je dois intégrer dans une base que j'ai développée la numérotation automatique des factures !! qqun aurait il déja fait cela et pourrait il me le filer !!
