Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Print using these languges DPL & DTPL?

Status
Not open for further replies.

midnightrambler75

Technical User
Nov 7, 2004
8
0
0
CA
I have a datamax printer that I want to print a ticket on. I have set up a report and it won't print. The printer does nothing. I looked at the manual and it says that I need to use a specific language to get it to work, either DPL or DTPL. Does anyone have an idea how to use these languages or where I can find help.

thanks
 
Have you installed this printer in Windows with the proper driver ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244
 
All of the printer drivers are installed and the printer does work.

Here is a sample program from the manual, I thought if I got this to work I could modify it for my own custom report. When I run it on open I get error messages. Any ideas how I could modify this code to work?

Code:
Start:
 Open "COM3:9600,N,8,1,FOR RANDOM" For Random As 1
 
MAIN:
 CLS
 Print "DMX PRINTER TEST PROGRAM (press any key)"
 
 While I$ = ""
 I$ = INKEY$
 Wend
 
 DESC$ = "10K OHM 1/4 WATT"
 pcs = 590
 
SENDDATA:
 CR$ = Chr$(13)
 Print #1, Chr$(2); "L"; CR$
 Print #1, "H07"; CR$
 'set burn time to 7
 Print #1, "d11"; CR$;
 'set for 300 dpi
 Print #1, "191100801000025"; DESC$; CR$;
 'send description line
 Print #1, "1a6210000000050"; pcs; CR$;
 'send barcode
 Print #1, "E"; CR$;
 'end of format and print
GoTo MAIN
 
Hi...

The code error you are getting is probably because it is written in another form of basic other than VB. The Function InKey$ is not supported.

I had a similar problem to solve with a Intermec Label Printer....

In Access, I create a report that was slightly smaller than the label.

I created form for data input and to enter the number of labels to print.

Then I used the Docmd.OpenReport with a loop to send to the printer and let Windows take care of the rest.



 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top