Valgfri printer i MS Access2000 db
Denne løsning har fungeret i årevis med MSAccess 2000 (flere brugere). Nu har den imidlertid fået et problem med at man ikke kan vælge printer, fordi den anvender Windows default printer.Hvordan kan jeg ændre det, så brugeren kan vælge fra en liste med printere?
Dim stDocName As String
' Dim prt As Access.Printer
stDocName = "List"
DoCmd.OpenReport stDocName, acNormal
' Set prt = Reports(strDocName).Printer
' prt.Orientation = aclandscape
' DoCmd.PrintOut acPages, 1, 32767
' DoCmd.Close acReport, strReportName, acSaveNo