asp 连接mysql
作者:admin 日期:2008-11-04
1,下载myodbc.dll,这个文件很难下,一般直接下载myodbc,安装完成后在c:windows\system32文件里找到myodbc3.dll这个文件就是你要找的
2,导入注册表
Windows Registry Editor Version 5.00
==========================================================从下行开始
Windows Registry Editor Version 4.00
[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INImyodbc driver]
"UsageCount"=dword:00000002
"Driver"="C:\WINDOWS\system32\myodbc3.dll"
"Setup"="C:\WINDOWS\system32\myodbc3.dll"
"SQLLevel"="1"
"FileUsage"="0"
"DriverODBCVer"="02.50"
"ConnectFunctions"="YYY"
"APILevel"="1"
"CpTimeout"="120"
[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBC Drivers]
"myodbc driver"="installed"
3,代码
<%
'测试读取MySql数据库的内容
strconnection="driver={mysql odbc 3.51 driver};database=mysql;server=127.0.0.1;uid=root;password="
'无需配置dsn
set adodataconn = server.createobject("adodb.connection")
adodataconn.open strconnection
strquery = "select * from db"
set rs = adodataconn.execute(strquery)
if not rs.bof then
%>
<table>
<tr>
<td><b>序列号</b></td>
<td><b>标题</b></td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("db")%></td>
<td><%=rs("host")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
else
response.write("无数据.")
end if
rs.close
adodataconn.close
set adodataconn = nothing
set rsemaildata = nothing
%>
'附三个文件
点击下载此文件
2,导入注册表
Windows Registry Editor Version 5.00
==========================================================从下行开始
Windows Registry Editor Version 4.00
[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INImyodbc driver]
"UsageCount"=dword:00000002
"Driver"="C:\WINDOWS\system32\myodbc3.dll"
"Setup"="C:\WINDOWS\system32\myodbc3.dll"
"SQLLevel"="1"
"FileUsage"="0"
"DriverODBCVer"="02.50"
"ConnectFunctions"="YYY"
"APILevel"="1"
"CpTimeout"="120"
[HKEY_LOCAL_MACHINESOFTWAREODBCODBCINST.INIODBC Drivers]
"myodbc driver"="installed"
3,代码
<%
'测试读取MySql数据库的内容
strconnection="driver={mysql odbc 3.51 driver};database=mysql;server=127.0.0.1;uid=root;password="
'无需配置dsn
set adodataconn = server.createobject("adodb.connection")
adodataconn.open strconnection
strquery = "select * from db"
set rs = adodataconn.execute(strquery)
if not rs.bof then
%>
<table>
<tr>
<td><b>序列号</b></td>
<td><b>标题</b></td>
</tr>
<%
do while not rs.eof
%>
<tr>
<td><%=rs("db")%></td>
<td><%=rs("host")%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<%
else
response.write("无数据.")
end if
rs.close
adodataconn.close
set adodataconn = nothing
set rsemaildata = nothing
%>
'附三个文件

评论: 0 | 引用: 0 | 查看次数: 1362
发表评论
你没有权限发表留言!