[dasktop]

(06-05-22, 04:25 AM)سعود كتب :

(06-05-22, 04:17 AM)dasktop كتب : المنع نجح ولم يتبقى سوى كود الشرط

اذا كان في ال listbox  ارقام تختلف عن 443 و80 يضهر رسالة

استخدمت الكود التالي ولم ينجح ماهي المشكلة

For int As Integer = 0 To ListBox3.Items.Count - 1

           If ListBox2.Items(int) = 443 & 80 Then
           Else
               Form3.Show()
           End If

       Next

الكود التالي لا يضيف الا المنفذين 443 و 80

PHP كود :

Dim ip As IPGlobalProperties = IPGlobalProperties.GetIPGlobalProperties
        Dim p As TcpConnectionInformation() = ip.GetActiveTcpConnections
        For Each t In p
            Dim port As String = t.RemoteEndPoint.Port
            Dim index As Integer = ListBox1.Items.IndexOf(port)
            If index = -1 And (port = 443 Or port = 80) Then
                ListBox1.Items.Add(port)
            End If
        Next 


المقصد اخي سعود ان الست بوك لدي يضيف منافذ كثيرة مفتوحة 

ارغب اذا في اللست بوكس منفذ يختلف عن المنافذ التالية يضهر رسالة msgbox 

مثال 

اذا فتحت متصفح تلقائيا ستضهر هذه المنافذ

443
80
وهاذا طبيعي 


واذا فتحت بعض البرامج يضهر منفذ جديد مثل 

443
80
9344
انا ارغب بتنبية اذا يوجد في ال listbox سطر جديد يختلف عن اسطر الارقام التالية 443 و80 يضهر رسالة 

والبرنامج ناجح جدا ولا ينقصة سوى هاذا الكود