力控脚本程序.doc

.1. 系统登录（1）IF LoginEx(username,userpwd)=1 THENDisplay(机组监控);ENDIF（2）IF LoginEx(username,userpwd)=1 THENDisplay(机组监控);userpwd=;username=;ELSEMsgBox(用户名或密码不正确,请重新输入);#Text4.Text=;userpwd=;ENDIF2.系统退出IF MsgBox(确定要退出系统么？)=1 THENExit(0);ENDIF3.登录界面username=;userpwd=;LogoutEx();CloseWindowEx(机组监控);CloseWindowEx(历史数据查询);CloseWindowEx(实时曲线);CloseWindowEx(控制参数);/#Flash.GotoFrame(1);/#Flash.Play();4.登录密码IF userpwd THEN#Text22