vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
RDP-Sitzung Standard Drucker ändern Crystal Report?!?!! 
Autor: Mathias123
Datum: 05.08.11 10:32

Hallo ihr da draußen!


Hab ein Problem:
Wir haben einen Terminal Server (Windows 2008R2 x64 Bit) wo sich verschiedene Clients (win7 32-bit) anmelden und ein VB6 Programm starten.

Wir benützen Crystal Reports XI im VB6 Programm um Berichte zu drucken.
Leider unterstützt CR immer den Standarddrucker.

Nun meine Frage:
Wie kann ich im VB6 sagen, dass ein spezieller Drucker, der lokal nicht als standarddrucker angegeben ist, am Terminal Server als standarddrucker hergenommen werden soll?!


Hab hier ein Script, das lokal auf den clients funktioniert, jedoch nicht aufn Terminal Server:

Private Sub Command1_Click()
Call SetDefaultPrinter("HP LaserJet P2050 Series PCL6")
End Sub

' Standarddrucker systemweit festlegen
Public Function SetDefaultPrinter(ByVal sPrinterName As String) As Boolean
' Fehlerbehandlung aktivieren
On Error GoTo ErrHandler
' Verweis auf das Windows-Scripting-Objekt
Dim oWScript As Object
Set oWScript = CreateObject("WScript.Network")
' Standarddrucker neu festlegen
oWScript.SetDefaultPrinter sPrinterName
' Objekt wieder zerstören
Set oWScript = Nothing
' Druckerwechsel erfolgreich!
On Error GoTo 0
SetDefaultPrinter = True
Exit Function
ErrHandler:
' Druckerwechsel konnte nicht durchgeführt werden
' Entweder konnte das WScript-Objekt nicht instanziert werden
' oder es wurde ein ungültiger Druckername angegeben
On Error GoTo 0
SetDefaultPrinter = False
End Function



Habs auch schon probiert mit:
HP LaserJet P2050 Series PCL6 (umgeleitet 1)
\\Terminalserver\HP LaserJet P2050 Series PCL6 (umgeleitet 1)
\\Terminalserver\HP LaserJet P2050 Series PCL6
funktioniert leider auch net....



In den Druckereinstellungen kann ich mit rechter Maustaste den Drucker jedoch sehrwohl auf Standard setzen...



Jemand eine Idee?
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
RDP-Sitzung Standard Drucker ändern Crystal Report?!?!!6.675Mathias12305.08.11 10:32
Re: RDP-Sitzung Standard Drucker ändern Crystal Report?!?!!4.435Blackbox08.08.11 21:55
Re: RDP-Sitzung Standard Drucker ändern Crystal Report?!?!!4.523Elwood09.08.11 13:39
Re: RDP-Sitzung Standard Drucker ändern Crystal Report?!?!!4.397Mathias12311.08.11 08:24
Re: RDP-Sitzung Standard Drucker ändern Crystal Report?!?!!4.382Elwood11.08.11 14:37

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel