AutoHotKey: Como faço para obter a 'Data de modificação' do meu diretório de trabalho atual na área de transferência?

0

Eu tenho um script que registra o nome básico da pasta e a contagem de arquivos dos diretórios de mídia em nosso servidor em uma planilha. No entanto, também preciso adicionar uma linha de código que recupere a 'Data de modificação' do diretório de trabalho atual e coloque-a na área de transferência. Há uma seção de código que pega a contagem de arquivos do diretório de trabalho e os coloca na área de transferência e eu gostaria de executar a recuperação da data modificada depois que os dados forem inseridos na planilha.

O endereço atual do diretório de trabalho já está na área de transferência antes do cálculo da contagem de arquivos, portanto, depois que o valor da contagem de arquivos é colado na planilha, posso voltar e fazer o endereço do diretório entrar novamente na área de transferência disso).

Alguém sabe qual código eu preciso colocar para obter a data de modificação do endereço de diretório que eu tenho na área de transferência e depois copiar os dados da data modificada para a área de transferência logo em seguida?

F1::

Spreadsheet:

{

Send, {F2}
Sleep, 200
Send, {Ctrl Down}
Sleep, 50
Send, c
sleep, 50
Send, {Ctrl Up}
Sleep, 200
Mouseclick, Left, 522,1009
Sleep, 200
Send, {Ctrl Down}
Sleep, 50
Send, v
sleep, 50
Send, {Ctrl Up}
Sleep, 100
Send, {Right}
Sleep, 50
Send, {Right}
Sleep, 50
Send, {Right}
Sleep, 200
Mouseclick, Left, 590,1013
Sleep, 200
Send, {Enter}
Sleep, 100
Send, {Alt Down}
Sleep, 100
Send, D
Sleep, 100
Send, {Alt Up}
Sleep, 100
Send, {Ctrl Down}
Sleep, 50
Send, c
sleep, 50
Send, {Ctrl Up}

; Calculate the number of files in a folder and its subfolders:
SetBatchLines, -1  ; Make the operation run at maximum speed.
FileNum = 0
; FileSelectFolder, WhichFolder  ; Ask the user to pick a folder.
WhichFolder := Clipboard  ;  assumes full path to folder is in clipboard
Loop, Files, %WhichFolder%\*.*, R
{
    if A_LoopFileAttrib contains H,R,S  ; Skip any file that is either Hidden, Read-only, or System
        continue  ; Skip this file and move on to the next one
    FileNum += 1
}
Clipboard := FileNum
ClipWait  ; Wait for the clipboard to contain text.

Sleep, 200
Mouseclick, Left, 522,1009
Sleep, 200
Send, {Ctrl Down}
Sleep, 50
Send, v
sleep, 50
Send, {Ctrl Up}
Sleep, 100
Send, {Down}
Sleep, 50
Send, {Left}
Sleep, 50
Send, {Left}
Sleep, 50
Send, {Left}
Sleep, 200
Mouseclick, Left, 590,1013
Sleep, 250
Send, {Tab}
Sleep, 400
Send, {Right}
Sleep, 100
Send, {Right}
Sleep, 100
Send, {Right}
Sleep, 100
Send, {Right}
Sleep, 100
Send, {Right}
Sleep, 100
Send, {Enter}
Sleep, 100
Send, {Down}
Goto, Spreadsheet


Esc::ExitApp

Muito obrigado por qualquer ajuda antecipadamente!

    
por Myles 24.09.2018 / 14:37

1 resposta

2

O código AHK que você precisa é:

folder = %clipboard%
FileGetTime, modtime , %folder%, A
FormatTime, mytime , %modtime%, yyyymmddhh24
clipboard = %mytime%

Isto irá copiá-lo no formato de YYYYMMDDHH24 , que você talvez precise colocar em seu formato preferido.

    
por 24.09.2018 / 15:08