板 1- 前 次 新 ﾚｽ
スクリプト投稿スレ
[60]unnamed.ahk：05/01/23 17:13 ID:E7DmBcio
↑ファイルがフルパス表示だったので変更。変更した近辺のみ記載
Menu:
・
・
Loop, Parse, File, `n
{
if A_LoopField is not space
{
if A_index = 1
Menu, Menu, Add
SplitPath, A_LoopField, OutFileName, OutDir, OutExt, OutNameNoExt, OutDrive
Menu, Menu, Add, %OutFileName%, Next
}
}・
・
Next:
FileGetAttrib, Attrib, %A_ThisMenuItem%
IfInString, Attrib, D
{
Menu, Menu, DeleteAll
Path = %A_ThisMenuItem%
Gosub, Menu
}
else
{
Path = %OutDir%\%A_ThisMenuItem%
Goto, Open
}
return
Open:
Run,hogehoge.exe "%Path%"
ExitApp
前 次