主题：用户问题

老师，请问我用帮助代码做了一个登入界面，请问怎么修改才可以用到我SQL里面的用户和密码呢
此主题相关图片如下：企业微信截图_20190610095534.png

参考

 

Dim dr As DataRow
dr = DataTables("users表").Find("Name = '" & UserName & "'") 
If dr IsNot Nothing AndAlso dr("password") = password Then
    Verified  = True
End If

 

老师 替换上你给我的代码，好像输入SQL中的Users表的用户名和密码 还是无效的

 

1、你users表的表结构是怎样的？截图说明。

 

2、贴出你所写代码。

sql语句改成

 

"select password from {users} where name = '" & username & "'"

 

然后判断

 

If cmd.executeScalar = password Then

    verified = true

End If

老师，修改代码后都不出现登录界面了，直接跳转到登录后首页界面了，是不是我代码哪里还有问题
此主题相关图片如下：企业微信截图_20190611074727.png

1、你直接访问登陆网页，看能否进入；

 

2、关闭浏览器以后，重新打开测试，看能否进入；

 

3、如果还不行，实例发上来测试。

可以了老师，非常感谢