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

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

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