DONE: One Click File Extension Changer

[pulphero]

In my work, I often change file extensions from one to the other, and then back again, and then back again, and so on.

I'd love to have a little AHK script that would do this:

If I select a file with an .epub extension in Explorer and press Ctrl+`, the file extension will change to .zip.

If I select a file with a .zip extension in Explorer and press Ctrl+`, the file extension will change to .epub.

I put in epub/zip and the hotkey Ctrl+` as examples. I figure a user would be able to adjust those things as needed.

Thanks!

[skwire]

Here's one way to do it via AutoHotkey.  It should be pretty easy to follow so modify it as necessary.

Code: Autohotkey [Select]

1. ^`::
2. {
3.     ; Get the highlighted selection onto the clipboard and crack its path.
4.     Send, ^c
5.     myFile := Clipboard
6.     SplitPath, myFile, OutFileName, OutDir, OutExtension, OutNameNoExt, OutDrive
7.    
8.     ; Determine current and new extensions.
9.     If ( OutExtension = "epub" )
10.     {
11.         myExtension := "zip"
12.     }
13.     Else If ( OutExtension = "zip" )
14.     {
15.         myExtension := "epub"
16.     }
17.  
18.     ; Check that the destination file doesn't already exist.
19.     If ! FileExist( OutDir . "\" . OutNameNoExt . "." . myExtension )
20.     {
21.         ; Destination file does not exist so rename existing file with new extension.
22.         FileMove, % myFile, % OutDir . "\" . OutNameNoExt . "." . myExtension
23.     }
24.     Else
25.     {
26.         ; Destination file exists.  Warn user and do nothing.
27.         MsgBox, Destination file already exists.  Aborting...
28.     }
29. }
30. Return

[pulphero]

Thanks, but no joy. I saved the code as "ExtSwitch.ahk", double-clicked that file, selected an .epub file, and pressed Ctrl + ` (the hotkey). Nothing happened; no error message, either.

[skwire]

Thanks, but no joy. I saved the code as "ExtSwitch.ahk", double-clicked that file, selected an .epub file, and pressed Ctrl + ` (the hotkey). Nothing happened; no error message, either.

-pulphero (September 13, 2016, 07:05 PM)

I think I looked at your hotkey wrong and substituted an apostrophe for the backtick you had.  Please recopy the code above and try it again.

[Ath]

Just tried it and it seems to work just fine.
It might take your Explorer a few seconds to refresh the list of files though, maybe a Ctrl-R/F5 press (refresh) might fix that?

[pulphero]

Sorry for not seeing that myself. It works like a charm. Much appreciated!

[skwire]

Sorry for not seeing that myself. It works like a charm. Much appreciated!

-pulphero (September 14, 2016, 07:02 AM)

Good to hear.  I'll move this to the Finished section.