当自动热键将文本字符串插入文件时，我需要该文件的名称和路径.AHK可以给我吗?

Question

我使用自动热键将文本字符串插入文本文件。如何将该文件的路径和名称存储在新变量中？

假设我使用此代码插入日期/时间戳：

::iii::  ; insert a date time stamp
send, ID%A_YYYY%.%A_MM%.%A_DD%.%A_Hour%.%A_Min%.%A_Sec%
return

如何修改代码以存储要标记的文件的路径和名称？

像这样的东西？

：

::iii::  ; insert a date time stamp
send, ID%A_YYYY%.%A_MM%.%A_DD%.%A_Hour%.%A_Min%.%A_Sec%
path = <code for extracting path>
filename = <code for extracting filename>
return

Answer 1

尝试

::iii::  ; insert a date time stamp
    SendInput, ID%A_YYYY%.%A_MM%.%A_DD%.%A_Hour%.%A_Min%.%A_Sec%{Enter}
    SendInput, % GetFilePath_notepad() "`n"
    SendInput, % GetFileName_notepad() "`n"
return

GetFilePath_notepad(){
    If !WinActive("ahk_class Notepad")
    {
        MsgBox, Notepad isn't active
        return
    }
    ; https://autohotkey.com/docs/commands/ComObjGet.htm
    Path := ""
    WinGet pid, PID, A
    wmi := ComObjGet("winmgmts:")
    queryEnum := wmi.ExecQuery(""
    . "Select * from Win32_Process where ProcessId=" . pid)
    ._NewEnum()
    If queryEnum[process]
    {
        Pos := InStr(process.CommandLine, .exe,, 1) 
        Path := SubStr(process.CommandLine, Pos+6)
    }
    else
        MsgBox, Process not found!
    wmi := queryEnum := process := ""
    If (Path != "")
        return %Path%
    else
        MsgBox, Path not found!     
}
GetFileName_notepad(){
    If !WinActive("ahk_class Notepad")
    {
        MsgBox, Notepad isn't active
        return
    }
    WinGetTitle, WinTitle, A
    If (SubStr(WinTitle, -9) = " - Notepad")
        FileName := SubStr(WinTitle, 1, -10)
    If (SubStr(WinTitle, -8) = " - Editor")
        FileName := SubStr(WinTitle, 1, -9)
    If (SubStr(FileName, 1, 1) = "*")
        FileName := SubStr(FileName, 2)
    return %FileName%
}

编辑：

的

SendInput, % GetFilePath_notepad() "`n"
SendInput, % GetFileName_notepad() "`n"

您可以使用

FilePath := GetFilePath_notepad()
    SendInput, %FilePath%{Enter}
FileName := GetFileName_notepad()
    SendInput, %FileName%{Enter}

发送输入比发送更快、更可靠

Answer 2

可以使用 WinGet 命令获取当前活动窗口的完整路径：
WinGet, path, ProcessPath, A

path 是存储命令结果的变量。
ProcessPath 是命令的一个参数，用于告诉它要提取哪些信息，在本例中为进程路径。
A表示您要获取当前活动窗口的信息。

若要获取当前活动窗口的标题，请使用 WinGetActiveTitle 命令： WinGetActiveTitle, thetitle

StringTrimRight用于从窗口标题中删除" - 记事本">部分。

---

您可以使用以下内容测试您的代码：

::iii::  ; insert a date time stamp
send, ID%A_YYYY%.%A_MM%.%A_DD%.%A_Hour%.%A_Min%.%A_Sec%
WinGet, path, ProcessPath, A
WinGetActiveTitle, thetitle
StringTrimRight, thetitle, thetitle ,10
Msgbox, path=%path% `ntitle=%thetitle%
return