VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

檢測網路是否通暢(轉貼)

 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
Ruey



註冊時間: 2003-03-12
文章: 1698
來自: tunglo

第 1 樓

發表發表於: 星期日 八月 24, 2003 5:16 pm    文章主題: 檢測網路是否通暢(轉貼) 引言回覆

请参考:
*!****************************
代碼:
func getconns 

DECLARE Integer InternetGetConnectedState IN wininet.dll ; 
  Integer @lpdwFlags, Integer dwReservednReserved 
local m_getstate 
m_getstate = InternetGetConnectedState( 7, 0 )   

do case 
case m_getstate=0 
     wait wind "不通!" nowait 
case m_getstate=1   
     wait wind "拨号已经连通!" nowait 
case m_getstate=2 
     wait wind "网络已经连通!" nowait 
case m_getstate=4 
     wait wind "通过代理连通!" nowait 
otherwise 
     wait wind "非0124!"  nowait 
endcase   

return m_getstate

_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!

學會VFP使用者社區的搜尋,Code才會更有趣~
#############################


Ruey 在 星期六 八月 30, 2003 1:35 pm 作了第 3 次修改
回頂端
檢視會員個人資料 發送私人訊息
奔跑的愛情



註冊時間: 2003-08-28
文章: 27


第 2 樓

發表發表於: 星期四 八月 28, 2003 4:25 pm    文章主題: 引言回覆

收下!
_________________
delphi vf sql
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 參觀發表人的個人網站 MSN Messenger
covery



註冊時間: 2003-09-09
文章: 3


第 3 樓

發表發表於: 星期三 九月 10, 2003 8:43 pm    文章主題: 引言回覆

不錯ㄛ!!
是不是還有其它的 m_getstate 狀況 ??
回頂端
檢視會員個人資料 發送私人訊息
covery



註冊時間: 2003-09-09
文章: 3


第 4 樓

發表發表於: 星期三 九月 10, 2003 8:43 pm    文章主題: 引言回覆

不錯ㄛ!!
是不是還有其它的 m_getstate 狀況 ??
回頂端
檢視會員個人資料 發送私人訊息
Ruey



註冊時間: 2003-03-12
文章: 1698
來自: tunglo

第 5 樓

發表發表於: 星期四 九月 11, 2003 4:53 pm    文章主題: 引言回覆

covery 寫到:
不錯ㄛ!!
是不是還有其它的 m_getstate 狀況 ??


1.有空的時候要常利用到
"常用網站整理---920817 "
Using Win32 functions網址


2.KK底下函數說明,就會明白
InternetGetConnectedState
Add comment W32 Constants Translate this page


Retrieves the connected state of the local system.


Code examples:


Retrieving a state of your Internet connection



Declaration:


BOOL InternetGetConnectedState(
LPDWORD lpdwFlags,
DWORD dwReserved
);




FoxPro declaration:


DECLARE SHORT InternetGetConnectedState IN wininet;
INTEGER @ lpdwFlags,;
INTEGER dwReserved



Parameters:

lpdwFlags
[out] Pointer to an unsigned long integer variable where the connection description should be returned.

dwReserved
[in] Reserved. Must be set to zero.



Return value:

Returns TRUE if there is an Internet connection, or FALSE otherwise.

_________________
#############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!

學會VFP使用者社區的搜尋,Code才會更有趣~
#############################
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
1頁(共1頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作