Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Verschiedene Methoden der Druckerauswahl
zurück: Kombinationsfeld: neuer Datensatz, nächster Wert weiter: Formular rechnet wenn felder angeklickt werden Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Rückfrage Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
blicki
Es wird langsam besser...


Verfasst am:
05. Feb 2008, 09:05
Rufname: Martin
Wohnort: Meerbusch

Verschiedene Methoden der Druckerauswahl - Verschiedene Methoden der Druckerauswahl

Nach oben
       Version: Office XP (2002)

Zitat:
Hallo Access Freunde,
ich möchte in Access einen Drucker auswählen, auf den ich z.B. einen Bericht ausdrucke.

Dazu habe ich im Web verschiedene Methoden gefunden.
Keine der vier funktioniert so zuverlässig, als das man es verwenden könnte.
Ich habe die vier Methoden mal in einer Beispieldatei zusammen gepackt.
Die WMI und die WScript.network Methode habe ich hier im Forum gefunden. Diese beiden funktionieren eigentlich am besten. Nur wenn von einem PDF Drucker (CutePDF) oder zurück umgestellt werden soll, schlägt zumindest die WMI-Methode fehl. Bei der WScrip.Network-Methode klappt es manchmal. Question

Die API-Variante tut zwar so, als ob was geändert würde, mach auch in der Druckeransicht den Haken bei dem neu gewählten, aber druckt nach wie vor auf dem vorher eingestellten. (also dem Alten)

Und die Access-VBA-Variante tut ebenfalls so, als ob was umgestellt würde, aber auch hier zeigt sich kein Erfolg. Bei der letzten Variante wird sogar noch nicht einmal der Haken am Standarddrucker umgesetzt.

Ich würde gerne eine Lösung bzw eine Erklärung haben, warum das eine "bedingt" geht und das andere nicht. Question

Habe dann doch selber noch eine Lösung gefunden.

Ich habe noch ein Modul erstellt und die eine mit der anderen Methode kombiniert.
Warum es funzt weiss ich nicht jedenfalls klappts nun zuverlässig mit der Option 5.

Diese ruft auf:
Code:
              Case 5
                PrinterName = SetPrinterNew(Me!Combo1, Anschluss) '(VBA#2)
                Me!txNeuerDrucker = PrinterName & " an " & Anschluss
Folgendes steht in dem neuen Modul:
Code:
Option Compare Database
Option Explicit

Public Function SetPrinterNew(ByVal prnname As String, _
                              Anschluss As String) As String
    Dim p As Object
    Set p = Printers
    Dim r As Integer
    Dim n As Integer
   
    For r = 0 To p.Count - 1
        If p(r).DeviceName = prnname Then
            Set Printer = p(r)
            SetPrinterNew = p(r).DeviceName
                Anschluss = ListAllPrinters(SetPrinterNew)
            Exit Function
        End If
    Next r
End Function

Public Function ListAllPrinters(prnname As String) As String
    Dim WshNetwork As Object, oPrinters As Object, i%
     
    Set WshNetwork = CreateObject("WScript.Network")
    Set oPrinters = WshNetwork.EnumPrinterConnections
     
    For i = 0 To oPrinters.Count - 1 Step 2
        If oPrinters.Item(i + 1) = prnname Then
            ListAllPrinters = oPrinters.Item(i)
            Exit Function
        End If
    Next i
    Set WshNetwork = Nothing
    Set oPrinters = Nothing
End Function
Ich wüßte allerdings doch gerne warum die anderen Methoden, vorallem bei der Umschaltung von Cute PDF auf einen anderen Drucker, und umgekehrt versagen.
Ich würde deshalb ungerne dieses Thema schließen wollen.
Ich hänge nochmal die neue Beispieldatei an.

_________________
Gruß Martin
Ein paar gesammelte Werke habe ich in der Beispiele.mdb,die ihr auf meiner HP findet, zusammengefasst.



Druckerauswahl.zip
 Beschreibung:

Download
 Dateiname:  Druckerauswahl.zip
 Dateigröße:  74.53 KB
 Heruntergeladen:  39 mal

JörgG
Access-Team


Verfasst am:
05. Feb 2008, 11:45
Rufname:
Wohnort: b. Dresden


AW: Verschiedene Methoden der Druckerauswahl - AW: Verschiedene Methoden der Druckerauswahl

Nach oben
       Version: Office XP (2002)

Hallo,

und welcher Drucker ist im Bericht unter "Seite einrichten" eingestellt?

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Verschiedene Tabellen und Abfragen in einer Abfrage 8 ExUserCel 201 18. Mai 2013, 14:52
kyron9000 Verschiedene Tabellen und Abfragen in einer Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Export einer Parameterabfrage in verschiedene Speicherorte 0 Sulaco137 82 30. Okt 2012, 13:27
Sulaco137 Export einer Parameterabfrage in verschiedene Speicherorte
Keine neuen Beiträge Access Tabellen & Abfragen: Pivot Chart Säulen im Diagramm verschiedene Farben 0 steff63 1817 01. Nov 2009, 16:21
steff63 Pivot Chart Säulen im Diagramm verschiedene Farben
Keine neuen Beiträge Access Tabellen & Abfragen: Verschiedene Namen einzeln zählen lassen. 7 sven2000 691 04. Sep 2009, 09:06
sven2000 Verschiedene Namen einzeln zählen lassen.
Keine neuen Beiträge Access Tabellen & Abfragen: Verschiedene Abfragen kombinieren, Funktion (Gruppieren ... 1 Kabutoo 1401 06. Nov 2008, 10:46
Kabutoo Verschiedene Abfragen kombinieren, Funktion (Gruppieren ...
Keine neuen Beiträge Access Tabellen & Abfragen: Verschiedene Gültigkeitsregeln auf ein Feld 7 noob80 2063 21. Feb 2008, 16:46
noob80 Verschiedene Gültigkeitsregeln auf ein Feld
Keine neuen Beiträge Access Tabellen & Abfragen: Verschiedene Werte aus identischer Tabelle zuordnen... 1 Ulukai 389 07. Jan 2008, 09:46
Nouba Verschiedene Werte aus identischer Tabelle zuordnen...
Keine neuen Beiträge Access Formulare: Verschiedene Felder im Endlosformular 4 mihensel 492 19. Okt 2007, 15:45
mihensel Verschiedene Felder im Endlosformular
Keine neuen Beiträge Access Formulare: 2 verschiedene Bilder glcihzeitig im Formular anzeigen 1 M.Behnke 490 06. Sep 2007, 23:28
jens05 2 verschiedene Bilder glcihzeitig im Formular anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Je nach Eingabe werden verschiedene Abfragen aufgerufen 10 Gast 607 23. Apr 2007, 14:41
Gast Je nach Eingabe werden verschiedene Abfragen aufgerufen
Keine neuen Beiträge Access Formulare: Verschiedene Dateien aus Formular öffnen 6 Ninjo 803 04. März 2007, 21:25
Ninjo Verschiedene Dateien aus Formular öffnen
Keine neuen Beiträge Access Formulare: Formular - Combobox - Berechnung - 2 verschiedene Tabellen 0 holly12 584 31. Dez 2006, 09:42
holly12 Formular - Combobox - Berechnung - 2 verschiedene Tabellen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: MS Frontpage