Impressão remota via WEB

Para quem tem um aplicativo rodando em um servidor Apache, escrito em CGI/perl ou PHP, e deseja imprimir em uma impressora matricial remota de nota fiscal por exemplo, a solução que desenvolvi pode ser usada tanto em Linux quanto em Windows e é totalmente livre.

[ Hits: 30.405 ]

Por: Arnaldo Luiz Estevao em 05/01/2007


webpserver.bat (cliente Windows)



@echo off
rem este arquivo deve ser chamado no autoexec.bat ou por um atalho no menu iniciar
rem crie um diretório dentro do c: chamado fila
rem mkdir c:\fila
rem depois grave este arquivo la dentro
rem abaixe o arquivo wget.exe em
rem http://users.ugent.be/~bpuype/cgi-bin/fetch.pl?dl=wget/wget.exe
rem e copia para o diretório c:\fila também
rem você pode substituir lpt1 pela porta necessária
rem ou substituir copy c:\fila.txt lpt1
rem por print c:\fila\t.txt \\contabilidade\notafiscal para enviar o arquivo
rem para dentro de uma fila remota na rede local

echo Servidor de impressão
mkdir c:\fila > nul:
:inicio
c:\fila\wget -O c:\fila\t.txt http://seusite.com.br/cgi-bin/webpserver.cgi?fila=nostafiscal
find "0" c:\filat.txt
if errorlevel 1 goto inicio
Echo Imprimindo -----------------------------------------------------
type c:\fila\t.txt
copy c:\fila\t.txt lpt1
goto inicio
Página anterior     Próxima página

Páginas do artigo
   1. Servidor de impressão
   2. webpserver.bat (cliente Windows)
   3. rc.webpserver (cliente Linux)
Outros artigos deste autor

XML de NF-e ou CT-e ou MDF-e - Como validar usando os pacotes de esquemas do Governo

Autenticação mútua SSL em servidores de NF-e e CT-e

Phperl, minha gambiarra para usar Perl como se fosse PHP

Instalando Slackware 11.0 em um pendrive

Leitura recomendada

Manipulação de sockets em Perl usando o IO::Socket::INET

Instalação de MRTG em ambiente Windows

Gerenciando redes com Perl e SNMP

Enviando notificações do Nagios para o MSN

Instalação de MRTG em ambiente Windows

  
Comentários
[1] Comentário enviado por poleto em 06/01/2007 - 03:19h

Caro,

Interessante o script.
Vou dar a minha pequena contribuição:

A penúltima linha do script Perl não roda no windows

system("rm $file") ;

Pois faz uma chamada a um comando de sistema para remover o arquivo, sendo que no windows não existe o comando 'rm', no mesmo o comando seria 'del'.

Essa foi a linha que vi de imediato, além das que você já citou.

Abraços,
Poleto

[2] Comentário enviado por jeffersondantas em 12/04/2007 - 18:28h

BOM

[3] Comentário enviado por lipecys em 20/05/2008 - 19:42h

Ótimo artigo, foi pro favoritos.

[4] Comentário enviado por regguerreiro em 04/03/2015 - 15:27h


Ola boa tarde, estou utilizando servidor linux, banco de dados mysql e a linguagem de programação é o php, preciso fazer uma impressão direta na impressora via browser na maquina do cliente. A impressora esta na porta lpt1 e o site esta no servidor. nunca utilizei o linux e nem o slackware... poderiam me dar umas dicas/ajuda... me passem o contato via skype, facebook, whatsapp.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts