Leaderboard

Why don't you save the timestamp in the JPG itself?

Ok... no answer is also an answer. *click*

@ioa747 please never think I don't want to share it but the last versions and their hotkeys are very much linked to the software I use (XYplorer, ACDsee, Opera, FF etc...) plus they all require a special reworked version of "ArrayDisplayInternals.au3" with functions named for example Func _ArrayDisplay_Is_Calling(), tweaks etc... which makes the script impossible to run outside of my computer, without downgrading it. When I have time, I'll try to check if an older release (including drag & drop) could be more suitable to AutoIt users, but it will take time because of all the releases done these last years :

@jchd that's great (never used $CF_HDROP before). What about this, quickly done, no error checking : error should be checked, or we could use a simple ClipGet() in this case #include <Array.au3> #include <Clipboard.au3> #include <WinAPISysWin.au3> _ClipBoard_Open(0) Local $aSelected = _WinAPI_DragQueryFileEx(_ClipBoard_GetDataEx($CF_HDROP)) _ArrayDisplay($aSelected) _ClipBoard_Close() Just tested on thousand of files in Windows, System32, after selecting and copying all of them to clipboard (Ctrl+a, Ctrl+c) Edit: I tried this after reading what follows on msdn : CF_HDROP (15) A handle to type HDROP that identifies a list of files. An application can retrieve information about the files by passing the handle to the DragQueryFile function.

I don't have a folder with 10K files in it, but this works with 400 files, providing an array with each file in its own cell. Of course, you have to first select many files using Explorer, then run this code (even uncompiled) and handle the drop at your own pace. _ClipBoard_Open(0) Local $data = _ClipBoard_GetData($CF_HDROP) Local $bin = BinaryMid($data, 21, BinaryLen($data) - 24) Local $c, $s For $i = 1 To BinaryLen($bin) Step 2 $c = BinaryMid($bin, $i, 2) $s &= ($c <> 0 ? ChrW($c) : "|") Next $aFiles = StringSplit($s, "|", 3) _ArrayDisplay($aFiles) ; Close the clipboard _ClipBoard_Close()

https://web.archive.org/web/20160210021740/https://sites.google.com/site/ascend4ntscode/ 😃

Look here: Func GetProcessorId() $objWMIService = ObjGet("winmgmts:\\localhost\root\CIMV2") $colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Processor", "WQL",0x10+0x20) If IsObj($colItems) Then For $objItem In $colItems Local $PROC_ID = $objItem.ProcessorId Next Return $PROC_ID Else Return 0 EndIf EndFunc MsgBox(0,"",GetProcessorId())