vb 数据库问题
登录窗口如下:
数据库如下:
如何登录进去后在form2.Caption上分别显示该用户的名字
如是 L1254 账户进去的就显示 L1254-张华,L1333 账户进去的就显示 L1333-文鼎
追问:If rst.Fields("uname") = txtName.Text And rst.Fields("upwd") = txtPassword. 这句帮我解释下
如果uname=L1254, upwd=文鼎 ,这个用户和密码是不对的 也可以进去吗?
vb 是如何判断在数据库用户名和密码在不在一行的。
另外告诉我你的qq, 我加你。
答案:数据库是Access的吧Private Sub Command1_Click() ‘就是登录按钮
Dim rst As New ADODB.Recordset
Dim sql As String
sql = "select uname,upwd,mingzi from login where uname='" & txtName.Text & "'" ‘txtName是“用户名”后面那个textbox
rst.Open sql, conn, adOpenKeyset, adLockOptimistic
If rst.RecordCount <> 0 Then
If rst.Fields("uname") = txtName.Text And rst.Fields("upwd") = txtPassword.Text Then Form2.Caption = rst.Fields("mingzi")
Else
MsgBox "用户名或密码错误!", vbOKOnly, "登录失败"
End If
rst.Update
rst.Close
Set rst = Nothing
End Sub
取字段值即可啊
告诉你方法。登录界面的。用户名.text。窗口2.标题
在登录界面的登录验证过程中诺登录成功就将 窗口2.标题=用户名.text
代码是form2.Caption=username.text [注username是你用户名的控件名]
不懂+q
上一个:VB基础求解
下一个:C++ 什么情况下需要为类定义赋值运算符重载函数?