檢查是否能連線到指定的網站
lpszUrl | String | - | 可省略 | (空白) | 網址字串,若省略則試圖從系統資料庫內連接最近的網站 |
wFlags | Long | 4 | 可省略 | 1 | 強制連線旗標, 0 或 1,預設為強制連線 (1) |
傳回布林值
Debug.Print myInternetCheckConnection("http://tlcheng.no-ip.com/") ' 傳回值為 True 或 False
若將強制連線旗標設為 0 ,只要有網路卡或是網際網路設定為「永遠不撥號連線」均會傳回真 (True) ,而強制連線旗標會有一 ping 的動作在內,故若該指定的網站發生故障,仍會傳回否 (False)
Visual Basic 4 以後 | WinInet.bas
|