+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [نقاش] برنامج كشف كافة اتصالات جهازك (/showthread.php?tid=17586)
برنامج كشف كافة اتصالات جهازك - osamaessak - 08-10-16
السلام عليكم إخوتي إني ارغب بإنشاء برنامج يقوم بعرض كافة الاتصالات الجارية في الجهاز مع عرض ip والبورت طبعا أعلم ان هناك برامج جاهزة مثل Process Hacker ولكن ارجو المساعدة في شرح كيفية برمجة أوامر هكذا برامج ولكم جزيل الشكر والإمتنان
RE: برنامج كشف كافة اتصالات جهازك - أبو ناصر - 08-10-16
السلام عليكم و رحمة الله
يمكن استعمال الامر netstat - ano الخاص بالدوس من خلال الفيجوال بيسيك و ذلك بانشاء ملف تايكست تخزن فيه كافة الاتصالات الجارية في الجهاز و البورتات المستعملة
و استدعاؤه من خلال الفيجوال بيسيك و عرضه في RichTextBox1 .
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Process.Start("cmd", "/c netstat -ano > connections.txt")
Dim objreader As New System.IO.StreamReader("connections.txt")
RichTextBox1.Text = objreader.ReadToEnd
objreader.Close()
End Sub