La Web del Programador: Comunidad de Programadores
 
    Pregunta:  28360 - IMPRESION EN DOS DESDE PB
Autor:  Adolfo Chairez
Como se puede imprimir en DOS una DW, es decir sin utilizar a windows.

  Respuesta:  Adolfo Chairez
Este es el codigo para imprimir directamente al puerto LPT1, es decir en modo DOS.
integer li_archivo,li_i,li_j
string ls_depto

li_archivo = FileOpen("LPT1",LineMode!,Write!)

if li_archivo = -1 then
messagebox("Error","No se pudo abrir el puerto lpt1")
else
li_j = dw_reporte.rowcount()
Filewrite(li_archivo,"PRUEBA DE ESCRITURA EN LPT1")
for li_i = 1 to li_j
ls_depto = dw_reporte.getitemstring(li_i,"emp_d03")
FileWrite(li_archivo,ls_depto)
next
FileClose(li_archivo)
end if

Pero si la impresora esta en la red haz lo siguiente:
1.- Dar de alta una impresora de Red

2. - Examinamos la red para encontrar al equipo donde este conectada la pc

3.- Una vez seleccionada la impresora, respondemos que Si a la pregunta de ¿Desa imprimir desde programas basados en MS-DOS?

4.- En el siguiente cuadro de dialogo hacemos click sobre el boton de Capturar puerto de impresora y seleccionamos el purto LPT1 con destino a la ruta que previamente habiamos elegido.

5.- Finalmente nos preguntara en los siguientes cuadros de dialogo el nombre de la impresora si deseamos que este por default y que si deseamos imprimir una pagina de prueba, conteste lo que Ud. Considere y con esto podra imprimir a traves de la red en modo DOS.