请问用odbc连接sql数据库怎么判断用户名和密码正确就登录啊？

VB 中用ODBC 方式连接 SQL Server 数据库的连接字符串如下：

ODBCDriver={SQL Server}Server=服务器名Uid=saPwd=用户密码(没有密码为空)DataBase=数据库名LoginTimeOut=0

1、一般DAO方式访问数据库时多用ODBC 连接。如Data 数据控件

odbcConnStr="ODBCDriver={SQL Server}Server=服务器名

Uid=saPwd=用户密码(没有密码时：空)

DataBase=数据库名LoginTimeOut=0"

With Data1

.DatabaseName = ""

.Connect = odbcConnStr

.RecordSource = "Select * From 数据表"

.Refresh

End With

2、如果是DAO 数据集的话，需要在声明中标明DAO.

Dim sqlDB as DAO.DataBase ' 声明数据库

dim snRecd as DAO.RecordSet ' 声明数据集

Set sqlDB = OpenDatabase("", dbDriverNoPrompt, True, odbcConnStr)

Set snRecd = sqlDB.OpenRecordset("Select * From 数据表", dbOpenSnapshot)

3、要判断用户的代码和密码正确与否。

首先将数据库连接成功后，用SQL语句进行筛选用户名及用户密码就可以了。

如：

Set snRecd = sqlDB.OpenRecordset("Select * From 用户信息表 Where UserCode='xxxx'", dbOpenSnapshot)

If snRecd.EOF and snRecd.BOF Then

MsgBox ("用户代码无效！")

End If

或:

Set snRecd = sqlDB.OpenRecordset("Select * From 用户信息表

Where UserCode='xxxx' And UserPwd='xxx'", dbOpenSnapshot)

If snRecd.EOF and snRecd.BOF Then

MsgBox ("用户密码无效！")

End If

那你先需要在安装MYSQL的ODBC数据源。

并建立连接可以看到“数据源名称”

添加mysql的ODBC。也就是DSN栏

在填写DNS栏

Data Source Name 数据源名字

Host/Server Name （or IP）主机/服务器 名字

Database Name 数据库名：

User 用户：

Password 密钥：

Port 端口：

设置完成。

设置好后，即可解决你提示的问题。

假如你用的是Access数据库：控制面板——管理工具——数据源（ODBC）——系统DNS（用户DNS也可）——添加——Microsoft Access Driver ——输入数据源名称——找到你的数据库

这样就差不多了，如果用的是sql则把DRIVER处换成SQL SEVRER的就可以了，希望能帮到你，祝好运！

---