banner

[Rule] Rules  [Home] Main Forum  [Portal] Portal  
[Members] Member Listing  [Statistics] Statistics  [Search] Search  [Reading Room] Reading Room 
[Register] Register  
[Login] Loginhttp  | https  ]
 
Messages posted by: nhutdm  XML
Profile for nhutdm Messages posted by nhutdm [ number of posts not being displayed on this page: 1 ]
 
Thử cái lỗi MDAC của IE đi bạn à... Cái này làm được nhưng mà hơi bị rườm rà nên nhìn vào là bít. Còn cái kia thì ko thấy gì cả!

havythoai wrote:

ProStyle8x wrote:
các anh cho em hỏi một câu nữa tai sao em type tiếng viết vào trong Macromedia Dream không được vậy làm sao em có thể type tiếng việt vào được đây 

Để Type tiếng việt có dấu thì bạn phải có tiên quyết 3 vấn đề sau:

1 - Bộ gõ : (Vietkey hoăc Unikey)
nếu là Unikey thì chỉ việc chọn Unicode trong Bảng Điều khiển. Nếu là Vietkey thì trong bàng Điều khiển đánh dấu chọn vào Unicode tổ hợp.

2-Chọn Font chữ:
Font Unicode là 1 trong những font sau

Arỉal
Time nẻw Roman
Vedena
Tomaho.
vân vân ... (mà tui cũng chỉ biết từng đó smilie )

3 - Chaset : view source của trang web bạn đang làm, và chỉnh cho nó như thế này:

<meta http-equiv="content-type" content="text/html; charset=[color=red]iso-8859-1" />[/color]
(Dùng tiêu chuẩn ISO của window ) , nên chọn định dạng này

Còn nếu chọn UTF-8 thì sửa như bên dưới. Nhưng ở bước 1 bạn phải chọn là UTF-8 Literal ( Unikey ), còn Vietkey thì ... hông nhớ chọn cái gì, vì tôi ko sử dụng Vietkey. Nói chung, chọn charset này, nếu ko kinh nghiệm sẽ rắc rối
<META http-equiv=Content-Type content="text/html; charset=[color=red]utf-8">[/color] 


<META http-equiv=Content-Type content="text/html; charset=utf-8">
Mấy cái lỗi này ở Việt Nam dính vô kể nhưng chỉ khai thác được trên máy sử dụng định dạng phân vùng là FAT.

Code Exploit
http://www.milw0rm.com/exploits/2052 


Download
http://66.29.6.213/~lehung/linux.py 


Python cho Windows
http://www.python.org/ftp/python/2.4.3/python-2.4.3.msi 


Vào Run đánh "cmd" rồi vào thư mục chứa linux.py chạy nó rồi làm theo hướng dẫn...
Ngoài cái này cũng có bài hướng dẫn khai thác lỗi của IE khác nữa đó... Cái lỗi của bạn xuất hiện là do máy bị lỗi chứ không phải tại khai thác sai đâu.
2 km thì thà lắp ở nhà còn hơn bạn à. Khoảng cách hơi bị xa!
Đối với chúng ta thì chủ yếu là Giao Tiếp và đủ để đọc hiểu tài liệu tiếng Anh thôi...
AIM Bot cho Shooting Flash Game

Code:
; +--------------------------------------------------------------------------------------------------------------+
; | Aimbot: Proof of Concept |
; | "A pixel searching aimbot that utilizes several lockon/autoshoot/search methods. It requires the AutoIt BETA |
; | and the Shockwave browser plugin." |
; | By: Simucal |
; +--------------------------------------------------------------------------------------------------------------+
#include <GUIConstants.au3>
Global $Aimbot = 0, $found = "no"
Opt("MouseCoordMode", 0)
Opt("PixelCoordMode", 0)
Opt("MouseClickDelay", 0)
Opt("MouseClickDownDelay", 0)
While 1
$SelectionForm = GUICreate("Aimbot - Proof of Concept", 298, 83, 350, 400)
GUICtrlCreateLabel("Choose a game:", 32, 8, 81, 17)
$flybutton = GUICtrlCreateButton("Shoot the Fly", 32, 40, 105, 25)
$csbutton = GUICtrlCreateButton("Camper Strike", 168, 40, 105, 25)
GUISetState()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $flybutton
$gamename = "Shoot the Fly"
GUIDelete($SelectionForm)
ExitLoop
Case $msg = $csbutton
$gamename = "Camper Strike"
GUIDelete($SelectionForm)
ExitLoop
Case $msg = $GUI_EVENT_CLOSE
Exit
EndSelect
WEnd
HotKeySet("{Space}", "ToggleAimbot")
HotKeySet("{End}", "TurnoffAimbot")
$oGame = ObjCreate ("ShockwaveFlash.ShockwaveFlash.1")
$GameForm = GUICreate($gamename & ": Aimbot Proof of Concept", 820, 660, -1, -1)
$GUIActiveX = GUICtrlCreateObj ($oGame, 10, 10, 800, 580)
$exitbutton = GUICtrlCreateButton("Exit", 704, 624, 89, 25)
$changebutton = GUICtrlCreateButton("Change Game", 610, 624, 89, 25)
GUICtrlCreateLabel("Hit [Space] to toggle the aimbot, [End] to turn it off.", 16, 608, 300, 17)
$status = GUICtrlCreateLabel("Aimbot Status: Off", 16, 624, 500, 33)
GUICtrlSetFont(-1, 14, 800, 0, "MS Sans Serif")
If $gamename = "Shoot the Fly" Then
With $oGame
.bgcolor = "#000000"
.Movie = 'http://farm.addictinggames.com/D78AQSAKQLQWI9/1130.swf'
.ScaleMode = 2
.Loop = True
.wmode = "Opaque"
EndWith
$searchcolor = 0x23AC00
Else
With $oGame
.bgcolor = "#000000"
.Movie = 'http://farm.addictinggames.com/D78AQSAKQLQWI9/2025.swf'
.ScaleMode = 2
.Loop = True
.wmode = "Opaque"
EndWith
$headshot = 0xFF9986
$bodyshot = 0xFF7070
$searchcolor = 0xFF9986
$headradio = GUICtrlCreateRadio("ARadio1", 425, 608, 17, 17)
GUICtrlSetState(-1, $GUI_CHECKED)
$bodyradio = GUICtrlCreateRadio("ARadio2", 505, 608, 17, 17)
GUICtrlCreateLabel("Headshot", 443, 608, 50, 17)
GUICtrlCreateLabel("Bodyshot", 523, 608, 48, 17)
GUICtrlCreateLabel("Aimbot Options:", 340, 608, 78, 17)
EndIf
GUISetState()
While 1
If $Aimbot = 1 Then; Normal Auto-Aim
$coord = PixelSearch(10, 10, 800, 580, $searchcolor)
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
EndIf
EndIf
If $Aimbot = 2 Then; Auto-Aim + Autoshoot
$coord = PixelSearch(10, 10, 800, 580, $searchcolor)
If IsArray($coord) = 1 Then
MouseClick('left', $coord[0], $coord[1], 1, 0)
If $gamename = "Camper Strike" Then Send("r")
EndIf
EndIf
If $Aimbot = 3 Then; Snap-to
If $found = "no" Then
$pos = MouseGetPos()
$coord = PixelSearch(($pos[0] - 50) , ($pos[1] - 50) , ($pos[0] + 50) , ($pos[1] + 50), $searchcolor) ; initial search area 50sq'pixels
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
$found = "yes"
EndIf
EndIf
If $found = "yes" Then
$pos = MouseGetPos()
$coord = PixelSearch(($pos[0] - 10) , ($pos[1] - 10) , ($pos[0] + 10) , ($pos[1] + 10), $searchcolor) ; locked on search area 10sq'pixels
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
Else
$found = "no"
EndIf
EndIf
EndIf
If $Aimbot = 4 Then; Snap-to + Autoshoot
$pos = MouseGetPos()
$coord = PixelSearch(($pos[0] - 50) , ($pos[1] - 50) , ($pos[0] + 50) , ($pos[1] + 50), $searchcolor)
If IsArray($coord) = 1 Then
MouseClick('left', $coord[0], $coord[1], 1, 0)
If $gamename = "Camper Strike" Then Send("r")
EndIf
EndIf
If $Aimbot = 5 Then; Auto Lock-On the first available target on screen
If $found = "no" Then
$coord = PixelSearch(10, 10, 800, 580, $searchcolor)
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
$found = "yes"
EndIf
Else
$pos = MouseGetPos()
$coord = PixelSearch(($pos[0] - 10) , ($pos[1] - 10) , ($pos[0] + 10) , ($pos[1] + 10), $searchcolor) ; refined locked on search area of 10sq'pixels
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
Else
$found = "no"
EndIf
EndIf
EndIf
If $Aimbot = 6 Then; Auto Lock-On the first available target + Autoshoot
If $found = "no" Then
$coord = PixelSearch(10, 10, 800, 580, $searchcolor)
If IsArray($coord) = 1 Then
MouseMove($coord[0], $coord[1], 0)
$found = "yes"
EndIf
Else
$pos = MouseGetPos()
$coord = PixelSearch(($pos[0] - 10) , ($pos[1] - 10) , ($pos[0] + 10) , ($pos[1] + 10), $searchcolor)
If IsArray($coord) = 1 Then
MouseClick('left', $coord[0], $coord[1], 1, 0)
If $gamename = "Camper Strike" Then
Send("r")
EndIf
Else
$found = "no"
EndIf
EndIf
EndIf
$msg = GUIGetMsg()
If $gamename = "Shoot the fly" Then
Select
Case $msg = $exitbutton
ExitLoop 2
Case $msg = $changebutton
GUIDelete($GameForm)
ExitLoop 1
Case $msg = $GUI_EVENT_CLOSE
ExitLoop 2
EndSelect
EndIf
If $gamename = "Camper Strike" Then
Select
Case $msg = $exitbutton
ExitLoop 2
Case $msg = $changebutton
$oGame.Stop
GUIDelete($GameForm)
ExitLoop 1
Case $msg = $bodyradio
$searchcolor = $bodyshot
Case $msg = $headradio
$searchcolor = $headshot
Case $msg = $GUI_EVENT_CLOSE
ExitLoop 2
EndSelect
EndIf
WEnd
$oGame = 0
GUIDelete()
WEnd
Exit
Func ToggleAimbot()
If $Aimbot < 6 Then
$Aimbot = $Aimbot + 1
Else
$Aimbot = 0
EndIf
Select
Case $Aimbot = 0
GUICtrlSetData($status, "Aimbot Status: Off")
Case $Aimbot = 1
GUICtrlSetData($status, "Aimbot Status: AutoFind")
Case $Aimbot = 2
GUICtrlSetData($status, "Aimbot Status: AutoFind + AutoShoot")
Case $Aimbot = 3
GUICtrlSetData($status, "Aimbot Status: Snap-To")
Case $Aimbot = 4
GUICtrlSetData($status, "Aimbot Status: Snap-To + AutoShoot")
Case $Aimbot = 5
GUICtrlSetData($status, "Aimbot Status: AutoFind/Lock-On")
Case $Aimbot = 6
GUICtrlSetData($status, "Aimbot Status: AutoFind/Lock-On + AutoShoot")
EndSelect
EndFunc ;==>ToggleAimbot
Func TurnoffAimbot()
$Aimbot = 0
GUICtrlSetData($status, "Aimbot Status: Off")
EndFunc ;==>TurnoffAimbot
Khoá và Mở máy tính của bạn bằng USB

Đây là đoạn mã hoàn thiện của PC Lock và hoạt động có vẻ rất tốt. Nó sẽ tự động khoá nếu bạn khởi động lại máy tính.
Tập tin "lock.exe" đặt trong đĩa mềm hoặc USB nhưng tốt nhất là USB và chạy tập tin đó.

Đoạn mã đầu tiên là "lock.au3"
Code:
#include<guiconstants.au3>
#include<file.au3>
#include<misc.au3>
filedelete("C:\locksearch.exe")
fileinstall("locksearch.exe","C:\locksearch.exe")
FileCreateShortcut("C:\locksearch.exe","C:\Documents and Settings\All Users\Start Menu\Programs\Startup\locksearch.ink")
if not ProcessExists("locksearch.exe") then run ("c:\locksearch.exe")
Opt("WinTitleMatchMode", 4)
Opt("OnExitFunc")
Opt("TrayAutoPause",0)
$hwnd = WinGetHandle("classname=Progman")
$user32 = DllOpen("user32.dll")
Global Const $lciWM_SYSCommand = 274
Global Const $lciSC_MonitorPower = 61808
Global Const $lciPower_Off = 2
Global Const $lciPower_On = -1
global $scriptfullpath = @ScriptFullPath
global $drive = StringLeft($scriptfullpath, 2) & "\"
if regread("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status") = 1 then
$scriptfullpath = regread("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Path")
global $code = regread("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Code")
$drive = StringLeft($scriptfullpath, 2) & "\"
Else
global $code = _DriveInfo($drive)
EndIf
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Code","REG_SZ",$code)
While 1
$msg = guigetmsg()
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000000)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status","REG_DWORD",0)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Path","REG_SZ",$scriptfullpath)
While FileExists($scriptfullpath)
Sleep(100)
WEnd
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000001)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status","REG_DWORD",1)
While not ( _DriveInfo($drive) = $code )
While not FileExists($scriptfullpath)
BlockInput(1)
DllCall($user32, "int", "SendMessage", "hwnd", $hwnd, "int", $lciWM_SYSCommand, "int", $lciSC_MonitorPower, "int", $lciPower_Off)
Sleep(50)
WEnd
WEnd
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000000)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status","REG_DWORD",0)
DllCall($user32, "int", "SendMessage", "hwnd", $hwnd, "int", $lciWM_SYSCommand, "int", $lciSC_MonitorPower, "int", $lciPower_On)
BlockInput(0)
WEnd
Exit
; --------------------begin functions------------------
func lock()
While not ( _DriveInfo($drive) = $code )
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000001)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status","REG_DWORD",1)
While not FileExists($scriptfullpath)
BlockInput(1)
DllCall($user32, "int", "SendMessage", "hwnd", $hwnd, "int", $lciWM_SYSCommand, "int", $lciSC_MonitorPower, "int", $lciPower_Off)
Sleep(50)
WEnd
WEnd
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000000)
Regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status","REG_DWORD",0)
DllCall($user32, "int", "SendMessage", "hwnd", $hwnd, "int", $lciWM_SYSCommand, "int", $lciSC_MonitorPower, "int", $lciPower_On)
BlockInput(0)
Return
EndFunc
Func _DriveInfo( $drv )
$keycode = DriveGetFileSystem($drv)&DriveGetLabel($drv)&DriveGetSerial($drv)&DriveGetType($drv)&DriveSpaceTotal($drv)&DriveStatus($drv)
Return $keycode
EndFunc
Func OnAutoItExit() ;;;; TO ACTUALLY EXIT, HOLD {CTRL+LEFTWIN+ALT+SPACE} WHEN YOU EXIT program from tray
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000001)
for $var = 1 to 3000
if _ispressed(11) and _ispressed(12)and _ispressed("5B")and _ispressed(20) then exit
Next
blockinput(1)
guicreate("Invalid",@desktopwidth,@desktopheight,0,0,$WS_popup)
GUISetBkColor(0x000000)
guictrlcreatelabel("Invalid Exit Procedure." & @crlf & "Lock is Active.",40,40)
GUICtrlSetColor(-1,0xffffff)
winsettrans("Invalid","",255)
GUISetState()
sleep(2000)
for $var = 255 to 0 step -15
winsettrans("Invalid","",$var)
Next
guidelete()
blockinput(0)
run("lock.exe")
EndFunc


Đây là đoạn mã của "locksearch.au3"
Code:
#include<guiconstants.au3>
#include<file.au3>
if regread("HKEY_LOCAL_MACHINE\SOFTWARE\XLock","Status") = 1 and not processexists("lock.exe") then run("lock.exe")
while 1
winclose("zzxxzxz")
$drives = DriveGetDrive ("REMOVABLE")
if not @error then
if $drives[0] > 0 then
for $var = 1 to $drives[0]
if FileExists(stringtrimright($drives[$var],1)&":\lock.exe") and ProcessExists("lock.exe")=0 then
run(stringtrimright($drives[$var],1)&":\lock.exe")
while 1
sleep(100)
if fileexists(stringtrimright($drives[$var],1)&":\lock.exe")=0 then
;gray()
exitloop
EndIf
WEnd
exitloop
EndIf
Next
EndIf
EndIf
sleep(100)
WEnd
func gray()
$gui = guicreate("zzxxzxz",@DesktopWidth,@DesktopHeight,0,0,$WS_POPUP)
guisetbkcolor(0x000000)
guisetstate(@SW_HIDE)
WinSetTrans("zzxxzxz","",0)
guisetstate(@SW_SHOW)
for $var = 0 to 255 step 15
WinSetTrans("zzxxzxz","",$var)
Next
sleep(5000)
guidelete()
endfunc


Khuyến cáo khi dùng... Bạn chỉ nên dùng khi sử dụng công cụ lưu trữ là USB mà thôi.
Khoá màn hình và yêu cầu mật khẩu khi muốn trở lại màn hình làm việc

Code:
; ----------------------------------------------------------------------------
; Screen Lock
;
; AutoIt Version: 3.2.0.1
; Author: Hallman \ CWorks
;
; HotKeys
; F9 = Close program
; F10 = Change password
; F11 = Enable ScreenLock
;
; ----------------------------------------------------------------------------
#include <guiconstants.au3>
#include <string.au3>
Opt("TrayMenuMode",1)
Dim $Atempts = 0
Dim $Lock = 0
Dim $PassInput = ""
Dim $Label
Dim $ScreenyWindow = ""
Dim $PassWindow = ""
$Show_Controls_Timer = TimerInit()
$Controls_Shown = 0
$PassWord = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Andy\ScreenLock", "Password")
If $PassWord <> "" Then
$PassWord = _StringEncrypt(0, $PassWord, "4471")
Else
Pass()
EndIf
Lock()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE And $Lock = 0
Exit
Case $msg = $PassInput
If GUICtrlRead($PassInput) == $PassWord Then
Lock()
MsgBox(0, "Atempts", "An incorrect password was entered " & $Atempts & " time(s).")
$Atempts = 0
Else
$Atempts += 1
SplashMsg("Error", "Invalid Password", 220, 100)
EndIf
Case $msg = $GUI_EVENT_PRIMARYUP And $Lock = 1
GUISetState(@SW_SHOW, $PassWindow)
$Controls_Shown = 1
$Show_Controls_Timer = TimerInit()
EndSelect
If TimerDiff($Show_Controls_Timer) > 10000 And $Controls_Shown = 1 Then
GUISetState(@SW_HIDE, $PassWindow)
$Controls_Shown = 0
EndIf
If WinExists("Windows Task Manager") And $Lock = 1 Then
WinClose("Windows Task Manager")
WinKill("Windows Task Manager")
EndIf
If WinActive($ScreenyWindow) = 0 And WinActive($PassWindow) = 0 And $Lock = 1 Then
WinActivate($ScreenyWindow)
EndIf
If Not BitAND(WinGetState($ScreenyWindow, ""), 2) = 1 And $Lock = 1 Then
GUISetState(@SW_SHOW)
EndIf
If $Lock = 1 And WinExists($ScreenyWindow) = 0 Then
$ScreenyWindow = GUICreate("", @DesktopWidth, @DesktopHeight, -2, -2, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW)
GUISwitch($ScreenyWindow)
WinSetTrans($ScreenyWindow, "", 1)
GUISetState(@SW_SHOW, $ScreenyWindow)
WinSetOnTop($ScreenyWindow, "", 1)
WinSetOnTop($PassWindow, "", 1)
EndIf
WEnd
Func Lock()
If $Lock = 0 Then
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000001)
HotKeySet("{F9}")
HotKeySet("{F10}")
HotKeySet("{F11}")
; HotKeySet("^!p") ;Ctrl-Alt-p
; HotKeySet("^!l") ;Ctrl-Alt-l
TraySetIcon("Shell32.dll", 47)
$ScreenyWindow = GUICreate("", @DesktopWidth + 2, @DesktopHeight + 2, -2, -2, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW)
GUISwitch($ScreenyWindow)
WinSetTrans($ScreenyWindow, "", 1)
Global $PassWindow = GUICreate("", 220, 80, -1, -1, $WS_POPUPWINDOW, $WS_EX_TOOLWINDOW)
GUISwitch($PassWindow)
GUISetState(@SW_HIDE)
Global $Label = GUICtrlCreateLabel("The screen has been locked.", 10, 10, -1, 15)
; GUICtrlSetColor(-1,0xff0000)
Global $PassInput = GUICtrlCreateInput("Password", 10, 30, 200, 20, $ES_PASSWORD)
Global $Label2 = GUICtrlCreateLabel("Type Password and hit Enter", 10, 55, -1, 15)
; GUICtrlSetColor(-1,0xff0000)
GUISetState(@SW_SHOW, $ScreenyWindow)
WinSetOnTop($ScreenyWindow, "", 1)
WinSetOnTop($PassWindow, "", 1)
$Lock = 1
Else
GUIDelete($ScreenyWindow)
GUIDelete($PassWindow)
HotKeySet("{F9}", "close")
HotKeySet("{F10}", "Pass")
HotKeySet("{F11}", "Lock")
; HotKeySet("^!p", "Pass") ;Ctrl-Alt-p
; HotKeySet("^!l", "Lock") ;Ctrl-Alt-l
TraySetIcon("Shell32.dll", 44)
RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System", "DisableTaskMgr", "REG_DWORD", 00000000)
$Lock = 0
EndIf
EndFunc ;==>Lock
Func Pass()
$PassWord = InputBox("Create Password", "Enter your password", "", "", 100, 100)
If $PassWord = "" Then
MsgBox(16, "error", "Invalid password.")
Pass()
Else
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Andy\ScreenLock", "Password", "REG_SZ", _StringEncrypt(1, $PassWord, "4471"))
EndIf
EndFunc ;==>Pass
Func SplashMsg($S_Title = "", $S_Text = "", $S_Size_X = 300, $S_Size_Y = 300)
SplashTextOn($S_Title, $S_Text & @CRLF & "Press Enter to close this window.", $S_Size_X, $S_Size_Y)
HotKeySet("{ENTER}", "OffSplash")
EndFunc ;==>SplashMsg
Func OffSplash()
SplashOff()
HotKeySet("{ENTER}")
EndFunc ;==>OffSplash
Func close()
Exit
EndFunc ;==>close
Đánh lệnh như hướng dẫn vào là địa chỉ của tập tin exe làm trojan đó rồi ấn Enter... Mọi thứ hoàn tất thì đổi tên tập tin xXx.* thành xXx.wmf. Tiếp theo thì tải tập tin exe lên theo địa chỉ đã nhập rồi đính đoạn mã frame vào website của bạn là xong thôi. Lưu Ý: Thêm vào đoạn mã thông số của frame để nó nhỏ lại...
Quét máy lại xem có gì không đi bạn à...
Tốt nhất là học ĐH Bách Khoa rồi về sau tính tới thôi... Ai có điều kiện thì cứ việc nhá!
Hướng dẫn chi tiết lắm đó... Cảm ơn bạn nhiều nha !!!
Hic... Hay thật đó !!!
 
Go to Page:  First Page Page 1

Powered by JForum - Extended by HVAOnline
 hvaonline.net  |  hvaforum.net  |  hvazone.net  |  hvanews.net  |  vnhacker.org
1999 - 2013 © v2012|0504|218|