+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] عمل بلوك للبورتات في الجدار الناري عن طريق الفجول بيسك [ netsh advfirewall firewall (/showthread.php?tid=37850)
عمل بلوك للبورتات في الجدار الناري عن طريق الفجول بيسك [ netsh advfirewall firewall - Vimtos - 21-02-21
السلام عليكم ورحمة الله وبركآته
ياشباب انا عندي مشكلة .. فأاتمنى منكم مسآعدتي في الحل ..
لغة البرنآمج VB.net
أريد ان يقوم البرنآمج بااضافة بورتات في جدار الحماية
وبزر checkbox < Allow - Block
يعني زي ماانتم فاهمين .. مجرد احط الصح يسوي بلوك للبورتات .. واذا شلت الصح يشيل البلوك
ماعلينا .. المهم ..
انا ابي اسوي نفس الصورة هذي
سويت كود بس للأسف مانجح
كود :
ProcessStartInfo kk14 = new ProcessStartInfo();
kk14.FileName = "cmd.exe";
kk14.WindowStyle = ProcessWindowStyle.Hidden;
kk14.Verb = "runas";
// اضافة القيمة الى جدار الحماية
kk14.Arguments = "/c netsh advfirewall firewall add rule name=GGM protocol=TCP dir=out remoteport=51212,51213,51214,51218,58281,8088,58287,58534,58542 action=block";
Process.Start(kk14);القيم ياشباب لمن ارارد مسآعدتي ..
كود :
مسار البرنامج
C:\Program Files\ldplayerbox\LdVBoxHeadless.exe
==== UDP ====
0-10000, 11500-65535, 68, 55597, 58952, 61971
==== TCP ====
35000, 8081, 10012, 18081, 8086, 8088, 60000-65000, 17000, 17500, 8085, 35000, 8089, 17000-18000, 30000-35000, 547, 3013, 10000-10050, 17500, 35000, 62448, 14000, 18018, 7889, 8000-8099, 8080, 3013, 11443
==== TCP ====
51212, 51213, 51214, 51218, 58281, 8088, 58287, 58534, 58542, 58548, 58586, 58587, 58588, 58589, 58607, 58608, 58613