FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour problemas con impresoras okidata usb
Posts: 185
Joined: Thu Nov 17, 2005 12:48 AM
problemas con impresoras okidata usb
Posted: Mon Aug 18, 2014 07:16 PM

Amigos,

Tengo 2 impresoras Okidata ml320, de aquellas que solo se conectan vía USB, conectadas en mismo PC, una para imprimir facturas y otra Boletas, desde el programa las capturo y las dejo asignadas para cada documento con la función aGetPrinters(), luego todo funciona OK (PRINTER oPrn to cPuerto) ;, el problema es que cuando se apaga el PC y se inicia el programa al día siguiente ya no imprime y tengo que volver a probar cambiando de USB los cables, si alguien tiene alguna experiencia con esto agradeceré vuestros comentarios.

Luis Alfonso Fuentes Guerrero

FWH 11.06 xHarbour 1.2.1 BCC55 WorkShop
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Re: problemas con impresoras okidata usb
Posted: Tue Aug 19, 2014 06:56 PM

haslo asi
cImpresora:= tOleAuto():New("ADODB.Recordset")
cImpresora:CursorLocation(3)
cImpresora:Open("SELECT * FROM impresora WHERE ma_codi='"+ AllTrim(cPuerto)+ "' ORDER BY ma_codi", oConexion, 1, 3)
If (cImpresora:RecordCount) # 0
cPrn:=AllTrim(ADOField(cImpresora,"ma_desc"))
Endif
ADO Close cImpresora

oPrn:=PrintBegin("Impresión de documentos",.F.,lPrv,cPrn,.T.)

saludos

Posts: 185
Joined: Thu Nov 17, 2005 12:48 AM
Re: problemas con impresoras okidata usb
Posted: Tue Aug 19, 2014 07:29 PM

Gracias por tu respuesta

Como obtengo el oConexion, significa que antes debería abrir una conexion con ADO? y a que servidor? o solo defino como local "oConexion"?

Gracias por los comentarios

Luis Alfonso Fuentes Guerrero

FWH 11.06 xHarbour 1.2.1 BCC55 WorkShop
Posts: 1710
Joined: Tue Oct 28, 2008 06:26 PM
Re: problemas con impresoras okidata usb
Posted: Tue Aug 19, 2014 09:00 PM
Lafug

Lo mejor es compartirla ambas Ej. OKIFAC y OKIBOL
Enviar asi:
Code (fw): Select all Collapse
PrintFileRaw( "\\NOMBREPC\OKIFAC", ArchivoAimprimir )


Saludos,

Adhemar
Saludos,



Adhemar C.
Posts: 537
Joined: Mon Jan 16, 2006 03:42 PM
Re: problemas con impresoras okidata usb
Posted: Wed Aug 20, 2014 02:14 PM

Amigo lo que yo hago es guardar seleccionar la impresora al documento q corresponda.
por ejemplo tengo una tabla llamada impresora

codigo detalle Impresora
01 Factura aqui le pongo la impresora q corresponda
02 Boleta
03 Guias
04 Etc

y luego la llamo segun que documento necesito

cual es tu correo
saludos

Posts: 185
Joined: Thu Nov 17, 2005 12:48 AM
Re: problemas con impresoras okidata usb
Posted: Fri Aug 22, 2014 04:28 AM

Gracias a todos por sus respuestas, voy a seguir probando

jbrita, mi correo :luisalfonsofuentesg@gmail.com

Luis Alfonso Fuentes Guerrero

FWH 11.06 xHarbour 1.2.1 BCC55 WorkShop

Continue the discussion