FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Enviar a imprimir a una impresora especifica
Posts: 29
Joined: Fri Jan 18, 2008 03:48 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 04:12 PM

Hola

Estoy tratanto de imprimir un documento y para ello utilizo la funcion printersetup(), la cual me permite seleccionar manualmente la impresora que deseo utiklizar...

La pregunta mia es:
Si tengo varias multiples impresoras compartidas en la red, hay alguna manera de enviar la impresion a una impresora determinada y asi evitar el dialogo de seleccion de la impresora... ?

Posts: 383
Joined: Tue Oct 11, 2005 01:01 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 04:41 PM

cSpooler := "El texto que aparece en la cola de impresion"
cStampante := "HP Laser 3700dn"

PRINT oPrn NAME (cSpooler) PREVIEW MODAL TO (cStampante)

Espero sea lo que necesitas.

Saludos.

Pedro Gonzalez
Posts: 29
Joined: Fri Jan 18, 2008 03:48 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 05:13 PM

Gracias por tu rapida respuesta y tu nteres en mi pregunta...

Intente hacer lo que dices, pero ahora me sale un dialogo diferente que me muestra las impresoras disponible y los numeros de paginas a imprimir...en este dialogo estuve observando que simpre muestra como preseleccion la ultima impresora que fue utilizada y no la que yo le estoy tratando de enviar...

Es posible evitar ese segundo dialogo y mandar a imprimir a la impresora que yo quiero sin dialogos intermedios ?

Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 07:55 PM

驴Estas seguro de haber puesto CORRECTAMENTE el modelo de impresora a la que deseas dirigir la impresi贸n?麓

驴Porque no pones aqu铆 el c贸digo que estas usando?

Un saludo



Manuel
Posts: 29
Joined: Fri Jan 18, 2008 03:48 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 08:26 PM
Hola nuevamente
El codigo que estoy utilizando es un poquito largo, pero aqui esta la parte que trat茅 de utilizar para imprimir:

cMensaje:="Prueba de impresion 001"
cImpresora:=(SUCURSA)->DIRIMPRE		//(SUCURSA)->DIRIMPRE me devuelve:"\\Desarrollo01\Epson FX-1170" sin las comillas

PRINT oPrn NAME (cMensaje) PREVIEW MODAL TO (cImpresora)


Como les dije...de esta manera me sale el dialogo propio de windows y la impresora que aparece preseleccionada no es la que yo quiero utilizar
Posts: 711
Joined: Thu Oct 06, 2005 09:57 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 10:07 PM
BenD wrote:
cImpresora:=(SUCURSA)->DIRIMPRE //(SUCURSA)->DIRIMPRE me devuelve:"\\Desarrollo01\Epson FX-1170" sin las comillas

PRINT oPrn NAME (cMensaje) PREVIEW MODAL TO (cImpresora)


Me imagino que la impresora Epson no es matricial.
Creo que el nombre de la impresora no es correcto (no lo encuentra). Lo mas facil es compartirla en cada estaci贸n, y darle un nuevo nombre, y este nombre ponerlo en sucursal->DIRIMPRE
Intenta tambien poner cImpresora := RTRIM (sucursal->DIRIMPRE)
Un saludo



Manuel
Posts: 29
Joined: Fri Jan 18, 2008 03:48 PM
Enviar a imprimir a una impresora especifica
Posted: Wed Mar 05, 2008 11:00 PM

La impresora si es de matriz de puntos...

Se permiten espacios en el nombre de impresora ????

Posts: 29
Joined: Fri Jan 18, 2008 03:48 PM
Enviar a imprimir a una impresora especifica
Posted: Thu Mar 06, 2008 10:26 PM

Perfecto....les cuento que ya funciono...era cuestion de darle trim a la ruta...mil gracias a todos por su ayuda

Ahora tengo un problemita relacionado con el dialogo de impresion de windows...
C贸mo puedo evaluar el resultado de la seleccion de impresoras en el dialogo de impresion de windows ?
(para saber si el usuario escogio alguna o cancel贸 la impresi贸n)

Continue the discussion