以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  用户问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=136234)

--  作者:巷弄太过弯曲
--  发布时间:2019/6/10 10:00:00
--  用户问题
老师,请问我用帮助代码做了一个登入界面,请问怎么修改才可以用到我SQL里面的用户和密码呢
图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190610095534.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2019/6/10 11:51:00
--  

参考

 

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

 


--  作者:巷弄太过弯曲
--  发布时间:2019/6/10 14:34:00
--  
老师 替换上你给我的代码,好像输入SQL中的Users表的用户名和密码 还是无效的
--  作者:有点甜
--  发布时间:2019/6/10 14:41:00
--  
以下是引用巷弄太过弯曲在2019/6/10 14:34:00的发言:
老师 替换上你给我的代码,好像输入SQL中的Users表的用户名和密码 还是无效的

 

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

 

2、贴出你所写代码。


--  作者:巷弄太过弯曲
--  发布时间:2019/6/10 16:08:00
--  
老师,我就是想用SQL语句把我SQL里的“Users”表里面的用户名 密码读取出来,登入就用SQL的USERS表里面的用户登入,帮我看一下这段代码怎么改



--  作者:巷弄太过弯曲
--  发布时间:2019/6/10 16:14:00
--  

纯代码发不了 我发图片,

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190610160949.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190610160915.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/6/10 16:14:00编辑过]

--  作者:有点甜
--  发布时间:2019/6/10 16:40:00
--  

sql语句改成

 

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

 

然后判断

 

If cmd.executeScalar = password Then

    verified = true

End If


--  作者:巷弄太过弯曲
--  发布时间:2019/6/11 7:50:00
--  
老师,修改代码后都不出现登录界面了,直接跳转到登录后首页界面了,是不是我代码哪里还有问题
图片点击可在新窗口打开查看此主题相关图片如下:企业微信截图_20190611074727.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2019/6/11 10:06:00
--  

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

 

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

 

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


--  作者:巷弄太过弯曲
--  发布时间:2019/6/11 10:20:00
--  
可以了老师,非常感谢