AYUDA URGENTE - URGENTE

[jcaro]

Estoy usando la clase TDosPrint de Ignacio y funciona OK.

Mi problema grave es como se puede imprimir en una impresora en red.
Ejemplo \\server\laser1

( usando la misma clase o similar )

Utilice poner en los terminales la instruccion:

net use lpt1 \\server\epson1
net use lpt2 \\server\epson2

pero no funciona !!

Alguien conoce como hacerlo o alguno truco magico u otra clase,
me urge una ayuda. Disculpen mi apuro, pero es algo apurado (

Uso esta clase por la velocidad para imprimir boletas, vales, etc.


Saludos

[mantonio_08]

Amigo:

Que tipo de Red usas?

Estoy usando la clase TDosPrint de Ignacio y funciona OK.

Mi problema grave es como se puede imprimir en una impresora en red.
Ejemplo \\server\laser1

( usando la misma clase o similar )

Utilice poner en los terminales la instruccion:

net use lpt1 \\server\epson1
net use lpt2 \\server\epson2

pero no funciona !!

Alguien conoce como hacerlo o alguno truco magico u otra clase,
me urge una ayuda. Disculpen mi apuro, pero es algo apurado (

Uso esta clase por la velocidad para imprimir boletas, vales, etc.


Saludos

[jcaro]

Utilizo red windows con tcp/ip !!

Alguna idea ??

[ricardog]

Yo lo utilizo de esta forma en un bat

net use LPT1 \\Fabian\impresora5
Dsinco.exe
net use lpt1 /delete


En cada una de las terminales.

Espero que te sirva

[jcaro]

GRACIAS Ricardo funciono OK !!

Si miras yo hacia lo mismo, pero no ponia en el bat el EXE.
Yo lo ponia en el config del terminal, los capture.

Lo hice asi y funciono perfecto.

TE agradesco mucho la ayuda, estaba instalando donde el cliente,
y no podia solucionar esto.

Saludos,

[ricardog]

Que bueno que pudiste solucionar tu problema.

Saludos.

[jacgsoft]

no es necesario usar NET USE LPT1, yo lo uso asi:

Select A
Use Configur

G_port:=A->Puerto ** ( \\Servidor\Hp-6300)

oPrn:=TDosPrn():New(G_port)
..
..
..
oPrn:End()

Si por algun motivo cambian la impresora o quiero imprimir de modo local simplemente modifico el Campo PUERTO de la tabla Configur


Jaime

[mantonio_08]

Amigo:

Comparto como te indica "jacgsoft", yo lo uso igual, tengo una base donde puedo definir las impresoras y los diferentes puertos para cada uno, incluso si esta estuviera usando una red novell, teniendo una opcion el usuario donde pueda seleccionar la impresora a usar, con un browser y posteriormente captura la printer deseada. Esto me permite incluso poder imprimir en diferentes colas en un mismo programa, por ejemplo, una Factura para el vendedor y una orden de despacho a bodega.

En lo particular, no me gustan los BAT, me recuerda DOS, el sistema debe ser mas dinamico.

Bueno, es solo mi forma de programar y una altrnativa mas.

Saludos,
Antonio

[jcaro]

GRACIAS Mantonio y jacksoft :

Me parece muy buena idea tambien, la voy a probar como funciona.

Disculpen no responder pronto, pero no habia podido, por estar fuera de mi ciudad.

Saludos ,

[Patricio Avalos Aguirre]

Puedes Usar la libreria CT.LIB y utilizar las funciones de red

Code: Select all  Expand view  RUN

//NETREDIR( cLocalDevice, cSharedDevice, [ cPassword ], [ lShowError] ) -> lSuccess

ALERT(NETREDIR( "LPT1", "\\REPUESTOS\OK320TURBO" ))
//seria con net use lpt1: \\repuestos\ok320turbo

//si quieres saber si existe el puerto compartido..
//NETRMTNAME( cLocalDevice ) -> cSharedName
ALERT(NETRMTNAME( "LPT1" ))

//Si quieres eliminar una conexion,..
//NETCANCEL( <cLocalDevice> ) -> lReleased
alert( NETCANCEL( "LPT1" ) )

Ahi puedes jugar con esas funciones..