Guest ANA RUBIA Postado Agosto 5, 2005 Denunciar Share Postado Agosto 5, 2005 BOM DIA GALERA,TENHO UM SISTEMA QUE GRAVA UM ARQUIVO EM UMA PASTA QUE ESTA LOCALIZADA NA REDE.....GOSTARIA DE QUE QUANDO A REDE ESTIVESSE FORA DO AR FOSSE DADA UMA MSG ALERTANDO SOBRE ISSO...EXISTE ALGUMA FUNCAO....ALGUMA COISA QUE POSSA ME AJUDAR...GRATA PELA ATENÇÃO.BJUS Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Kikonanet Postado Agosto 5, 2005 Denunciar Share Postado Agosto 5, 2005 Olá Ana,Dê uma olhada no componente IdIcmpClient (Palheta Indy Clients).Ex: Mostra em um memo o ping! procedure TForm1.ICMPReply(ASender: TComponent; const ReplyStatus: TReplyStatus); var sTime: string; begin if (ReplyStatus.MsRoundTripTime = 0) then sTime := '<1' else sTime := '='; Memo1.Lines.Add(Format('%d bytes from %s: icmp_seq=%d ttl=%d time%s%d ms', [ReplyStatus.BytesReceived,ReplyStatus.FromIpAddress,ReplyStatus.SequenceId, ReplyStatus.TimeToLive,sTime,ReplyStatus.MsRoundTripTime])); end; procedure TForm1.Button1Click(Sender: TObject); var i: integer; begin IdIcmpClient1.OnReply:=ICMPReply; IdIcmpClient1.ReceiveTimeout := 1000; IdIcmpClient1.Host := 'www.terra.com.br'; for i := 1 to 4 do begin IdIcmpClient1.Ping; end end; Olhe tmb este link:http://www.koders.com/delphi/fidEFF6010C71...89F3421490.aspxAbs.Kiko Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Churc Postado Agosto 5, 2005 Denunciar Share Postado Agosto 5, 2005 ta copiando usando o Copyfile normal?cola a função que copia, ping é útil para saber se a máquina está ligada, agora você pode dar a mensagem de erro usando o Result do copyfile, ai mesmo que se a máquina estive ligada e der erro ao copiar o usuário do sistema vai ficar sabendo que não copiou...abraços Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest ANA RUBIA
BOM DIA GALERA,
TENHO UM SISTEMA QUE GRAVA UM ARQUIVO EM UMA PASTA QUE ESTA LOCALIZADA NA REDE.....GOSTARIA DE QUE QUANDO A REDE ESTIVESSE FORA DO AR FOSSE DADA UMA MSG ALERTANDO SOBRE ISSO...EXISTE ALGUMA FUNCAO....ALGUMA COISA QUE POSSA ME AJUDAR...
GRATA PELA ATENÇÃO.
BJUS
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.