ما كود منع الاتصال بالنت عن طريق الريجستري؟ و كيف ينفذ فورا دون اعادة تشغيل؟

هلا أخوي الفكرة كالتالي:

هناك قيم في الريجستري عند تغييرها لابد من اعادة تشغيل الجهاز..

مثال HKEY_LOCAL_MACHINE

وهناك قيم أخرى عند تغيرها ايضا لن تعمل الا بإعادة تشغيل النظام..

وتتم الطريقة كالتالي:

بعد تغيير القيمة في الريجستري مثلا قيمة اخفاء ايقونات سطح المكتب..

أنت غيرت القيمة في الريجستري تمام ولكن لم تظهر النتيجة ولكي تظهر بدون اعادة تشغيل الجهاز:

Press Ctrl-Alt-Del

ثم اذهب لتبويب TASK MANAGER

ثم تبويب PROCESSES

ثم حدد EXPLORER.EXE

ثم اضغط على زر END PROCESS

ثم اذهب لقائمة FILE

واختر NEW TASK

ثم اكتب EXPLORER

وأضغط OK

وسترى ان التعديل الذي تم في الريجستري قد حدث.

كيفية تنفيذ هذه الطريقة بالكود تعتمد على أبداعك ;)

Al-jameel كتب:

كيفية تنفيذ هذه الطريقة بالكود تعتمد على أبداعك ;)

اشكرك اخي الكريم

و قد وجدت برنامج بالبيسك يقوم بايقاف الاكسبلور و اعادة تشغيله بدلا من اعادة تشغيل الجهاز

و لكن للاسف كنت اتمني ان اعرف الكود المستخدم لذلك :(

فهل هناك احد من الاخوة يستطيع ان يدلني علي هذا الكود؟

و مرفق نسخة من البرنامج بالمرفقات

الحمد لله

لقد وجدت الكود بعد طول بحث في الاكواد

للبحث عن ابسطهم و اسرعهم لجعل الاكسبلور ينغلق ثم يعمل مرة اخري

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

و يسرني ان اقدم الكود للاخوة الكرام ( علما بان الكود من تصميمي و ليس منقول و لن تجدوه في اي موقع اخر)

و اتمني ان اجد اي اضافات او تحسينات للكود من الاخوة الكرام

و الكود هو :-

‘ينسخ الكود التالي في الموديول :-

Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public Sub AppSleep(lngMilliSeconds As Long)
  Sleep lngMilliSeconds
End Sub

‘ينسخ الكود التالي في النوذج او الفورم  ولا تنسي ان تضع زر كوماند علي الفورم:-

Private Sub Command1_Click()
Shell "taskkill /F /im explorer.exe", vbNormalFocus
 Sleep 700
 Shell "explorer.exe", vbNormalFocus
End Sub

و الكود جاهز بالمرفقات

و السلام عليكم و رحمة الله و بركاته

explorer.zip