Discussion :

[marot_r]

Salut à tous et merci de votre temps.

J'ai une application de saisie qui permet à l'utilisateur d'entrer des éléments de facture.

L'utilisateur devra avoir la possibilité d'imprimer la facture immédiatement ou plus tard en lot.

Je prévois un préview avant l'impression et donc je voudrais être capable de savoir que la facture a bien été envoyée à l'imprimante. Toute page envoyée à l'imprimante est supposée imprimée.

J'ai prévu un champ EstImprimee dans ma table pour le resultat.

Je commence mes recherches et je n'ai pas trop d'idées.

Quelqu'un a-t'il déjà fait cela ? Des suggestions pour le faire ?

A+

[LedZeppII]

Bonsoir,

Jusq'à présent je ne suis jamais passé par le preview. J'imprime directement et je mets mon flag.

Peut-être une petite idée cependant : Quand tu es en Preview tu as un bouton imprimante dans la barre de menu "Aperçu avant impression".
Tu pourrai le désactiver ou le masquer, et y substituer ton propre bouton. Ainsi tu interceptes le déclenchement de l'impression.
Dans mon appli je grise le bouton imprimante du menu Access pour forcer l'utilisation de mon bouton (dans un formulaire celui-ci).

Voila. A creuser.

Bon courage.

[cafeine]

Salut à tous et merci de votre temps.

J'ai une application de saisie qui permet à l'utilisateur d'entrer des éléments de facture.

L'utilisateur devra avoir la possibilité d'imprimer la facture immédiatement ou plus tard en lot.

Je prévois un préview avant l'impression et donc je voudrais être capable de savoir que la facture a bien été envoyée à l'imprimante. Toute page envoyée à l'imprimante est supposée imprimée.

J'ai prévu un champ EstImprimee dans ma table pour le resultat.

Je commence mes recherches et je n'ai pas trop d'idées.

Quelqu'un a-t'il déjà fait cela ? Des suggestions pour le faire ?

A+

Hello marot_r

je vois bien un truc du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Private blnPrintMode As Boolean
 
 
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
 
If blnPrintMode Then
    ' coller ici code de mise à jour du flag d'impression
    '  il suffit de récupérer la valeur de la PK par exemple
End If
 
End Sub
 
 
Private Sub Report_Activate()
 
' si l'événement est provoqué
'  on considère que l'état n'est pas ouvert pour impression
blnPrintMode = False
 
End Sub
 
Private Sub Report_Open(Cancel As Integer)
 
' par défaut on suppose que c'est une ouverture pour impression
blnPrintMode = True
 
End Sub

[marot_r]

Merci à vous deux, vos idées vont m'être très utile.

Bonne journée.

A+