Fórum comunicacao socket #321042
10/05/2006
0
funcionando sem problemas, mas em alguns momentos ele da a mensagem
asynchounos error socket 153, como se o servidor estivesse fora do ar. mas
ele esta no ar. reinicia o cliente e volta a funcionar normal. alguem ja viu
alguma coisa?
Logos
Curtir tópico
+ 0Posts
10/05/2006
Ipc$
Gostei + 0
10/05/2006
Araujojunior
Gostei + 0
10/05/2006
Logos
Gostei + 0
12/05/2006
Massuda
Gostei + 0
12/05/2006
Logos
var
Txt:string;
Arquivo:Textfile;
Nomedolog:string;
a:integer;
begin
rx1.Deactivate;
if clientsocket.Active then begin
TXT:=SOCKET.ReceiveText;
ret:= TStringList.create;
Log(´Recebendo Arquivo - ´+socket.RemoteAddress+´:´+inttostr(socket.RemotePort)+´ Inicio:´+DateTimeToStr(Now));
if fileexists(narq3) then deletefile(narq3);
Log(´Recebendo Arquivo - ´+socket.RemoteAddress+´:´+inttostr(socket.RemotePort)+´ Inicio:´+DateTimeToStr(Now));
Log(´Fim Comunicacao : ´+EDTIP.TEXT+´:´+SEDTPROTA.text+´ - Pdv ´+edit13.text+´ Inicio:´+DateTimeToStr(Now));
sBreakApart(txt, ´,´, ret);
ret.SaveToFile(narq3);
RET.FREE;
log(TXT);
Log(´----------------------------------------------------------------------´);
end;
rx1.Activate
existe algum erro ai?
Gostei + 0
12/05/2006
Massuda
Gostei + 0
12/05/2006
Logos
Gostei + 0
12/05/2006
Logos
obrigado a todos.
Gostei + 0
12/05/2006
Ipc$
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)