WinActivate("[CLASS:StandardFrame]") ;WinActivate("姓名") ;局限于不同用户的姓名 ;WinActivate("[ACTIVE]"， "")
ControlSetText("[ACTIVE]"，""，""，$message) ;Send("test message:{Chr(F92C)}");不支持中文
Send("{Enter}")
WinClose("[ACTIVE]")
EndFunc

Func sign_in()
If Not WinExists($windows) Then
   MsgBox(0，""，"请启动aliwangwang。再运行.")
   Exit
  EndIf
Run($aliwangPath & "AliIM.exe")
WinWait($aliwangwang)
;功能实现：登录阿里旺旺
WinActivate($aliwangwang)
$XY=wingetpos($aliwangwang) ;获取坐标
;用户名输入
mouseclick("left"，$XY[0]+135，$XY[1]+208) 
Send("{HOME}+{END}{Delete}") ;清空原有内容
Send($userid，1) ;1表示全部为普通字符
;密码输入
mouseclick("left"，$XY[0]+135，$XY[1]+260) ;Send("{BS 18}")
Send("{HOME}+{END}{Delete}")
Send($password，1)
;登录按钮点击
mouseclick("left"，$XY[0]+135，$XY[1]+380)
;如何验证登陆成功？
WinWait($wangwangTitle)
Sleep(1000)
;下面代码实现感觉没问题，但此种方式登录一直提示密码错误，奇怪，怪哉！
;WinActivate("阿里旺旺2009")
;ControlSend("阿里旺旺2009"， ""， "[CLASS:EditComponent;INSTANCE:2]"， "zhanqiao123") ;Send("{TAB}")
;ControlSend("阿里旺旺2009"， ""， "[CLASS:ATL:Edit;INSTANCE:1]"，"stonemouse");Send("{Enter}")
;$a = ControlClick("阿里旺旺2009"， ""， "[CLASS:StandardButton;INSTANCE:8]"，"left"，1)
;MsgBox(0，"登录结果"，$a)
EndFunc
Func sign_out()
;功能实现：注销用户
MouseMove(1， 1) ;这样做的目的是把鼠标移开，否则刚好鼠标停留在‘菜单’上出现其他窗口，会影响下面执行
ControlClick($wangwangTitle，""，"[CLASS:StandardButton; INSTANCE:1]") ;点击出现菜单的按钮
WinActivate("[CLASS:coolmenu]") ;窗口切换到‘菜单’
ControlClick("[CLASS:coolmenu]"，""，"[CLASS:StandardButton; INSTANCE:1]") ;点击‘注销’按钮
;如何验证注销成功？
WinClose("[ACTIVE]")
EndFunc
Func exit_process()
;功能实现：注销并退出程序
MouseMove(1， 1) ;这样做的目的是把鼠标移开，否则刚好鼠标停留在‘菜单’上出现其他窗口，会影响下面执行
ControlClick($wangwangTitle，""，"[CLASS:StandardButton; INSTANCE:1]") ;点击出现菜单的按钮
WinActivate("[CLASS:coolmenu]") ;窗口切换到‘菜单’
ControlClick("[CLASS:coolmenu]"，""，"[CLASS:StandardButton; INSTANCE:2]") ;点击‘退出’按钮
;如何验证退出成功？
EndFunc