主题：用户问题

参考

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

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

2、贴出你所写代码。

sql语句改成

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

然后判断

If cmd.executeScalar = password Then

    verified = true

End If

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

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

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