- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Imprimir via porta USB com duas impressoras térmicas
×
Linguagem de Programação ADVPL
Perguntas Imprimir via porta USB com duas impressoras térmicas
- jeduardomneto
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 11
- Obrigados Recebidos: 0
5 anos 2 semanas atrás #32773
por jeduardomneto
Bom dia pessoal !
Instalei duas impressoras térmicas(ALLEGRO) num computador utilizando duas portas USB.
Numa impressora utilizo etiquetas grandes e na outra etiquetas pequenas.
Via programação ADVL quero imprimir na devida impressora o modelo de etiqueta selecionada.
Meu problema ocorre exatamente nesse ponto, a impressão acontece somente numa impressora, independente do modelo de etiqueta selecionada.
Como endereçar a impressão via programa, ora para USB001, ora para USB002 ?
Instalei os drivers das impressoras da seguinte forma:
USB001 = Alegro Pro com nome de compartilhamento "ETIQUETA_GRANDE"
USB002 = Datamax o'neil M-402 com nome de compartilhamento "ETIQUETA_PEQUENA"
Criei um Bat com as seguintes linhas de comando:
NET USE %1 /del
NET USE %1 %2
Código ADVPL:
...
cDirBat := "\\gaviao\Public\Atalhos\SETA_IMPR_ALLEGRO.BAT"
Do Case
Case cPorta == ‘1‘
cPorta := ‘USB001‘
shellExecute("Open",cDirBat,cPorta + " \\T-TI-03\ETIQUETA_GRANDE","D:\",1)
OtherWise // cPorta == 2
cPorta := ‘USB002‘
shellExecute("Open",cDirBat,cPorta + " \\T-TI-03\ETIQUETA_PEQUETA","D:\",1)
EndCase
MSCBPRINTER("ALLEGRO",cPorta,,10,.F.,,,,,,.F.,)
...
Desde já agradeço a atenção dos colegas.
Instalei duas impressoras térmicas(ALLEGRO) num computador utilizando duas portas USB.
Numa impressora utilizo etiquetas grandes e na outra etiquetas pequenas.
Via programação ADVL quero imprimir na devida impressora o modelo de etiqueta selecionada.
Meu problema ocorre exatamente nesse ponto, a impressão acontece somente numa impressora, independente do modelo de etiqueta selecionada.
Como endereçar a impressão via programa, ora para USB001, ora para USB002 ?
Instalei os drivers das impressoras da seguinte forma:
USB001 = Alegro Pro com nome de compartilhamento "ETIQUETA_GRANDE"
USB002 = Datamax o'neil M-402 com nome de compartilhamento "ETIQUETA_PEQUENA"
Criei um Bat com as seguintes linhas de comando:
NET USE %1 /del
NET USE %1 %2
Código ADVPL:
...
cDirBat := "\\gaviao\Public\Atalhos\SETA_IMPR_ALLEGRO.BAT"
Do Case
Case cPorta == ‘1‘
cPorta := ‘USB001‘
shellExecute("Open",cDirBat,cPorta + " \\T-TI-03\ETIQUETA_GRANDE","D:\",1)
OtherWise // cPorta == 2
cPorta := ‘USB002‘
shellExecute("Open",cDirBat,cPorta + " \\T-TI-03\ETIQUETA_PEQUETA","D:\",1)
EndCase
MSCBPRINTER("ALLEGRO",cPorta,,10,.F.,,,,,,.F.,)
...
Desde já agradeço a atenção dos colegas.
Por favor Acessar ou Registrar para participar da conversa.
- clistenis
- Desconectado
- Membro Especialista
Menos
Mais
- Postagens: 97
- Obrigados Recebidos: 0
5 anos 2 semanas atrás - 5 anos 2 semanas atrás #32775
por clistenis
Respondido por clistenis no tópico Imprimir via porta USB com duas impressoras térmicas
Amigo aqui eu também trabalho com impressora datamax e conectadas via USB no mesmo PC.
Porém não utilizo o net use e sim o DOSPRINT, mapeio a impressora X nas portas virtuais (LPT1) e a impressora Y na porta virtual (LPT2), e configuro as portas no MSCBPRINTER.
Se quiser fazer o download do DOSPRINT, segue ai:
www.dropbox.com/s/gs234utzv5ezccm/DOSPrintUI.rar?dl=0
Se precisar chama ai:
SKYPE: clistenis_batista
Porém não utilizo o net use e sim o DOSPRINT, mapeio a impressora X nas portas virtuais (LPT1) e a impressora Y na porta virtual (LPT2), e configuro as portas no MSCBPRINTER.
Se quiser fazer o download do DOSPRINT, segue ai:
www.dropbox.com/s/gs234utzv5ezccm/DOSPrintUI.rar?dl=0
Se precisar chama ai:
SKYPE: clistenis_batista
Ultima edição: 5 anos 2 semanas atrás por clistenis. Razão: Adição de contato
Por favor Acessar ou Registrar para participar da conversa.
- jeduardomneto
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 11
- Obrigados Recebidos: 0
5 anos 2 semanas atrás #32776
por jeduardomneto
Respondido por jeduardomneto no tópico Imprimir via porta USB com duas impressoras térmicas
Bom dia Clistenis !
Obrigado pela resposta, vou testar hoje mesmo e já lhe retorno.
Valeu.
Obrigado pela resposta, vou testar hoje mesmo e já lhe retorno.
Valeu.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Imprimir via porta USB com duas impressoras térmicas
Tempo para a criação da página:0.110 segundos