title image


Smiley Re: Bericht druckt nicht auf neuen Standarddrucker - Hilfe an R. K. und alle
Kann dein Brötchengeber (AVU) dir nicht nen Crashkurs sponsorn ?



Wenn man sich das ganze mal so anschaut ist es schon ziemlich merkwürdig, das so ein

großes Unternehmen wie die AVU das ganze als Hausaufgabe unbefleckten Mitarbeitern

zuschanzt. Man sollte zumindest den Code verstehen, bevor man(n/frau) ihn für eigene Zwecke verwendet. Du kannst das ganze aber viel bequemer lösen, wenn du auf die Printers Eigenschaften von XP zurückgreifst... Da kannste deinen ganzen Codemüll entsorgen :-)



MfG.

RSVisionmaster



Ich leg mir nen neues Motto zu.... Geschenkt ist noch zu teuer :-)





Beispiel: SetDefaultPrinter("DeinDrucker")



Public Sub SetDefaultPrinter(DefPrinter As String)

Dim TMPPrinter as Printer

Set TMPPrinter = Printers(DefPrinter) 'Gewählten Drucker auslesen...

Set Application.Printer = TMPPrinter '...und als Standard setzen

End Sub






Insole Scan Control - Die Elektronische Trittspur für Access (XP/2003)
CardManager - SmartCard Tools a la CARD



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: