Hi,

I've just tried that using the following and I'm able to print to it.

VB Code:
  1. Private Sub Command1_Click()

  2.  
  3. Dim P As Object

  4.  
  5. For Each P In Printers

  6.    If P.Port = "COM1:" Then

  7.       Set Printer = P

  8.       Exit For

  9.    End If

  10. Next P

  11.  
  12. Printer.Print "Hello"

  13. Printer.EndDoc

  14.  
  15. End Sub

Below is an example I found in the EPSON ESC/POS FAQ...

VB Code:
  1. PRINT #1, CHR$(&H1B);"@"; 'Initializes the printer (ESC @)

  2. PRINT #1, CHR$(&H1B);"a";CHR$(1);'Specifies a centered printing position (ESC a)

  3. PRINT #1, CHR$(&H1B);"!";CHR$(0); 'Specifies font A (ESC !)

  4. PRINT #1, "January 14, 2002 15:00";

  5. PRINT #1, CHR$(&H1B);"d";CHR$(3); 'Prints and 3 line feeding (ESC d)

  6. PRINT #1, CHR$(&H1B);"a";CHR$(0); 'Selects the left print position (ESC a)

  7. PRINT #1, CHR$(&H1B);"!";CHR$(1); 'Selects font B

  8. PRINT #1, "TM-U210B $20.00";CHR$(&HA);

  9. PRINT #1, "TM-U210D $21.00";CHR$(&HA);

  10. PRINT #1, "PS-170 $17.00";CHR$(&HA);

  11. PRINT #1, CHR$(&HA); 'Line feeding (LF)

  12. PRINT #1, CHR$(&H1B);"!";CHR$(17); 'Selects double-height mode

  13. PRINT #1, "TOTAL $58.00"; CHR$(&HA);

  14. PRINT #1, CHR$(&H1B);"!";CHR$(0); 'Cancels double-height mode

  15. PRINT #1, "------------------------------";CHR$(&HA);

  16. PRINT #1, "PAID $60.00";CHR$(&HA);

  17. PRINT #1, "CHANGE $ 2.00";CHR$(&HA);

  18. PRINT #1, CHR$(&H1D);"V";CHR$(66);CHR$(0); 'Feeds paper & cut

I tried sending this to the printer by changing 'PRINT #1' to 'Printer.Print', it got there but took a long time, and not fully.

In the FAQ it just shows the above as an example, how do I get the above sent to the printer?

Also the printer object is fine, if the printer is installed. But what if the printer is just attached to COM1, but not installed in windows and the COM settings are being read in from an ini file?

Regards