Achtung , ist über 10 Jahre her dasss ich mich damit beschäftigt have
Unter Windows installiert man eine Control Schriftart und sendet dann einen Buchstaben der das Öffnen oder den Papierabschnitt bewirkt
Cutting the Paper:
The following code causes the printer to cut the paper.
Printer.FontSize = 10 'Set up the control font.
Printer.FontName = "control" 'Control Font.
Printer.Print "F" 'Use special-function character to cut the paper.
Printer.EndDoc
'F: Full cut
'P: Partial cut
Opening the Cash Drawer:
The next example shows how to open the desired cash drawer at the desired speed.
Printer.FontSize = 10 'Set up the control font.
Printer.FontName = "control"
Printer.Print "A" 'Use special-function character to open the cash drawer.
Printer.EndDoc
'A: Open drawer 1 at 50ms.
'B: Open drawer 1 at 100ms.
'C: Open drawer 1 at 150ms.
'D: Open drawer 1 at 200ms.
'E: Open drawer 1 at 250ms.
'a: Open drawer 2 at 50ms.
'b: Open drawer 2 at 100ms.
'c: Open drawer 2 at 150ms.
'd: Open drawer 2 at 200ms.
'e: Open drawer 2 at 250ms. }
mfg Hannes