تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
ايقاف تشغيل جدار الحمايه
#1
السلام عليكم ورحمة الله وبركاته......

حينما أقوم بتشغيل مشروعى المبرمج ب VB.NET وأدرج به phantomjs 

الموجودة فى ال السلينيام تظهر لى هذه الرسالة وانا لا اريدها تظهر لو سمحتم

يعنى اريد اخفاء هذا كما بالصورة ولا يظهر للمستخدم لانى بعمل اتصال من خلال ال phantomjs 


وجزاكم الله كل خير
الرد }}}
تم الشكر بواسطة:
#2
هذه الرسالة تظهر لاتمام السماح بتجاوز الجدار الناري

وبمجرد الضغط على Allow access لم تظهر مجدداً

حيث ان سيختلف الامر عند وجود برامج الحماية
عند فحص البرنامج واعطاء التصريح له للعمل

كما يمكنك فحص البرنامج من خلال الرابط التالى واعطاء

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: Abou Eman
#3
(05-08-18, 07:44 PM)elgokr كتب :
هذه الرسالة تظهر لاتمام السماح بتجاوز الجدار الناري

وبمجرد الضغط على Allow access لم تظهر مجدداً

حيث ان سيختلف الامر عند وجود برامج الحماية
عند فحص البرنامج واعطاء التصريح له للعمل

كما يمكنك فحص البرنامج من خلال الرابط التالى واعطاء

تحياتى لك
وتمنياتى لك التوفيق

بارك الله فيك اخى الجوكر لكن هذا ليس مقصدى فأنا لا اقصد ان اقوم بفحص البرنامج
انا فقط اريد ايقاف هذه الرسالة برمجيا وانا عثرت على كود جزاك الله كل خير استاذى
 
هنا
https://www.codeproject.com/Articles/173...s-firewall
الرد }}}
تم الشكر بواسطة: Abou Eman , Abou Eman
#4
PHP كود :
Private Sub StopFirewall() 
الكود الذي تم حذفه من مشاركتك الأخيرة يعمل جيدا،
ولكن يجب تكون للبرنامج صلاحيات مسءول.
الرد }}}
تم الشكر بواسطة: ابو روضة
#5
(05-08-18, 09:13 PM)Finish كتب :
PHP كود :
Private Sub StopFirewall() 
الكود الذي تم حذفه من مشاركتك الأخيرة يعمل جيدا،
ولكن يجب تكون للبرنامج صلاحيات مسءول.

منا حذفته لانه يعمل ايقاف فقط ولم اعرف اعمل له تشغيل بعد اغلاق البرنامج

وجربت الان على ويندوز 10 وللأسف لم يعمل أيأ منهم فلو عند حل اتمنى وضعها
وهذا هو كود الايقاف كامل من هنا

الرد }}}
تم الشكر بواسطة:
#6
لتشغيله غير كلمة disable إلى enable

انا لدي ويندوز 7 ويعمل
الرد }}}
تم الشكر بواسطة:
#7
(05-08-18, 09:38 PM)Finish كتب : لتشغيله غير كلمة disable إلى enable

انا لدي ويندوز 7 ويعمل

نعم يعمل على ويندوز 7 وانا جربته لكنه لا يعمل على 10 وانا اريده يعمل على كل الانظمة..
وازاى اغير كلمة disable إلى enable اذا كان امر الايقاف اصلا من هنا
كود :
StopFirewall
الرد }}}
تم الشكر بواسطة:
#8
(05-08-18, 09:47 PM)ابو روضة كتب :
(05-08-18, 09:38 PM)Finish كتب : لتشغيله غير كلمة disable إلى enable

انا لدي ويندوز 7 ويعمل

نعم يعمل على ويندوز 7 وانا جربته لكنه لا يعمل على 10 وانا اريده يعمل على كل الانظمة..
وازاى اغير كلمة disable إلى enable اذا كان امر الايقاف اصلا من هنا
كود :
StopFirewall





الكلمة موجودة في الكود

تفضل
PHP كود :
Program.StartInfo.Arguments = ("firewall set opmode enable"
الرد }}}
تم الشكر بواسطة:
#9
(05-08-18, 09:50 PM)Finish كتب :
(05-08-18, 09:47 PM)ابو روضة كتب :
(05-08-18, 09:38 PM)Finish كتب : لتشغيله غير كلمة disable إلى enable

انا لدي ويندوز 7 ويعمل

نعم يعمل على ويندوز 7 وانا جربته لكنه لا يعمل على 10 وانا اريده يعمل على كل الانظمة..
وازاى اغير كلمة disable إلى enable اذا كان امر الايقاف اصلا من هنا
كود :
StopFirewall





الكلمة موجودة في الكود

تفضل
PHP كود :
Program.StartInfo.Arguments = ("firewall set opmode enable"

نعم أعلم استاذى انها هنا لكن انا اتكلم عن امر الايقاف كان StopFirewall
فكيف يكون امر تشغيلها مرة اخرى وبعدين هى لا تعمل على ويندوز 10 لا اعرف لماذا
الرد }}}
تم الشكر بواسطة:
#10
هو نفس الكود فقط بتغيير الكلمة

وعموما تفضل الكود باسم StartFirewall
PHP كود :
Private Sub StartFirewall()
 
   Dim Program As Process = New Process
    Dim top 
As String "netsh.exe"
 
   Program.StartInfo.Arguments = ("firewall set opmode enable")
 
   Program.StartInfo.FileName top
    Program
.StartInfo.UseShellExecute False
    Program
.StartInfo.RedirectStandardOutput True
    Program
.StartInfo.CreateNoWindow True
    Program
.Start()
 
   Program.WaitForExit()
End Sub 

وهذا كود الايقاف السابق StopFirewall
PHP كود :
Private Sub StopFirewall()
 
   Dim Program As Process = New Process
    Dim top 
As String "netsh.exe"
 
   Program.StartInfo.Arguments = ("firewall set opmode disable")
 
   Program.StartInfo.FileName top
    Program
.StartInfo.UseShellExecute False
    Program
.StartInfo.RedirectStandardOutput True
    Program
.StartInfo.CreateNoWindow True
    Program
.Start()
 
   Program.WaitForExit()
End Sub 
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيفية تشغيل ملف باتش دون ظهور "نافذةالـ Consol "؟ AmeenRashed 9 672 14-12-23, 12:07 PM
آخر رد: asmarsou
  تشغيل الماكرو عن طريق اكواد الفجوال نيمو 0 271 03-11-23, 11:14 AM
آخر رد: نيمو
  [VB.NET] أين الخطأ فى تشغيل هذا التطبيق AhmedEissa 0 239 27-10-23, 04:05 PM
آخر رد: AhmedEissa
  تشغيل برنامج خارجي ضمن شاشة برنامجي strongriseman 1 341 13-09-23, 10:14 PM
آخر رد: anes
  استفسار عن تشغيل قاعدة البيانات بالبرنامج عند العميل محمد ابوخليل 1 335 10-09-23, 07:09 PM
آخر رد: Asem2
  مساعده في تشغيل اكثرمن فورم في وقت واحد maherhaddaf 5 527 19-07-23, 03:28 PM
آخر رد: Taha Okla
  [سؤال] تشغيل راديو عن طريق الانترنت أبوسعود 5 716 01-07-23, 10:34 PM
آخر رد: asmarsou
  التحقق من معطيات قبل تشغيل البرنامج ابو محمد محمد محمد 3 510 30-04-23, 11:03 PM
آخر رد: عبدالله الدوسري
Photo كيفيةة تشغيل المشروع ك ادمن administrator atefkhalf2004 5 593 12-04-23, 12:41 PM
آخر رد: atefkhalf2004
Photo كيفيةة تشغيل المشروع ك ادمن administrator 0 122 11-04-23, 03:31 AM
آخر رد: atefkhalf2004

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم