如何判断两台计算机是否连通？（在线等）

[slchen]

我制作了一个网络软件。其中用到了控件，定时刷新程序。可是当网络（计算机与服务器）不通时，我想能够判断出来，然后可以不在刷新。请问怎样判断是否连通？

[pp616]

最简单的方法 connect一下。连不上就算不通

[sfengnet]

用PowerSock 查看当前地址是否是 0.0.0.0

如果是,则没联网

如果不是则联上了

[sfengnet]

Powersock1->LocalIP

[sfengnet]

说错了,是判断是否等于 127.0.0.1

[slchen]

我是想判断在程序运行过程中的断开，不是程序启动的时候。就是在时间控件执行功能前

[slchen]

情况：
服务器关闭和网络不同，主要是程序运行过程中如何知道现在与服务器连接不上，因为这个时候我的程序不停的提示：连接失败。太多了

[lurel]

http://www.pconline.com.cn/pcedu/empolder/gj/cb/0111/11503.html

[pp616]

为什么会提示？？？连接失败你不提示不就好了。设个timer 适当的时候再尝试连接。

[constantine]

可以自己定义一个包，定时发送，对方收到就要答复，你根据收到对方答复的包来确定，

[大大怪老张]

ping 一下，网上有ping的代码

[renfushen]

顶

[xrdsheng]

用ICMP协议（BCB中的TIdIcmpClient组件）

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "test_icmp.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

__fastcall TForm1::~TForm1()
{
//TODO: Add your source code here
}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
//
}
//---------------------------------------------------------------------------
void __fastcall TForm1::IdIcmpClient1Reply(TComponent *ASender,
const TReplyStatus &AReplyStatus)
{
if(AReplyStatus.ReplyStatusType == rsEcho)
{
Memo1->Lines->Add("ok");
}
else
{
Memo1->Lines->Add("error");
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btn_StartPingClick(TObject *Sender)
{
int i;

IdIcmpClient1->Host = edt_IpAddr->Text ;
while(1)
{
IdIcmpClient1->Ping() ;
::Sleep(2000);
}
}
//---------------------------------------------------------------------------

[xrdsheng]

.h文件

//---------------------------------------------------------------------------

#ifndef test_icmpH
#define test_icmpH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <IdBaseComponent.hpp>
#include <IdComponent.hpp>
#include <IdIcmpClient.hpp>
#include <IdRawBase.hpp>
#include <IdRawClient.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published: // IDE-managed Components
TIdIcmpClient *IdIcmpClient1;
TEdit *edt_IpAddr;
TMemo *Memo1;
TButton *btn_StartPing;
TButton *btn_StopPing;
void __fastcall FormCreate(TObject *Sender);
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
void __fastcall IdIcmpClient1Reply(TComponent *ASender,
const TReplyStatus &AReplyStatus);
void __fastcall btn_StartPingClick(TObject *Sender);
private: // User declarations
public: // User declarations
__fastcall TForm1(TComponent* Owner);
__fastcall ~TForm1();
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif