COMANDO OPEN PARA PORTA VIRTUAL DE IMPRESSORA USB

PPGATFC 25/03/2025 14:02:57
#504887
Alterado em 25/03/2025 14:21:28 Estou utilizando o comando Open para abrir porta virtual de impressoras USB que funciona perfeitamente conforme abaixo:

Open "\\vmxp\generic" For Output As #1

Pretendo agora utilizar este mesmo comando recebendo como parâmetro a path desta porta conforme abaixo porém não esta funcionando e recebo a mensagem de "Path not found":

txtnomeporta.Text = "\\vmxp\generic"

Open "'\\" & txtnomeporta.Text & "'" For Output As #1

Alguem saberia como utilizar este comando Open recebendo a informação da porta do usuario como parametro?

Obrigado e no aguardo.
3SLUIS 25/03/2025 18:43:01
#504888 Resposta escolhida
txtnomeporta.Text = "\\vmxp\generic"

Open "'\\" & txtnomeporta.Text & "'" For Output As #1

você já passou \\ no campo txt e no open esta colocando novamente?
ta ficando: open "\\\\vmxp\generic" for Output as #1
PPGATFC 26/03/2025 08:19:17
#504889
Olá 3SLUIS!

Na verdade o código que estou desenvolvendo esta exatamente desta maneira abaixo:

txtnomeporta.Text = "\\vmxp\generic"

Open "''" & txtnomeporta.Text & "'" For Output As #1

Porém ainda com exibição de erro informando Path not found
3SLUIS 26/03/2025 09:45:10
#504890
nesse caso é so passar assim: Open txtnomeporta.Text For Output As #1
PPGATFC 26/03/2025 11:32:59
#504891
Perfeito meu amigo 3SLUIS, funcionou!!!!!!

Muito obrigado pela ajuda!!!!!
Tópico encerrado , respostas não são mais permitidas
Voltar