Não imprime no Windows XP

[Josephalb]

NÃO ESTOU CONSEGUINDO IMPRIMIR NO WINDOWS XP PROFESSIONAL, QUANDO ENVIOU QUAL QUER IMPRESSÃO O COMPUTADOR TRAVA E NÃO IMPRIME.

ESTOU USANDO ALGUMAS DICAS QUE CONSEGUIR AQUI NO FÓRUM MAIS ESTÁ DANDO ALGUMAS MENSAGEM DE ERRO.

C:\>NET USE LPT1: \\SERVIDOR\EPSON LX-300 /YES
Ocorreu o erro de sistema 66.

O tipo de recurso da rede está incorreto.


C:\>NET USE Z: \\SERVIDOR\C /YES
Ocorreu o erro de sistema 85.

O nome do dispositivo local já está em uso.


C:\>Z:

[sygecom]

C:\>NET USE LPT1: \\SERVIDOR\EPSON LX-300 /YES
Ocorreu o erro de sistema 66.

O tipo de recurso da rede está incorreto.

Tente mudar o nome do compartilhamento para apenas: "epson"

C:\>NET USE Z: \\SERVIDOR\C /YES
Ocorreu o erro de sistema 85.

O nome do dispositivo local já está em uso.

Isso é mapeamento da pasta compartilhada e não da impressora. Deve usar o comando acima, porem o nome da impressora não pode ter espaço em branco.

[Maligno]

Opcionalmente, use a função NetRedir() da CATools. Ela faz o mesmo serviço.

[Gilberto M Silva]

Mixter Maligno, Vossa Sabiencia, poderia postar dedo a dedo como se usa a função NetRedir() no prg.?

[Pablo César]

Eu acostumo fazer:

Código: Selecionar todos

  IF FILE("CAIXA_01.PRN")
      VTERM:=UPPER(NETNAME())
      IF !(VTERM="CREDIARIO_01") // não direciono este terminal pois é onde está conectada a impressora
         NETREDIR("LPT2","\\CREDIARIO_01\CREDIARIO")
      ENDIF
      COPY FILE("CAIXA_01.PRN") TO ("LPT2")
      DELETE FILE("CAIXA_01.PRN")
   ENDIF

Não sei se era isso que você procurava, espero ter ajudado.

[Maligno]

Desculpe, Gilberto. Não foi falta de interesse em ajudar. Sua mensagem me passou batida. Realmente não vi. Felizmente o Pablo resolveu a dúvida.