Rem A1
Dim Hwnd,HwndEx
Call 获取句柄
Sub 获取句柄
Hwnd = Plugin.Window.Find(0, "stjiatu旗舰店:导购809 - 消息通知")
HwndEx = Plugin.Window.FindEx(Hwnd, 0, 0, 0)
HwndEx = Plugin.Window.FindEx(HwndEx, 0, 0, 0)
HwndEx = Plugin.Window.FindEx(HwndEx, 0, 0, 0)
Call 找到核对
End Sub
Sub 找到核对
Delay 100
Call Plugin.Bkgnd.LeftClick(HwndEx, 600, 346)
End Sub
Delay 7000
Goto A1