asp vbscript--- mysql

Question

<%
set cn = server.CreateObject("adodb.connection")
cn.open"accessdatabase"
set rs = server.CreateObject("adodb.recordset")
strsql = "select * from devisjb where xinghao = '"& request("name") & "'"
rs.open strsql,cn
if rs.eof then
end if
set name1 =rs("xinghao")
set name2 =rs("leibie")
do until rs.eof
response.Write "name1"&"&name2&"<br>
rs.movenext
loop
rs.close
cn.close
%>MYSQL 
服务器版本：5.1.57-community
协议版本：10网站服务器
microsoft-iis/6.0
mysql 客户端版本：5.0.51a
php扩展：mysql

Answer 1

错误提示是什么？另外注意这一句 cn.open"accessdatabase"

Answer 2

Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序

Answer 3

我在 网上找了这样一段做测试，看图然后错误提示：
Microsoft OLE DB Provider for ODBC Drivers 错误 '80004005'[Microsoft][ODBC 驱动程序管理器] 未发现数据源名称并且未指定默认驱动程序/china/cs1.asp，行 33

Answer 4

安装MYSQL 的ODBC驱动了吗？