共2 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：注册成功后新帐号，返回登陆页，登陆不进来，其它帐号可以登陆
1楼
sysckj 发表于：2023/9/8 16:59:00 wb.AddPageTitle("","pageheader","社团活动课程报名系统","武冈市新东中心小学")
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",False)
.Add("btn1", "登录", "submit")
.Add("btn2", "注册", "", "/addnew.htm")
End With
e.WriteString(wb.Build)
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:代码.txt |
[此贴子已经被作者于2023/9/8 17:17:27编辑过]
2楼
有点蓝 发表于：2023/9/8 17:38:00注册使用的是Dim dr As DataRow = DataTables("users").SQLAddNew()。注意SQLAddNew是直接添加到后台数据库的，前台是没有数据的。
后面登录使用的Find查询的是前台数据。
方法1、SQLAddNew改为AddNew
2、Find改为sqlFind
共2 条记录, 每页显示 10 条, 页签:
[1]