新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
用户在登录界面登录时,先检验用户权限,进行判定,再根据权限跳转界面,设定其他权限信息即可。
创新互联公司:2013年至今为各行业开拓出企业自己的“网站建设”服务,为上千家公司企业提供了专业的成都网站制作、成都网站建设、网页设计和网站推广服务, 按需设计网站由设计师亲自精心设计,设计的效果完全按照客户的要求,并适当的提出合理的建议,拥有的视觉效果,策划师分析客户的同行竞争对手,根据客户的实际情况给出合理的网站构架,制作客户同行业具有领先地位的。
将用户名,密码,用户类型存在数据库中,登陆时比较输入的值是否与数据库相同即可。
有许多方法,用一个类,在这个类中写个验证方法(修改方便),或直接在程序中写一个方法。再用image标签在第一次加载程序时调用方法。
你每次取出的是表中的首条记录,当然只能用首条记录登陆了!
Dim name, password As String
name = TextBox1.Text
Dim com As New OleDb.OleDbCommand("select * from denglu where name='" name "'", conn)
Dim dr As OleDb.OleDbDataReader
conn.Open()
dr = com.ExecuteReader
dr.Read()
password = dr.GetString(1)
If TextBox3.Text = password Then
mesbox("成功!")
Else
msgbox("失败")
End If
dr.Close()
conn.Close()
这种情况下,效率极不好!你能理解什么意思就行了!否则将你的程序改完了!