Page 1 of 1

AYUDA URGENTE - URGENTE

Posted: Thu Oct 04, 2007 6:15 pm
by 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

Re: AYUDA URGENTE - URGENTE

Posted: Thu Oct 04, 2007 7:43 pm
by mantonio_08
Amigo:

Que tipo de Red usas?





jcaro wrote: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

Posted: Thu Oct 04, 2007 7:58 pm
by jcaro
Utilizo red windows con tcp/ip !!

Alguna idea ??

Posted: Thu Oct 04, 2007 8:09 pm
by 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

Posted: Thu Oct 04, 2007 8:44 pm
by 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,

Posted: Thu Oct 04, 2007 8:46 pm
by ricardog
Que bueno que pudiste solucionar tu problema.

Saludos.

Posted: Fri Oct 05, 2007 8:32 pm
by 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

Posted: Sat Oct 06, 2007 12:27 am
by 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

Posted: Tue Oct 09, 2007 6:18 pm
by 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 ,

Posted: Tue Oct 09, 2007 8:45 pm
by 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..