cheatera Posted November 20, 2008 Posted November 20, 2008 (edited) well as i w8ed on sum1 to help me with me other work http://www.autoitscript.com/forum/index.php?showtopic=84691 my brain was stucked and continued work on other program. there i needed big files, MUCH of them and etc. i made this little tool wich helped me alot and im sure it will help others. what it does? makes files makes files almost ASAP with any size u want. for what u may need it for? checking your hdd speed transfer, upload test speed, download test speed, RE-WRITE data on HDDs wich are formated but u know that the information is still there - with this tool u can make it re-write the tables. it's basicly an "autoit" call and a gui of windows's fsutil - a powerfull command tool for files, hdds and idk what else - it does it job well ... so here it is:CODE#include <ButtonConstants.au3>#include <ComboConstants.au3>#include <EditConstants.au3>#include <GUIConstantsEx.au3>#include <StaticConstants.au3>#include <WindowsConstants.au3>#include <Process.au3>;// options#NoTrayIcon;// vars$path = "c:\dummy.bin";// gui$main_gui = GUICreate("Dummy file maker", 353, 96, -1, -1)$browse_input = GUICtrlCreateInput($path, 8, 24, 313, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))$browse_button = GUICtrlCreateButton("...", 320, 24, 27, 21, 0)$size_input = GUICtrlCreateInput("0", 8, 64, 105, 21)$Updown1 = GUICtrlCreateUpdown($size_input)$store_label = GUICtrlCreateLabel("Store location. Avaliable free space on drive: " & Round(DriveSpaceFree(StringLeft(GUICtrlRead($browse_input), 3)), 1) & "MB", 8, 8, 353, 15)$Label2 = GUICtrlCreateLabel("Size", 8, 48, 24, 15)$type_input = GUICtrlCreateCombo("KB", 120, 64, 65, 25)GUICtrlSetData(-1, "MB|GB")$create_button = GUICtrlCreateButton("Create", 192, 64, 75, 25, 0)$exit_button = GUICtrlCreateButton("Exit", 272, 64, 75, 25, 0)GUISetState(@SW_SHOW);// main loopDo$msg = GUIGetMsg() If $msg = $browse_button then $path = FileSaveDialog("Save dummy file to ...", "c:\", "All (*.*)", 2, "dummy.bin") If FileExists($path) then MsgBox(0, "Dummy file maker", "File must NOT exist.") Else If $path = "" then $path = "c:\dummy.bin" GUICtrlSetData($browse_input, $path) GUICtrlSetData($store_label, "Store location. Avaliable free space on drive: " & Round(DriveSpaceFree(StringLeft(GUICtrlRead($browse_input), 3)), 1) & "MB") Else GUICtrlSetData($browse_input, $path) GUICtrlSetData($store_label, "Store location. Avaliable free space on drive: " & Round(DriveSpaceFree(StringLeft(GUICtrlRead($browse_input), 3)), 1) & "MB") EndIf EndIF EndIf If $msg = $create_button then $size = GUICtrlRead($size_input) $size_check = $size If GUICtrlRead($type_input) = "KB" then $size = $size * 1024 EndIf If GUICtrlRead($type_input) = "MB" then $size = $size * 1024 * 1024 EndIf If GUICtrlRead($type_input) = "GB" then $size = $size * 1024 * 1024 * 1024 EndIf If $size <= 0 then MsgBox(0, "Dummy file maker", "Desired size cannot be negative or 0 (zero).") Else $answer = MsgBox(4, "Dummy file maker", "Please confirm the folowing:" & @CRLF & "Dummy file size: " & $size & "KB" & @CRLF & "Destination: " & GUICtrlRead($browse_input)) If $answer = 6 then _RunDOS("fsutil file createnew """ & GUICtrlRead($browse_input) & """z " & $size) MsgBox(0, "Dummy file maker", "Creation completed.") Else MsgBox(0, "Dummy file maker", "Creation aborted.") EndIf EndIf EndIfUntil $msg = $GUI_EVENT_CLOSE or $msg = $exit_buttonif needed - optimise it a little or a much ... it does whats made to do so i dont think there will be major changes.cheers for now and PLS look at my other topic - i rly need help there ...p.s.: s0z f0r m3 b4a 3ngl|shp.s2.: forgot to mention it - XP only ... or i didnt tested it on other yet (9x/me - abs no) Edited November 20, 2008 by cheatera Is There A Life BEFORE Death?im stupidSaved warn logs: cheateraSmOke_N Note Added 17 January 2009 - 02:54 PM Added to warn level Posting a way to hack the registry and force sending someones desktop via TCP. Jos Note Added 25 November 2008 - 02:52 PM Added to warn level for being an impolite rookie.once a year i go bad ... what will happen in 2010??[u]Its GOOD to be BAD ... (Warlock's Succubus - World of Warcraft)[/u]
ludocus Posted November 20, 2008 Posted November 20, 2008 interesting... although this might be used for a virus or something to use up memory..
cheatera Posted November 20, 2008 Author Posted November 20, 2008 (edited) ok this was the thing i DIDNT think of - a virus ... but yes it may .... windows sometimes hangs if there isnt atleast 200 mb free space on C:\ or your main hdd ... so it will be sumthing like fsutil file createfile "c:\documents and settings\default user\local settings\new folder\file.bin" $drive_size it will fill up all your free space on drive c:\ and the reason its in this folder is bcoz its aways hidden by default warning: i DONT want to make viruses or sumthing similar - educational supose only! p.s.: s0z f0r m3 b4d 3ngl|sh Edited November 20, 2008 by cheatera Is There A Life BEFORE Death?im stupidSaved warn logs: cheateraSmOke_N Note Added 17 January 2009 - 02:54 PM Added to warn level Posting a way to hack the registry and force sending someones desktop via TCP. Jos Note Added 25 November 2008 - 02:52 PM Added to warn level for being an impolite rookie.once a year i go bad ... what will happen in 2010??[u]Its GOOD to be BAD ... (Warlock's Succubus - World of Warcraft)[/u]
WeMartiansAreFriendly Posted November 20, 2008 Posted November 20, 2008 interesting...although this might be used for a virus or something to use up memory..I'm making a virus right now. Don't bother, It's inside your monitor!------GUISetOnEvent should behave more like HotKeySet()
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now