Hi Freddie,

We use Argox and some other barcode printers. Your problem not about code written in dbase III. We do some changes with our programs when upgrade foxpro dos to foxpro windows too...

You have to bypass windows printer driver when you send codes to barcode printers.

try that:

SET PRINTER TO myprinter.txt
SET PRINTER ON
SET DEVICE TO PRINTER

*** * Tried entering this code. Does print but not the required Bar Code.
* It prints the text within.
* SET PRINTER TO LPT1***
@1,0 SAY Chr(2) + "c0000"
@1,0 SAY Chr(2) + "KI503"
@1,0 SAY Chr(2) + "O0220"@1,0 SAY Chr(2) + "f221"
@1,0 SAY Chr(2) + "KW0256"
@1,0 SAY Chr(2) + "KI7" + Chr(1)
@1,0 SAY Chr(2) + "V0"
@1,0 SAY Chr(2) + "L"
@1,0 SAY Chr(2) + "H12"
@1,0 SAY Chr(2) + "PC"
@1,0 SAY Chr(2) + "A2"
@1,0 SAY Chr(2) + "D11"
@3,0 SAY Chr(2) + "141100000740070" + "GARMENTS"
@3,0 SAY Chr(2) + "141100000480088" + ":"
@3,0 SAY Chr(2) + "131100000390040" + "STYLE"
@3,0 SAY Chr(2) + "131100000250039" + "M.R.P."
@3,0 SAY Chr(2) + "131100000560042" + "SIZE"
@3,0 SAY Chr(2) + "131100000570090" + ":"
@3,0 SAY Chr(2) + "131100000400090" + ":"
@3,0 SAY Chr(2) + "131100000510107" + "TY"
@3,0 SAY Chr(2) + "131100000380107" + "DISCO"
@3,0 SAY Chr(2) + "131100000220107" + "RS."
@3,0 SAY Chr(2) + "1e4401600050042" + "B123"
@3,0 SAY Chr(2) + "232200000850205" + "STYLO"
@3,0 SAY Chr(2) + "131100000230090" + ":"
@3,0 SAY Chr(2) + "131100000220132" + "RTY"
@3,0 SAY Chr(2) + "^01"@3,0 SAY Chr(2) + "Q0001"
@3,0 SAY Chr(2) + "E"
SET PRINTER OFF
SET DEVICE TO SCREEN
SET PRINTER TO 
SET CONSOLE ON 

xfile="myprinter.txt"
xport="lpt1"
  STRTOFILE(CPCONVERT(CPCURRENT(1) ,CPCURRENT(2),FILETOSTR(m.xfile)),m.xfile)

DECLARE INTEGER CopyFile IN kernel32;
	STRING lpSrcFile, STRING lpDstFile, INTEGER bFail
CopyFile(m.xfile,m.xport, 0)