微信图片半自动自动另存 Autohotkey

SaveFolder := "d:desktopautosave" ;要保存的位置
global WechatProfileFolder := "D:DocumentsWeChat Fileswxid_xxxxxxx" ;微信个人存档位置,一般在我的文档下面
IfNotExist % SaveFolder
    FileCreateDir % SaveFolder
 
global TmpImgPath := WechatProfileFolder "FileStorageTempMM_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
}

人已赞赏
AHKV1精选内容

开机自动设置电脑IP Autohotkey

2020-2-16 10:08:00

AHKV1精选内容

VaxSIPUserAgentOCX.ocx 软电话控件简单使用 AutoHotkey

2020-2-16 10:14:35

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
今日签到
搜索