Script Help: Delete Last File on F9 Press

[CrowexBR]

Could someone please help me with a script to delete the last file in the directory
C:\Users\crowe\OneDrive\Pictures\Screenshots when I press {F9}?

Thank you.

[mikeyww]

Hello,

How is "last file" defined?

[CrowexBR]

Hello,

How is "last file" defined?

For example, I clicked "win + printscreen" to take a screenshot of the screen:

printscreen01.png
printscreen02.png
printscreen03.png

And then I press {F9} so that I can find the last file to delete, which would be printscreen03.png

Got it?

[mikeyww]

Are you referring to the file that is last in alphanumeric order by filename?

[Seven0528]

　Wouldn't it be a good idea to use Loop Files to obtain the file path with the most recent A_LoopFileTimeCreated value?
(Anyway, I'm just realizing now that screenshots are being saved to OneDrive...)

[CrowexBR]

Are you referring to the file that is last in alphanumeric order by filename?

Yes, I meant the file that was created most recently in terms of order of creation date.
So, I can delete the most recently created file this way.

[mikeyww]

Code: Select all

#Requires AutoHotkey v2.0

F9:: {
 Static shotsDir := StrReplace(A_Desktop, 'Desktop', 'Pictures\Screenshots')
 If FileExist(newest := getNewestFile(shotsDir)) {
  FileRecycle newest
  MsgBox 'Deleted:`n`n' newest, 'Status', 'Iconi'
 } Else MsgBox 'Nothing was deleted.', 'Warning', 'Icon!'
}

getNewestFile(dir) {
 time := 0
 Loop Files dir '\*.*'
  If A_LoopFileTimeCreated > time {
   time  := A_LoopFileTimeCreated
   fPath := A_LoopFilePath
  }
 Return fPath ?? ''
}

[CrowexBR]

Code: Select all

#Requires AutoHotkey v2.0

F9:: {
 Static shotsDir := StrReplace(A_Desktop, 'Desktop', 'Pictures\Screenshots')
 If FileExist(newest := getNewestFile(shotsDir)) {
  FileRecycle newest
  MsgBox 'Deleted:`n`n' newest, 'Status', 'Iconi'
 } Else MsgBox 'Nothing was deleted.', 'Warning', 'Icon!'
}

getNewestFile(dir) {
 time := 0
 Loop Files dir '\*.*'
  If A_LoopFileTimeCreated > time {
   time  := A_LoopFileTimeCreated
   fPath := A_LoopFilePath
  }
 Return fPath ?? ''
}

I got error:

[mikeyww]

Use the latest version posted.