1. DC
  2. Forum
  3. Laserdrucker
  4. S/W-Laser
  5. Kyocera FS-1030D
  6. Solange fortlaufend doppelseitig drucken, bis...

Solange fortlaufend doppelseitig drucken, bis...

Kyocera FS-1030D▶ 4/09

Frage zum Kyocera FS-1030D: S/W-Drucker (Laser/LED) mit Drucker ohne Scanner, S/W, 22,0 ipm, 1.800 dpi, PCL/PS, Duplexdruck, 2 Zuführungen (300 Blatt), kompatibel mit TK-120, 2006er Modell

Passend dazu Kyocera TK-120 (für 7.200 Seiten) ab 9,41 €1

Dieses Thema ist inaktiv: weitere Antworten sind nicht mehr möglich. Sie können jedoch ein neues Thema erstellen.

von
Hallo,

ich möchte, daß mein Kyocera-Drucker 1030D beim Drucken eines
pdf-Dokumentes solange fortlaufend (im Duplexmodus) arbeitet, bis eine bestimmte Zeichenkette 'Blatt1' im pdf vorkommt, die das Drucken einer neuen leeren Seite bedeuten soll etc.
Versteht Ihr, was ich meine ? Ist das irgendwie machbar ?

Gruß
blackiven
von
ja, so etwas gibt es im gewerblichen Bereich, z.B. als SAP/Oracle Add-On mit kontextsensitiver Steuerung des Druckoutputs, z.B. ein Rechnungslayout, wenn das Wort 'Rechnung' vorkommt, Sprach/Zeichensatzauswahl in Abhängigkeit von Schlüsselwörtern, und vieles mehr, aber für den Privatbereich ist mir so etwas nicht bekannt.
von
hi, danke für Deine ausführliche Antwort. Kann man das evtl. mit Prescribe steuern ?
von
Hallo!
Wenn ich mich nicht irre gibts im Kyo-Programm die Einstellung "Decklblattmodus". Hier wird vor jedem neuen Druckauftrag eine leere Seite ausgegeben.
Ich glaube dies war unter den Einstellungen vom KX-Treiber möglich.

MfG
agent_haribo

PS: Zumindest hatte ich diese Einstellung mal ausgewählt, war mir dann aber doch zu papierverschwenderisch.
von
Wenn du die Vollversion von Adobe Acrobat hast, lässt sich sowas wahrscheinlich mit der Acrobat SDK programmieren.
von
Hallo, ja, haben wir, ich habe mir mal Visual C++ und das SDK von Adobe heruntergeladen. Ich glaube nun auch, daß es mit einem selbst geschriebenen Plugin möglich ist, das Problem zu lösen.
Ich wollte das Starter-Plugin mal kompilieren lassen, dann kam der Fehler \"BSCMAKE: error BK1506 : Datei \".\\Debug\\StarterInit.sbr\" kann nicht geöffnet werden: No such file or directory\". Hast Du Dich schon mal mit dem Thema beschäftigt ? Geringe Programmierkenntnisse sind vorhanden. Gibt es nicht irgendwo deutschsprachige Literatur zu dem Thema ?
von
Zu der gegebenen Fehlermeldung kann ich leider nichts sagen. Meine Kenntnisse sind auch nicht überragend.

Ich hab das ganze mal unter Visual Basic ausprobiert.

Dabei bin ich mir nicht sicher, ob ich deine Vorstellung richtig erfasst habe - ich habe das so verstanden: Wenn ein bestimmtes Wort vorkommt, soll der Drucker die Seite, auf der das Wort vorkommt, auf ein neues Blatt drucken, auch wenn eigentlich die Rückseite des vorherigen Blattes dran wäre.

Entsprechend habe ich ein kleines Programm geschrieben, das den Text eines PDF-Dokumentes nach einem bestimmten Wort durchkämmt und an den Fundstellen entsprechende Druckbefehle gibt (an den Standarddrucker).

Der Code ist zwar nicht elegant, aber es funktioniert so weit.


Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Integer, ByVal hWndNewParent As Integer) As Integer

Private AcroHandle As Integer
Private AcroXApp As Acrobat.CAcroApp
Private AcroXAVDoc As Acrobat.CAcroAVDoc
Private AcroXPDDoc As Acrobat.CAcroPDDoc

Private Sub Form1_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
Call close_pdf()
End Sub

Private Sub close_pdf()
AcroXApp.Hide()
SetParent(AcroHandle, 0)
AcroXAVDoc.Close(0)
AcroXApp.CloseAllDocs()
AcroXApp.Exit()
End Sub

Private Sub open_pdf(ByVal docu As String)
Dim FileName As String
AcroXApp = CType(CreateObject("AcroExch.App"), Acrobat.CAcroApp)
AcroXAVDoc = CType(CreateObject("AcroExch.AVDoc"), Acrobat.CAcroAVDoc)
FileName = docu
AcroXAVDoc.Open(FileName, "Acrobat")
AcroHandle = FindWindow(vbNullString, "Adobe Acrobat Professional - [Acrobat]")
AcroXPDDoc.ClearFlags(&H1)
AcroXApp.Show()
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If Dir(TXTpfad.Text) = "" Then
MsgBox("Bitte geben Sie einen gültigen Dateipfad an!", MsgBoxStyle.Information, "Ungültiger Dateipfad")
Exit Sub
End If
Call open_pdf(TXTpfad.Text)
Dim i, j, k
Dim jso, pg, pgs, wort, stPage
stPage = 0
jso = AcroXPDDoc.GetJSObject()
pgs = AcroXPDDoc.GetNumPages
For pg = 0 To pgs - 1
wort = 0
j = jso.getPageNumWords(pg)
For k = 0 To j
i = jso.getPageNthWord(pg, k)
If i = TXTkeyword.Text Then wort = 1
Next
If wort = 1 And pg <> 0 Then
AcroXAVDoc.PrintPages(stPage, pg - 1, 2, False, True)
stPage = pg
End If
Next
If stPage <= pgs - 1 Then AcroXAVDoc.PrintPages(stPage, pgs - 1, 2, False, True)

Call close_pdf()
End Sub
von
danke, funktioniert alles ganz gut. Geht das eigentlich auch mit Adobe Acrobat Standard ?
1

Offenlegung - Provisionslinks

Wir erhalten bei einer Vermittlung zum Kauf oder direkt beim Klick eine Provision vom Anbieter.

Alle Preise enthalten die derzeit gültige MwSt. und verstehen sich zzgl. Versandkosten. Der Preis sowie die Verfügbarkeit können sich mittlerweile geändert haben. Weiß hinterlegte Preise gelten für ein baugleiches Gerät. Alle Angaben ohne Gewähr.

Forum Aktuell
12:17
10:49
10:10
09:50
09:18
08:54
5.5.
4.5.
4.5.
2.5.
ZEBRA GK420T druckt nicht schmidt_as
Artikel
05.05. HP Laserjet Cashback 2024/05: Geld zurück für viele S/W-​ und zwei Farb-​Laserjets von HP
27.04. Brother L5000-​ und L6000er-​Serie: Gehobene Monolaser mit und ohne Scanner
24.04. Epson Readyprint Ecotank: Größere Druckerauswahl fürs Tintenabo mit Leihdrucker
23.04. Epson ReadyPrint Flex: Neue Vieldrucker-​Tarife fürs Tintenabo
18.04. The Recycler Live 2024: HP will wohl Chip-​Reset für professionelle Aufbereiter ermöglichen
17.04. Xerox Laserdrucker-​Cashback 2024/04: Bis zu 300 Euro zurück beim Kauf eines Laserdruckers mit Toner
16.04. CVE-​2024-​2209: Schwachstelle bei Deskjet-​Einstiegsmodellen
11.04. Brother ADS-​1800W und ADS-​1300: Einklappbare Dokumentenscanner mit USB-​C
10.04. HP zu SMTP-​Fehlern bei Laserjet und Officejet: Probleme beim E-​Mailversand sollen behoben werden
05.04. Epson Workforce Enterprise AM-​C400 und AM-​C550: Linehead-​Tintendrucker als kompakte A4-​Systeme
04.04. HP EvoMore-​Tintenpatronen: Nachhaltig? Für die Umwelt oder als Einnahmequelle?
22.03. Roland DG: Brother bietet für Großformat-​ und Industriedruckerhersteller
Themen des Tages
Beliebte Drucker
ab 348,88 €1 Epson Ecotank ET-4850

Multifunktionsdrucker (Tinte)

ab 170,99 €1 Canon Maxify MB5150

Multifunktionsdrucker (Pigmenttinte)

ab 228,90 €1 Epson Ecotank ET-2850

Multifunktionsdrucker (Tinte)

ab 637,90 €1 Epson Ecotank ET-8550

Multifunktionsdrucker, A3 (Tinte)

ab 629,00 €1 Canon Maxify GX7050

Multifunktionsdrucker (Pigmenttinte)

ab 394,94 €1 Canon Maxify GX4050

Multifunktionsdrucker (Pigmenttinte)

ab 323,99 €1 Epson Ecotank ET-3850

Multifunktionsdrucker (Tinte)

ab 744,99 €1 Epson Ecotank ET-5850

Multifunktionsdrucker (Pigmenttinte)

ab 470,00 €1 Canon Maxify GX6050

Multifunktionsdrucker (Pigmenttinte)

ab 158,00 €1 HP Smart Tank 5106

Multifunktionsdrucker (Tinte)

Merkliste

×
Drucker vergleichen