Mini Printer Ethernet

[servicomver]

Hola, esperando que todos ustedes y su familia se encuentren bien de salud, requiero nuevamente de su valiosa ayuda:

Tengo varias mini printer Ethernet instaladas en la red, las cuales tienen por ejemplo:
192.168.1.100
192.168.1.101

¿ como puedo hacer para primero checar que esta en linea ?, lo hago con un ping guardando el resultado en archivo de texto y luego lo leo, pero es algo lento el proceso.

Una vez que se comprueba que esta en linea la mini printer como puedo dirigir la impresión a cada una de ella ?

Gracias

[armando.lagunas]

Hola, para dirigir la impresión a una impresora especifica, donde <Nombre Impresora> es la que tienes definida en Windows

Code: Select all  Expand view  RUN

PRINTER oPrn NAME "Etiqueta" TO <Nombre Impresora>

Saludos

[servicomver]

Gracias por responder, pero si la mini printer no esta en windows solo esta conectada a un switch i funciona por una IP fija, en lugar del nombre pondría la ip ?

[servicomver]

Alguna idea de cómo mandar a imprimir a una mini printer ethernet ?

[Willi Quintana]

HOla, prueba con un ping

[servicomver]

Gracias por responder, el Ping si responde, quiero saber que debo de hacer para mandar a imprimir directamente a esa mini printer, la impresora no se instala en ninguna PC solo se conecta a un switch a la misma red.

\\192.268.1.20 es la Ip de la mini printer

Come sería la instrucción para mandar a imprimir a ella ? Y qué clase funcionaria ?

Gracias

[gabo]

Hola
1.- Instalar la impresora (para mi es la mejor opcion)
2.- Usar el comando net use

Code: Select all  Expand view  RUN

  IF WriteStream( cFileTemp, cString )
     WIN_PrintFileRaw( cImpresoraTiquet, cFileTemp, "Comanda MESA: "+AllTrim(AppData:cNumeroMesaTPV) )
     IF hb_FileExists( cFileTemp )
        FErase( cFileTemp )
     ENDIF
  ENDIF

//------------------------------------------------------------------------------
FUNCTION WriteStream( cFile, cStream )
  LOCAL nHandle

  nHandle := FCreate( cFile )
  IF FError() <> 0
     RETURN( .F. )
  ENDIF

  FWrite( nHandle, cStream, Len(cStream) )
  FClose( nHandle )

RETURN ( FError() == 0 )

 

Saludos

[servicomver]

Ok, gracias lo intentaré como me indicas. Saludos