| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于username与password的判断区别 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=118125) |
| -- 作者：lzw001 -- 发布时间：2018/4/25 15:43:00 -- 关于username与password的判断区别 老师 ，httprequest那里登录时，由于username是从foxtable表格中获取的，如何区别判断这两种情况呢：1、当表格中没有username时，给用户显示“该用户不存在” 2、当username或密码错误时，显示“用户或密码错误” 这样 |
| -- 作者：lzw001 -- 发布时间：2018/4/25 15:45:00 -- 第二种已经有了，就是第一种不知道该怎么区别 |
| -- 作者：有点甜 -- 发布时间：2018/4/25 15:50:00 -- Dim fdr As DataRow = DataTables("表A").find("用户名 = \'" & userName & "\'") If fdr Is Nothing then msgbox("用户名不存在") Else msgbox("存在") End If |
| -- 作者：lzw001 -- 发布时间：2018/4/25 16:52:00 -- 不是，我是这样写，前面已经有判断了 Case "logon1.htm" \'我的直接订单页面fs=2 对应ChangePassword wb.AddPageTitle("","pageheader1","荣峰天下","--->归属人") If e.PostValues.ContainsKey("username") AndAlso e.PostValues.ContainsKey("password") Then Dim fdr1 As DataRow= DataTables("贷款每日进度表1").SQLfind("订单原始归属所有合伙人_归属人=\'" & e.PostValues("username") & "\'") If e.PostValues("username")<>fdr1("订单原始归属所有合伙人_归属人") Then wb.AddToptips("","toptip1","用户不存在!").msec=2000 \'---停留2秒的时间 ElseIf wb.AddToptips("","toptip1","用户名或密码错误!").msec=2000 \'---停留2秒的时间 End If End If wb.AddForm("","form2","logon1.htm?fs=2") With wb.AddInputGroup("form2","ipg2") .AddInput("username","用户","text") .AddInput("password","密码","password") End With With wb.AddButtonGroup("form2","btg2",True) .Add("btn2","登录","submit") .Add("pwd","修改密码","","ChangePassword.htm").Kind=2 \'红色按钮 End With |
| -- 作者：有点甜 -- 发布时间：2018/4/25 17:52:00 -- If e.PostValues.ContainsKey("username") AndAlso e.PostValues.ContainsKey("password") Then Dim fdr1 As DataRow= DataTables("贷款每日进度表1").SQLfind("订单原始归属所有合伙人_归属人=\'" & e.PostValues("username") & "\'") If fdr1 Is Nothing Then wb.AddToptips("","toptip1","用户不存在!").msec=2000 \'---停留2秒的时间 Else wb.AddToptips("","toptip1","用户名或密码错误!").msec=2000 \'---停留2秒的时间 End If End If |
| -- 作者：lzw001 -- 发布时间：2018/4/25 18:06:00 -- 哇，可以了，谢谢 |