Sign in to follow this  
Followers 0
Rogue5099

Open Zip see files choose to delete

1 post in this topic

#1 ·  Posted (edited)

So my 1 TB just crashed running recovery's on it and all of the files I use to keep where in .zip or .rar. I would like to Open the .zip/.rar file see contains and choose to delete or keep. All files are file1.zip, file12.zip, file113.zip all the way up to file112986.zip and same goes for .rar file1.rar-file16450.rar.

Double clicking each one is becoming annoying. Also would like to have option to change file name which is easy once I see contains, FileMove().

I have no time at the moment cause I am trying to sort through tons of data so any help would be apperciated (I havn't put any time into scripting this at all)

Edit:

So far made this to get started should work fine.

For $i = 1 To 112986
    Run(@ComSpec & ' /k "C:\Program Files (x86)\7-Zip\7z.exe" l "C:\Users\Rogue\Desktop\New folder\ZIP file\file'&$i&'.zip"')
    $Msg = MsgBox(4, "Recovery", "Keep?")
    If $Msg = 7 Then
        FileDelete("C:\Users\Rogue\Desktop\New folder\ZIP file\file"&$i&".zip")
    ElseIf $Msg = 6 Then
        $NewName = InputBox("New Name", "Enter new Name", ".zip")
        FileMove("C:\Users\Rogue\Desktop\New folder\ZIP file\file"&$i&".zip", "C:\Users\Rogue\Desktop\Keep\"&$NewName)
    Else
        Exit
    EndIf
Next
Edited by rogue5099

Share this post


Link to post
Share on other sites



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 account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0