求教登录界面同时区分大小写 - VB6论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 开发语言 → 『 VB6论坛』 → 求教登录界面同时区分大小写

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2196 人关注过本帖

标题：求教登录界面同时区分大小写

取消只看楼主加入收藏

sclx88

等　级：新手上路
帖　子：41
专家分：0
注　册：2016-7-31
结帖率：100%

楼主

已结贴√ 问题点数：20 回复次数：2

求教登录界面同时区分大小写

数据库已连接，现在这个代码是不区分大小写的，请问如果要区分大小写应该怎么搞

程序代码：

    If rs.EOF = True Then  '如果没有记录则说明用户或密码为错误的
        If pnum < 2 Then 'pnum就是密码验证次数，当次数超过3次，系统会自动保护退出
            pnum = pnum + 1
            MsgBox "用户名或密码错误!（区分大小写）", vbInformation, "错误次数：" & pnum
            rs.Close
            cn.Close
            Text1.Text = ""
            Text2.Text = ""
            Text1.SetFocus
            Exit Sub
        Else
            MsgBox "用户名或密码错误超过三次,系统自动退出...", vbInformation, "提示"
            End
        End If
    Else
        loginname = rs.Fields(0)
        Form3.Show
        rs.Close
        cn.Close
    End If