Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

frage zu kleinem druckerscript
Autor: kev
Datum: 09.11.05 11:04
hallo, ich hab hier folgenden code zur änderung des druckers gefunden. Leider habe ich noch zwei fragen: Wie rufe ich das auf, bzw. wie baue ich das ein. (vb 6.0) Wo gebe ich den drucker an, der ausgewählt werden soll? hier der code: ' 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 Viele Grüße von der Küste Kev

frage zu kleinem druckerscript	565	kev	09.11.05 11:04
Re: frage zu kleinem druckerscript	293	Dieter	09.11.05 17:51
danke schön. oT	308	kev	10.11.05 07:49

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übersicht

Suchen