Access数据库登录不区分大小写问题修复求助（附VB代码）

嘿，我来帮你解决这个登录不区分大小写的问题！通常这事儿俩原因：要么数据库查询没开大小写敏感，要么VB.NET代码里的字符串比较默认不区分大小写，咱们一步步来修：

1. 先搞定数据库查询的大小写敏感性 #

你代码里用的UsernamesTableAdapter1.ScalarQueryLogin(username, password)，背后对应的SQL查询大概率是类似SELECT COUNT(*) FROM Usernames WHERE Username = @Username AND Password = @Password这种。但大多数数据库（比如SQL Server）默认排序规则是不区分大小写的（比如带CI的规则，Case Insensitive），所以输Admin和admin数据库会认成同一个。

怎么改？ #

根据你用的数据库类型，修改查询语句：

• SQL Server：加COLLATE指定大小写敏感的规则：

  SELECT COUNT(*) FROM Usernames 
  WHERE Username = @Username COLLATE SQL_Latin1_General_CP1_CS_AS 
    AND Password = @Password COLLATE SQL_Latin1_General_CP1_CS_AS
  

  这里CS就是Case Sensitive的意思。
• MySQL：用BINARY关键字强制二进制比较：

  SELECT COUNT(*) FROM Usernames 
  WHERE BINARY Username = @Username 
    AND BINARY Password = @Password
  

• Access：用StrComp函数，第三个参数传0（二进制模式）：

  SELECT COUNT(*) FROM Usernames 
  WHERE StrComp(Username, @Username, 0) = 0 
    AND StrComp(Password, @Password, 0) = 0
  

你得找到ScalarQueryLogin对应的SQL语句，按你的数据库改就行。

2. 再修复VB.NET代码里的字符串比较 #

你代码里写了txt_username.Text = "admin"，但VB.NET默认的Option Compare是Text模式——这模式下字符串比较不区分大小写，所以"Admin" = "admin"会返回True。要让这个判断严格区分大小写，有俩办法：

方法一：用String.Equals指定严格比较 #

把判断改成这样：

If Me.UsernamesTableAdapter1.ScalarQueryLogin(username, password) AndAlso String.Equals(txt_username.Text, "admin", StringComparison.Ordinal) Then

StringComparison.Ordinal是基于字符ASCII值的严格大小写比较，绝对不会搞混。

方法二：改文件的全局比较设置 #

在你的VB文件最顶部加一行：

Option Compare Binary

这样整个文件里的=比较字符串都会变成大小写敏感的，但要注意这会影响文件里所有字符串比较，得确认其他地方不需要不区分大小写的判断哦。

改完后的完整代码示例 #

假设你用的是SQL Server，调整后的代码大概是这样：

Private Sub btn_login_Click_1(sender As Object, e As EventArgs) Handles btn_login.Click
    Dim username, password As String
    Dim message As String = "The username or password was incorrect, please try again"
    username = txt_username.Text
    password = txt_password.Text

    ' 用AndAlso代替And，短路判断更高效，避免不必要的数据库查询后判断
    If Me.UsernamesTableAdapter1.ScalarQueryLogin(username, password) AndAlso 
       String.Equals(txt_username.Text, "admin", StringComparison.Ordinal) Then
        Form2.Show()
        txt_username.Text = "" ' 登录成功后清空输入框
        txt_password.Text = ""
    Else
        MessageBox.Show(message)
    End If
End Sub

别忘了同步修改ScalarQueryLogin的SQL查询哦！

额外提个醒 #

• 安全方面：绝对不要明文存密码！应该用哈希算法（比如BCrypt、带盐的SHA256）把密码哈希后存在数据库里，登录时对输入的密码做同样哈希再和数据库里的哈希值比较，这是行业标准的安全做法。
• 如果你用的是Entity Framework这类ORM，也可以通过配置或者指定比较方式来实现大小写敏感，原理是一样的。

内容的提问来源于stack exchange，提问作者Sasjumb