Привет
друг дал мне замечательную небольшую программу для переименования моих фотографий (пакетное переименование). это намного проще, чем все другие программы, которые я нашел так долго, и мне это очень нравится. Единственная проблема заключается в том, что, поскольку я изменил свой компьютер и использую Windows 8, я больше не могу использовать программу. Он дал мне код. это выглядит так:
GroupAdd, Explorer, ahk_class ExploreWClass
GroupAdd, Explorer, ahk_class CabinetWClass
#IfWinActive, ahk_group Explorer
^j::
Paths =
for Window in ComObjCreate("Shell.Application").Windows
Selected := Window.Document.SelectedItems
for item in Selected
Paths .= item.path "`n"
InputBox,Suffix, `n Massrenamer for files and thumbnails by CASABIO.org, (Select a file or multiple files in Windows Explorer and press Ctrl + J
Type in the word to be appended to the file name
If nothing happens, try re-opening explorer)
If ErrorLevel != 0
Return
Loop,Parse,Paths,`n
{
If A_LoopField =
Break
SplitPath,A_LoopField,,Dir,Ext,Name
FileMove,%A_LoopField%,% Dir "\" Name " " Suffix "." Ext,1
}
Return
Я ничего не понимаю здесь, но, возможно, кто-то может сказать мне, как я мог изменить вещь, чтобы она работала в Windows 8
большое спасибо!