Sockets(tcp ip)

[Stainle]

Bom dia, preciso usar este comando via socket(tcp ip), porém como faço para enviar o arquivo cTXTSefaz da máquina remota para a máquina onde se encontra o ACBrMonitorPlus? e assim usar este comando NFe.CriarNFeSEFAZ(cTXTSefaz,[bRetornaXML]) via Sockets(TCP/IP), será que preciso criar um Servidor de Socket só para receber o arquivo?

grato

Stainle

 

[Sérgio Assunção]

O ACBrMonitorPlus passa a ser o "servidor de socket", basta apenas a sua aplicação enviar os comandos via tcp/ip.

[Stainle]

mesmo que o arquivo que gero para o emissor sefaz estar na máquina remota? por exemplo, gero o arquivo c\emissorsefaz\sefaz.txt na máquina 192.168.25.100 e o acbrmonitorplus está na máquina 192.168.25.189, o arquivo será transportado para a máquina 192.168.25.189 ?

é isto?

grato

Stainle

[André Ferreira de Moraes]

Vc envia no comando o conteúdo do arquivo e não o path.

[evandromira]

E o que acontece se mais de uma maquina enviar ao mesmo tempo o comando?

[Stainle]

Então, o que eu quero saber é como enviar o conteúdo do arquivo ?

[Nelson A Sousa]

6 horas atrás, Stainle disse:

Então, o que eu quero saber é como enviar o conteúdo do arquivo ?

Olá,

Verifica o método que utiliza pra conectar o socket.

Nele você passa o IP da máquina onde está o MonitorPlus.

Muito provavelmente o seu deve estar 127.0.0.1, vai ter que mexer aí.

[Stainle]

Acabei de descobrir neste momento, como o arquivo que tenho que passar é um TXT eu joguei ele para dentro de um MEMO, e subi para a máquina que tem o ACBrMonitorPlus

  Memo2.Clear;
  Memo2.Lines.LoadFromFile('c:\stainle_ss\nfe300\nfesefaz.txt');
  cNomeArq := 'c:\stainle_ss\nfe300\nfesefaz.txt';
  comando := 'NFe.SaveToFile(' + cNomeArq + ', ' + Memo2.Lines.Text + ')' + sLineBreak + '.' + sLineBreak;
  ClientSocket1.Socket.SendText(comando);