安装MySQL ODBC driver。
我安装的是mysql-connector-odbc-5.1-win32
然后在：控制面板－管理工具－数据源－驱动程序，中看见我们安装好的mysql驱动。（我显示的是“MySQL ODBC 5.1driver”）
再转到系统DSN：点击“添加”，从“创建数据源”列表中选择刚刚安装的驱动。
Data Source Name：数据源名，可自拟（跟功能挂钩）；
Description：关于此数据源的描述，主要功能等，可不填；
Server：服务器名称，可以是机器名，也可以是IP地址
Port：端口号
User：用户名：默认的是root，也可以在安装mySQl时自己设定
Password：密码
Database：数据库
填好后点击“Test”进行测试，若successful则ok。
ASP和数据库的连接
下面是我测试连接MySQL的源代码，连接的库名为robot，表名为users，表中有两个字段 userId和 username。
<html> <head> <title>MySQL连接测试</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> </head> <body> <% '配置数据库 Dim Conn, sConnString, strquery sConnString="driver={mysql odbc 5.1 driver};database=robot;server=localhost;uid=root;password=root" Set Conn=Server.CreateObject("adodb.Connection") Conn.open sConnString '连接数据库 %> <% '数据库操作语句 strquery = "select * from users" 'Set rs = Server.CreateObject("Adodb.RecordSet") 'rs.open strquery, Conn, 1, 1 set rs = Conn.execute(strquery) if not rs.bof then %> <table> <% do while not rs.eof %> <tr> <td>编号</td> <td>标题</td> </tr> <tr> <td><%=rs("userId")%></td> <td><%=rs("username")%></td> </tr> <% rs.movenext Loop %> </table> <% else Response.Write("无数据！") End if rs.close Set rs=Nothing Conn.Close Set Conn=Nothing %> </body> </html>