登录窗口
来源:互联网 发布:mac有什么好玩的游戏 编辑:程序博客网 时间:2024/04/29 16:29
//用户名单行框:
String ls_UserName
Integer li_IsExist
If key=KeyEnter! Then
ls_UserName = Trim(This.Text)
Select Count(*) into:li_IsExist From password where username=:ls_UserName;
If li_IsExist<=0 Then
MessageBox("错误","该用户不存在")
This.SelectText(1,Len(This.Text))
Return
End If
sle_password.SetFocus()
End If
//密码单行框:
If Key=KeyEnter! Then cb_1.TriggerEvent("clicked")
//登录按钮:
String ls_Password,ls_UserPass
ls_Password = Trim(sle_password.Text)
If trim(sle_username.text)='' Then
MessageBox("错误","请输入用户名")
Return
End If
Select password into:ls_UserPass From password where username=:sle_username.text;
If ls_Password=ls_Userpass Then
Open(w_changepass)
Close(Parent)
Else
MessageBox("错误","密码不存在")
sle_password.SelectText(1,Len(sle_password.Text))
Return
End If
- 登录窗口
- 登录窗口
- 登录窗口
- 登录窗口
- Web标准登录窗口
- C#登录窗口
- 弹出窗口登录效果
- C# 登录窗口代码
- 登录窗口实现
- div弹出登录窗口
- .Net 登录窗口
- DIV弹出式登录窗口
- Duilib登录窗口
- ExtJs4 用户登录窗口
- Qt 登录窗口实现
- 登录退出窗口
- ExtJS登录窗口程序
- pyqt的登录窗口
- 入职了
- 当美女失去声音… 当美女失去声音…
- 何时使用委托而不使用接口
- 搏击
- ASP.NET.2.0.in.C.Sharp.2005.From.Novice.to.Professional的读书笔记[7]
- 登录窗口
- 网管使用期
- Linux 进程管理
- 自主创业的十大误区
- 我真的需要读软件工程的硕士吗?
- 应届毕业生少走弯路的十条忠告
- dojo.declare说明
- Java API文档中文版出了.一块下啦..............
- 数据库系统崩溃后的一般处理步骤