系统首页
点击进入系统：doform用户登录scx
用户登录
releasethisform
登陆：usepasswordLocateFor用户密码thisform。text1。valuea
d用户名thisformcombo1。displayvalue
IfEof
？Messagebox”密码错误请重新输入”，04800