MT4到达压力位支撑位自动发送微信消息提醒

1.在MT4中设置条件警报（例如达到多少点位），创建警报，按照图片中操作即可

2.vbs文件内容如下，注意编码格式为ANSI，不要为UTF-8之类的否则报错：

dim program1,name,Msg  '定义变量并分配内存
'Inputbox()函数进行输入
name="杨文胜"
Msg="重点关注上沿11670预期值"
num=1
'program1表示WeChat.exe的位置
program1="C:\Program Files (x86)\WXWork\WXWork.exe"
'program1="D:\other-systems\QQ\Bin\QQ.exe"
program1="C:\Program Files (x86)\Tencent\WeChat\WeChat.exe"
set wshshell=CreateObject("wscript.shell")  '创建Windows的shell对象打开shell窗口
'在Windows的shell窗口执行cmd.exe /c echo " & Name & " | clip.exe"将name复制到剪切板中
wshshell.Run "cmd.exe /c echo " & Name & " | clip.exe",0,True
wshshell.Run "mshta javascript:window.execScript('window.close','vbs')",0,True
'通过绝对路径的方式打开微信窗口
set oexec=wshshell.exec(program1)
wscript.sleep 500  '停留500毫秒
wshshell.sendKeys "^f" '执行ctrl + F快捷键在微信窗口唤醒搜索功能
wscript.sleep 500  
wshshell.sendKeys "^v"  '粘贴要搜索的name
wscript.sleep 500
wshshell.sendKeys "{ENTER}"  '按键盘的enter键，进入要发送消息的name联系人窗口
wscript.sleep 500
'在Windows的shell窗口执行cmd.exe /c echo " & Name & " | clip.exe"将发送的消息内容复制到剪切板中
wshshell.Run "cmd.exe /c echo " & Msg & " | clip.exe",0,True
wscript.sleep 500
for i=1 to num   '循环发送num次
wshshell.sendKeys "^v"  '粘贴要发送的msg消息内容
wscript.sleep 500
wshshell.sendKeys "{ENTER}"    '按enter键进行发送
next
wscript.quit

3.效果如下：