Bonjour,
J'ai pris la code trouvé dans la FAQ pour imprimer vers différentes imprimantes, mais apparament, au moment de changer l'imprimante par défaut, il ne me la change pas :
Si je fait un MsgBox de rs.Fields("[tx_PrtNom]"), il me renvois bien le nom de la nouvelle imprimante que j'aimerais par défaut.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 While Not rs.EOF ' Chargement des paramètres de l'imprimante sélectionnée dr.drDeviceName = rs.Fields("[tx_PrtNom]") dr.drDriverName = rs.Fields("[tx_PrtDriver]") dr.drPort = rs.Fields("[tx_PrtPort]") ' L'imprimante devient imprimante par défaut ahtSetDefaultPrinter dr
Pourtant, aucun erreur ne surgit au moment de l'éxécution, c'est juste qu'il m'envoie toujours et uniquement sur l'imprimante par défaut du début.
Si quelqu'un a une piste !
Merci d'avance !
PS : J'utilise ce code : http://access.developpez.com/faq/?page=TAEtat#ChoixImpr
Et J'ai tout mis dans le même module, je sais pas si c'est la bonne manière de faire :o
Partager