منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] منع الوصول أو تشغيل الريجيسترى - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=52910)

منع الوصول أو تشغيل الريجيسترى - dr.programming - 29-04-25

السلام عليكم و رحمة الله وبركاته
زملائى الأفاضل 
و أساتذتنا الأعزاء
أريد كود بفجوال بيسيك دوت نت لاغلاق الريجيسترى أو بمعنى ادق منع أى مستخدم للويندوز من تشغيل Regedit أى فتح الريجيسترى

RE: منع الوصول أو تشغيل الريجيسترى - الاصيله - 10-06-25

كود :
Imports Microsoft.Win32


Public Class Form1
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
       Try
           Dim regKey As RegistryKey = Registry.CurrentUser.CreateSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\System")
           regKey.SetValue("DisableRegistryTools", 1, RegistryValueKind.DWord)
           regKey.Close()
           MsgBox("تم تعطيل Regedit بنجاح")
       Catch ex As Exception
           MsgBox("حدث خطأ أثناء تعطيل Regedit")
       End Try
   End Sub

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
       Try
           Dim regKey As RegistryKey = Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Policies\System", True)
           If regKey IsNot Nothing Then
               regKey.DeleteValue("DisableRegistryTools", False)
               regKey.Close()
               MsgBox("تم تمكين Regedit بنجاح")
           Else
               MsgBox("لم يتم العثور على القيمة")
           End If
       Catch ex As Exception
           MsgBox("حدث خطأ أثناء تمكين Regedit")
       End Try
   End Sub
End Class


RE: منع الوصول أو تشغيل الريجيسترى - أبو خالد الشكري - 11-06-25

السلام عليكم
لو تقومين بشرح الكود ، يكون أفضل !
وشكرا .

RE: منع الوصول أو تشغيل الريجيسترى - الاصيله - 11-06-25

عمل الكود اعلاه

من هذا الجزء يقوم بفتح مفتاح التسجيل 
Software\Microsoft\Windows\CurrentVersion\Policies\System 
في قسم  CurrentUser
يضيف قيمة جديدهالى المفتاح ويعينه الى 
DisableRegistryTools ويتم تعطيل Regedit
تظهر رسالة تم التعطيل بنجاح
في Button2
يكون عمل الكود كالتالي
يقوم بفتح مفتاح التسجيل والسماح له بالكتابة CurrentUser

ثم يتحقق من وجود المفتاح DisableRegistryTools فاذا كان المفتاح موجودا يقوم بحذف قيمة Regedit
ثم يغلق مفتاح التسجيل ويعرض لك رسالة تفيد بتمكينه بنجاح

RE: منع الوصول أو تشغيل الريجيسترى - أبو خالد الشكري - 12-06-25

شكرا لك الأخت الاصيله على توضيح عمل الكود