robotmaru Posted October 25, 2010 Share Posted October 25, 2010 Hi! I found a very useful program on the net, and i am trying to modify it to make it work for my needs. The original script waits for any inserted thumbdrive and instantly dumps it's contents on the working folder of the script. I would like to modify it to make it work for CDs instead of USB devices. I tried changing the highlighted part of the code that i'm posting, and it works. The only problem is that it works if you already have a cd in the computer, if not you get an error that there is no cd and even if you put one later it doesn't work. Is there a way to fix this? i would like it to start working as soon as i pop in a cd, without dialogs, and to work for more than a cd, so if one finishes copying and i put anther one, i want it to copy that one too. LINKS: ORIGINAL PROGRAM FROM IT'S WEBSITE==> http://www.irongeek.com/i.php?page=security/thumb-sucking-udf-flash-drive ORIGINAL PROGRAM SOURCE CODE==> http://pastebin.com/t2EX9TAy MY MODIFIED SOURCE CODE==> http://pastebin.com/1gbTS09P THANKS IN ADVANCE TO ALL OF YOU, I LOVE AUTOITSCRIPT!!!! Link to comment Share on other sites More sharing options...
robotmaru Posted October 25, 2010 Author Share Posted October 25, 2010 by the way, i am using windows xp sp3 if that can interest you! Link to comment Share on other sites More sharing options...
Varian Posted October 25, 2010 Share Posted October 25, 2010 I added a check for "DriveSpaceTotal"...if there is no error, then it proceeds with the copy#region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=thumb.ico #endregion ;**** Directives created by AutoIt3Wrapper_GUI **** Opt("TrayIconHide", 1) $DumpDir = @WorkingDir & "\" $OldCount = 0 While 1 $Var = DriveGetDrive("CDROM") If Not @error And $Var[0] <> $OldCount Then For $i = 1 To $Var[0] Local $DiskSize = DriveSpaceTotal($Var[$i]) If Not @error Then If $Var[$i] <> "a:" Then $CommandString = 'xcopy ' & $Var[$i] & '\ ' & '"' & $DumpDir & DriveGetLabel($Var[$i]) & '-Dump" /EHY' ;MsgBox(4096, "", $CommandString) DirCreate(DriveGetLabel($Var[$i]) & "-Dump") ;MsgBox(4096, "", DriveGetLabel ($var[$i])) Run($CommandString, "", @SW_HIDE) EndIf EndIf Next $OldCount = $Var[0] EndIf Sleep(5000) WEnd Link to comment Share on other sites More sharing options...
Chimaera Posted October 26, 2010 Share Posted October 26, 2010 That works very nice. What happens when it encounters a CD with copyright? And it would be sweet if it had a progress bar so you know its doing something. Nice work Chimaera If Ive just helped you ... miracles do happen. Chimaera CopyRobo() * Hidden Admin Account Enabler * Software Location From Registry * Find Display Resolution * _ChangeServices() Link to comment Share on other sites More sharing options...
Varian Posted October 27, 2010 Share Posted October 27, 2010 Here is one example of a copy with progress. You can search the forum for "progresscopy" or just "progress" for others.I'm not sure what would happen if the CD/DVD were copywright protected...I suppose that it would just never start/finsih the copying. You may include a timer to realize that the copy operation has failed. Link to comment Share on other sites More sharing options...
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