how send Printer command to EPSON LQ-300+ from VB.NET

Question

0.00/5 (No votes)

See more:

VS2005

I have to send a priter command for changing font from VB.NET.
And i am using RawprinterHelperClass and sendstringtoprinter(printername,stringname) function to print a string.
I have Printer Command but i donot know to send it. Printer Command is

CSS

Font Selection
-----------------------------------------------------------------------------------
    ASCII       Dec Hex Description
-----------------------------------------------------------------------------------
    ESC k n     107 6B  Select Typeface
                    n=0: Roman      4: Script
                      1: Sans Serif        10: Roman T
                      2: Courier           11: Sans Serif H
                      3: Prestige
------------------------------------------------------------------------------------

Please help me

Posted 26-Sep-12 22:55pm

Shanmugam Vasu

Updated 26-Sep-12 22:56pm

v2

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

**Malli_S** · Accepted Answer · 2012-09-26T23:05:00

Solution 1

Have you tried OpenPrinter[^] and WritePrinter[^].

Check this[^]. There's a sample code available.

Posted 26-Sep-12 23:05pm

Malli_S

Comments

Shanmugam Vasu 27-Sep-12 5:13am

Thanks for your reply. I am using the same coding which you gave as sample code. I want to know string format for printer commands.
ex: s=chr(12) (for Form Feed) likely how i have to sent for changing font

Malli_S 27-Sep-12 5:23am

In that case you can create the byte stream of the command and send it.

Shanmugam Vasu 27-Sep-12 5:27am

Please guide me, how create and send bytestream for commands.

Malli_S 27-Sep-12 5:40am

From the above link use SendBytesToPrinter() function and specify the command string you want to send to the printer.

Shanmugam Vasu 27-Sep-12 6:11am

i am unable to get it, mycode is(to change the font to script)
s="ESC k 4"
RawPrinterHelper1.SendBytesToPrinter(pd.PrinterSettings.PrinterName, s, s.Length)

please Correct me

Malli_S 27-Sep-12 6:14am

what error you getting?

Shanmugam Vasu 27-Sep-12 6:20am

Invalidcastexception was unhandled:
Conversion from string "ESC k 4" to type 'Long' is not valid.

Malli_S 27-Sep-12 6:25am

You need to convert that string to byte array!!! And then pass the converted byte array to the function.

Shanmugam Vasu 27-Sep-12 6:42am

Yes i convert to byte but now also i am unable to get it.

s = "ESC k4"
Dim ba As IntPtr
ba = Marshal.StringToCoTaskMemAnsi(s)
RawPrinterHelper1.SendBytesToPrinter(pd.PrinterSettings.PrinterName, ba, s.Length)
I amn't sure about the printer command representation also(ESC k4)

Shanmugam Vasu 28-Sep-12 8:40am

Thanks for your Response., Finally i solved my problem., Decimal Value for ESC is 27.
Ex: for Changing font size 10cpi to 12cpi : s=chr(27) & chr(77)