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. |