Pour =E9diter directement (sans aper=E7u avant impression) des=20
factures, j'utilise dans mon code une boucle "Do While"=20
bas=E9e sur une requ=EAte :
Set tablelue =3D CurrentDb.OpenRecordset(SELECT * FROM=20
Factures")=20
If (Not tablelue.EOF) Then
Do While Not tablelue.EOF
DoCmd.OpenReport "Facture", acViewNormal
tablelue.MoveNext
Loop
End If
Il y a 177 factures dans la table Factures. Or, l'=E9dition=20
s'arr=EAte syst=E9matiquement apr=E8s la 26=E8me facture, sans=20
message d'erreur, cela quelle que soit l'imprimante, sous=20
Windows XP=A8ou 2000.
Je pr=E9cise que bien entendu il y a assez de papier dans=20
l'imprimante.
Autres d=E9tails :
- Le message "Impression en cours" ne s'affiche que 26=20
fois.
- Apr=E8s l'=E9dition de la 26=E8me facture, l'ic=F4ne imprimante=20
(en bas =E0 droite =E0 c=F4t=E9 de l'horloge) dispara=EEt, comme si=20
l'=E9dition =E9tait termin=E9e.=20
- Un point d'arr=EAt =E0 la sortie de la boucle n'est pas=20
intercept=E9 (le programme n'a pas l'air de sortir de la=20
boucle).
- si j'attends plusieurs minutes, aucune autre =E9dition de=20
facture ne s'effectue.=20
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
Pampi
En fait j'ai trouvé : c'est mon 27ème enregistrement qui était invalide (donnée numérique non renseignée).
Par contre, pourquoi aucun message ne s'est affiché ?
Dieu seul le sait ... et Raymond ?
Pampi
-----Message d'origine----- Bonjour,
Access 2000.
Pour éditer directement (sans aperçu avant impression) des
factures, j'utilise dans mon code une boucle "Do While" basée sur une requête :
Set tablelue = CurrentDb.OpenRecordset(SELECT * FROM Factures") If (Not tablelue.EOF) Then Do While Not tablelue.EOF DoCmd.OpenReport "Facture", acViewNormal tablelue.MoveNext Loop End If
Il y a 177 factures dans la table Factures. Or, l'édition s'arrête systématiquement après la 26ème facture, sans message d'erreur, cela quelle que soit l'imprimante, sous Windows XP¨ou 2000.
Je précise que bien entendu il y a assez de papier dans l'imprimante.
Autres détails :
- Le message "Impression en cours" ne s'affiche que 26 fois. - Après l'édition de la 26ème facture, l'icône imprimante (en bas à droite à côté de l'horloge) disparaît, comme si l'édition était terminée. - Un point d'arrêt à la sortie de la boucle n'est pas intercepté (le programme n'a pas l'air de sortir de la boucle). - si j'attends plusieurs minutes, aucune autre édition de facture ne s'effectue.
Merci par avance pour votre aide.
Pampi.
.
En fait j'ai trouvé : c'est mon 27ème enregistrement qui
était invalide (donnée numérique non renseignée).
Par contre, pourquoi aucun message ne s'est affiché ?
Dieu seul le sait ... et Raymond ?
Pampi
-----Message d'origine-----
Bonjour,
Access 2000.
Pour éditer directement (sans aperçu avant impression)
des
factures, j'utilise dans mon code une boucle "Do While"
basée sur une requête :
Set tablelue = CurrentDb.OpenRecordset(SELECT * FROM
Factures")
If (Not tablelue.EOF) Then
Do While Not tablelue.EOF
DoCmd.OpenReport "Facture", acViewNormal
tablelue.MoveNext
Loop
End If
Il y a 177 factures dans la table Factures. Or, l'édition
s'arrête systématiquement après la 26ème facture, sans
message d'erreur, cela quelle que soit l'imprimante, sous
Windows XP¨ou 2000.
Je précise que bien entendu il y a assez de papier dans
l'imprimante.
Autres détails :
- Le message "Impression en cours" ne s'affiche que 26
fois.
- Après l'édition de la 26ème facture, l'icône imprimante
(en bas à droite à côté de l'horloge) disparaît, comme si
l'édition était terminée.
- Un point d'arrêt à la sortie de la boucle n'est pas
intercepté (le programme n'a pas l'air de sortir de la
boucle).
- si j'attends plusieurs minutes, aucune autre édition de
facture ne s'effectue.
En fait j'ai trouvé : c'est mon 27ème enregistrement qui était invalide (donnée numérique non renseignée).
Par contre, pourquoi aucun message ne s'est affiché ?
Dieu seul le sait ... et Raymond ?
Pampi
-----Message d'origine----- Bonjour,
Access 2000.
Pour éditer directement (sans aperçu avant impression) des
factures, j'utilise dans mon code une boucle "Do While" basée sur une requête :
Set tablelue = CurrentDb.OpenRecordset(SELECT * FROM Factures") If (Not tablelue.EOF) Then Do While Not tablelue.EOF DoCmd.OpenReport "Facture", acViewNormal tablelue.MoveNext Loop End If
Il y a 177 factures dans la table Factures. Or, l'édition s'arrête systématiquement après la 26ème facture, sans message d'erreur, cela quelle que soit l'imprimante, sous Windows XP¨ou 2000.
Je précise que bien entendu il y a assez de papier dans l'imprimante.
Autres détails :
- Le message "Impression en cours" ne s'affiche que 26 fois. - Après l'édition de la 26ème facture, l'icône imprimante (en bas à droite à côté de l'horloge) disparaît, comme si l'édition était terminée. - Un point d'arrêt à la sortie de la boucle n'est pas intercepté (le programme n'a pas l'air de sortir de la boucle). - si j'attends plusieurs minutes, aucune autre édition de facture ne s'effectue.
