منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(28-04-16, 10:03 PM)amgad525 كتب : [ -> ]http://vb4arb.com/vb/thread-14676-post-7...l#pid70192

PHP كود :

      If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


PHP كود :

Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


شغال تمام اشكرك على المجهود الرائع

(09-02-16, 02:24 AM)Adrees كتب : [ -> ]السلام عليكم

اولا اكتب هذه الدالة 

PHP كود :

   Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


ثانيا في الحدث Form Load  ضع الكود التالي

PHP كود :

       If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


ان شاء الله يفيدك هذا الكود.

(28-04-16, 10:03 PM)amgad525 كتب : [ -> ]http://vb4arb.com/vb/thread-14676-post-7...l#pid70192

PHP كود :

      If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


PHP كود :

Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


شغال تمام اشكرك على المجهود الرائع

(28-04-16, 10:43 PM)mostfa1995 كتب : [ -> ]

(28-04-16, 10:03 PM)amgad525 كتب : [ -> ]http://vb4arb.com/vb/thread-14676-post-7...l#pid70192

PHP كود :

      If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


PHP كود :

Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


شغال تمام اشكرك على المجهود الرائع

امرك غريب 
يعني ايش الفرق بين الكود اللي اعطيتك والكود هذا؟؟
اتمنى تكون صريح ولو مرة

(28-04-16, 10:47 PM)سعود كتب : [ -> ]

(28-04-16, 10:43 PM)mostfa1995 كتب : [ -> ]

(28-04-16, 10:03 PM)amgad525 كتب : [ -> ]http://vb4arb.com/vb/thread-14676-post-7...l#pid70192

PHP كود :

      If CheckInternetConnection() = True Then
            MessageBox.Show("Your Computer is  Connected to internet", "Connected", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            MessageBox.Show("Your Computer is not Connected to internet", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
            Application.Exit()
        End If 


PHP كود :

Public Shared Function CheckInternetConnection() As Boolean
        Try
            Return My.Computer.Network.Ping("www.google.com")
            Return True
        Catch
            Return False
        End Try
    End Function 


شغال تمام اشكرك على المجهود الرائع

امرك غريب 
يعني ايش الفرق بين الكود اللي اعطيتك والكود هذا؟؟
اتمنى تكون صريح ولو مرة

انا مقولتش حاجة والله انا بشكر الراجل والله لا تزعل

---

لا احد يزعل منى وشكرااااااااا لكل الاعضاء الى شارك فى الموضوع

الرجاء من الاخوه قبل طرح السوال البحث في المنتدى 

هاذا موضوع مشابه لي طلبك

هنا


شكرا