cArquivo := "NFe00"+cNota+".txt"
comando := "Del r:\"
Run (comando+""+cArquivo)
cArq := FCreate(cArquivo,0)
If cArq = -1
Mens("Erro na criacao do arquivo")
Return
Endif
Set Console Off
set printer to cArquivo
Set Device to printer
amigo a rotina funciona normalmente qdo executo pela rede ...
Pesquisa resultou em 2 ocorrências
- 20 Ago 2014 09:54
- Fórum: [x]Harbour
- Tópico: Set device to printer
- Respostas: 104
- Exibições: 30942
- 19 Ago 2014 12:25
- Fórum: [x]Harbour
- Tópico: Set device to printer
- Respostas: 104
- Exibições: 30942
Set device to printer
Olá.
sou clippeiro e fiz a conversão para harbour, legal praticamente compilei meus fontes, o problema que meu servidor ainda é XP, pois encontro o erro Dos Create 32, relacionado ao Set Printer to &cAqruivo, qual executo no meu servidor DBF (o executavel fica na minha maquina) roda normail, cria ...
sou clippeiro e fiz a conversão para harbour, legal praticamente compilei meus fontes, o problema que meu servidor ainda é XP, pois encontro o erro Dos Create 32, relacionado ao Set Printer to &cAqruivo, qual executo no meu servidor DBF (o executavel fica na minha maquina) roda normail, cria ...