微信相关简单ahk增强抛砖引玉

最近做的微信相关的比较多,发现都是些简单的操作,由于不会acc,只能模拟按键,希望分享出来后有大佬提供更靠谱的方法,纯属抛砖

 

首先是向微信发东西的函数

WechatSend(who){
send,^!w
Send,^f %who%
Sleep 600
send,{Enter} 
Sleep 300
send,^v 
Sleep 100
send,{Enter}
return
}

只要没有改微信自带的快捷键就可以这么使用,个人感觉使用winacivate的方法没有办法激活隐藏的微信不如直接模拟按键,但是这个玩意没有办法判断是否发送成功

首先是用到的函数

Copy(){
Clipboard:=""
SendInput,^c
ClipWait,1
return Clipboard
}


pcname:
command_pcname = wmic csproduct get name
pcname := cmdSilenceReturn(command_pcname)
pcname := StrReplace(pcname, A_Space, "")
pcname := StrReplace(pcname, "`r`n")
pcname := SubStr(pcname, 5, StrLen(pcname))
Return

cmdSilenceReturn(command){
    CMDReturn:=""
    cmdFN:="RunAnyCtrlCMD"
    try{
        RunWait,% ComSpec " /C " command " > ""%Temp%\" cmdFN ".log""",, Hide
        FileRead, CMDReturn, %A_Temp%\%cmdFN%.log
        FileDelete,%A_Temp%\%cmdFN%.log
    }catch{}
    return CMDReturn
}
#x::
copy()
Gosub pcname
pcname!="82DM" ? WechatSend("何振宁") : WechatSend("文件传输")
Return  

#v::
copy()
send,^!w ^v
Return

这是两个简单的发送东西的示例

其中一个是根据你的电脑判断给谁发,相当于是在单位就发自己微信,在家发文件助手,实现一个简单的判断

希望各位大佬能提供更好的微信自动化的方法

给TA捐赠
共{{data.count}}人
人已捐赠
其他

easyini库使用(2)也是批量搜索工具的升级版

2022-4-19 8:40:45

其他

vbe也就是vba的编辑器的按键增强

2022-4-22 13:27:57

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
有新私信 私信列表
搜索