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)
;功能實現(xiàn)：登錄阿里旺旺
WinActivate($aliwangwang)
$XY=wingetpos($aliwangwang) ;獲取坐標
;用戶名輸入
mouseclick("left"，$XY[0]+135，$XY[1]+208) 
Send("{HOME}+{END}{Delete}") ;清空原有內(nèi)容
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)
;下面代碼實現(xiàn)感覺沒問題，但此種方式登錄一直提示密碼錯誤，奇怪，怪哉！
;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，"登錄結(jié)果"，$a)
EndFunc
Func sign_out()
;功能實現(xiàn)：注銷用戶
MouseMove(1， 1) ;這樣做的目的是把鼠標移開，否則剛好鼠標停留在‘菜單’上出現(xiàn)其他窗口，會影響下面執(zhí)行
ControlClick($wangwangTitle，""，"[CLASS:StandardButton; INSTANCE:1]") ;點擊出現(xiàn)菜單的按鈕
WinActivate("[CLASS:coolmenu]") ;窗口切換到‘菜單’
ControlClick("[CLASS:coolmenu]"，""，"[CLASS:StandardButton; INSTANCE:1]") ;點擊‘注銷’按鈕
;如何驗證注銷成功？
WinClose("[ACTIVE]")
EndFunc
Func exit_process()
;功能實現(xiàn)：注銷并退出程序
MouseMove(1， 1) ;這樣做的目的是把鼠標移開，否則剛好鼠標停留在‘菜單’上出現(xiàn)其他窗口，會影響下面執(zhí)行
ControlClick($wangwangTitle，""，"[CLASS:StandardButton; INSTANCE:1]") ;點擊出現(xiàn)菜單的按鈕
WinActivate("[CLASS:coolmenu]") ;窗口切換到‘菜單’
ControlClick("[CLASS:coolmenu]"，""，"[CLASS:StandardButton; INSTANCE:2]") ;點擊‘退出’按鈕
;如何驗證退出成功？
EndFunc