بررسی اتصال اینترنت

[mrem1379 5]

 چطوری میشه تو بیسیک با دستور if یا هر دستور دیگه ای برسی اتصال به اینترنت هنگام ورود به اکتیویتی جدید یا حتی هنگام استفاده اش از برنامه برگرده یا بیاد اکتیویتی قبل چک کرد . (کد خروج و برگشت رو بلدم )

با تشکر از گروه انسر سنتر

[omid-j 28]

سلام

شما از کتابخانه AriaLib  استفاده کنید

Sub Process_Globals	
	
	Dim aria As AriaLib    
End Sub


If aria.TestInterntConnection = False Then
		ToastMessageShow("اینترنت شما وصل نیست",False)
	Else If aria.TestInterntConnection = True Then
		ToastMessageShow("اینترنت وصل است ",False)
	End If