SaveFolder := "d:\desktop\autosave" ;要保存的位置 global WechatProfileFolder := "D:\Documents\WeChat Files\wxid_xxxxxxx" ;微信个人存档位置,一般在我的文档下面 IfNotExist % SaveFolder FileCreateDir % SaveFolder global TmpImgPath := WechatProfileFolder "\FileStorage\Temp\MM_WeChat_Image.dat" LastSize := GetTmpImgSize() LastHWnd := "" Loop { WinWait, ahk_class ImagePreviewWnd { WinGet, TmpHwnd, ID, ahk_class ImagePreviewWnd if(TmpHwnd<>LastHWnd) { LastHWnd := TmpHwnd while(LastSize <> (TmpSzie := GetTmpImgSize())) { LastSize := GetTmpImgSize() Sleep, 500 } FileCopy, % TmpImgPath, % SaveFolder "\" Clipboard ".jpg", 1 WinClose, ahk_id %TmpHwnd% } else Sleep, 500 } } GetTmpImgSize() { IfExist % TmpImgPath { FileGetSize, size, % TmpImgPath return size } else return 0 }
62 queries in 1.844 seconds |