關於Ping ICMP疑問 |
|
答題得分者是：RaynorPao
|
|
jarkin
一般會員   發表：17 回覆：7 積分：4 註冊：2006-08-15 發送簡訊給我 |
請問各位前輩,我有一支Ping的程式發現一個問題,
當我在Edit裡輸入"tw.yahoo.com"它會顯示"已連線", 但是當我輸入127.0.0.1的時候他卻顯示"未連線"??? 可是我在命令提示字元理Ping 127.0.0.1是正常的,為 何卻無法判斷?? [code cpp] //--------------------------------------------------------------------------- #include #pragma hdrstop #include "Main.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TTfrmPing *TfrmPing; //--------------------------------------------------------------------------- __fastcall TTfrmPing::TTfrmPing(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TTfrmPing::btnPingClick(TObject *Sender) { int i; ICMP->OnReply = ICMPReply; ICMP->ReceiveTimeout = 1000; btnPing->Enabled = False; try { ICMP->Host = edtHost->Text; for(i = 1; i <= 4; i ) { ICMP->Ping(); Application->ProcessMessages(); // Sleep(1000); } } __finally { btnPing->Enabled = True; } } //--------------------------------------------------------------------------- void __fastcall TTfrmPing::ICMPReply(TComponent *ASender, const TReplyStatus &AReplyStatus) { // TODO: Check for error on ping reply (ReplyStatus->MsgType?) if(AReplyStatus.MsRoundTripTime == 0) { Edit1->Text="未連線"; } else { Edit1->Text="已連線"; } } //--------------------------------------------------------------------------- [/code] 編輯記錄
jarkin 重新編輯於 2008-05-14 17:39:51， 註解 無‧
|
|
RaynorPao
版主   發表：139 回覆：3622 積分：7025 註冊：2002-08-12 發送簡訊給我 |
發表時間：2008-05-14 17:38:05
IP:61.228.xxx.xxx 訂閱
系統時間：2024-04-26 6:05:50
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |