|
Case
"logon.htm"
'登录页面
wb.AddPageTitle("","pageheader","销售系统","由湛江辉迅基于Foxtable开发")
If e.PostValues.ContainsKey("username") AndAlso e.PostValues.ContainsKey("password") Then
'判断是否是验证失败后的重新登录
wb.AddTopTips("","toptip1","用户名或密码错误!").msec
= 2000
'如果用户通过登录按钮访问,则给用户一个2秒的提示.
End
If
wb.AddForm("","form1","logon.htm")
With wb.AddInputGroup("form1","ipg1")
.AddInput("username","户名","text")
.AddInput("password","密码","password")这里如何加密
End
With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"登录",
"submit")
End
With
|
加好友 
发短信
Post By：2023/6/13 8:56:00 [只看该作者]
