PDA

View Full Version : سوال: چطوری میشه اتصال به اینترنت رو چک کرد ؟؟؟؟؟؟؟



zeos_man
شنبه 27 اسفند 1390, 00:11 صبح
درود

چطوری میشه بوسیله کد از اتصال کامپوتر به اینترنت باخبر شد ؟ من یه سوال دیگه هم دارم آیا میشه با کد اتصال رو قطع کرد یعنی اینترنت رو قطع کنیم ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟

arash020
شنبه 27 اسفند 1390, 06:17 صبح
سلام
سوال اول-روش 1:
Private Declare Function InternetGetConnectedStateEx Lib "wininet.dll" (ByRef lpdwFlags As Long, ByVal lpszConnectionName As String, ByVal dwNameLen As Integer, ByVal dwReserved As Long) As Long
Dim sConnType As String
Private Sub Form_Load()
Dim Ret As Long
Ret = InternetGetConnectedStateEx(Ret, sConnType, 254, 0)
If Ret = 1 Then
MsgBox "You are connected to Internet via a " & sConnType, vbInformation
Else
MsgBox "You are not connected to internet", vbInformation
End If
درجواب به سوال دومت میتونم همین قدر بگم که حودمم دنبالشم و هنوز پیدا نکردم.

hakim22
شنبه 27 اسفند 1390, 13:48 عصر
برنامه نویسی برای پورت کار زیاد سختی نیست ،
برای بررسی اتصال به اینترنت از

My.Computer.Network.Ping

استفاده کنید.

برای بررسی اتصال به شبکه از

My.Computer.Network.IsAvailable

---
برای قطع کردن اتصال به شبکه باید به سراغ برنامه نوبسی Socket ها در دات نت برید که روش عملیش رو تا به حال ندیدم