Asp连接Mysql代码
2008-10-28 22:13
323 查看
Asp连接mysql
首先安装mysql ODBC Driver 可以到mysql官方网站下载
<%
Dim conn,rs,connStr,sqlStr
connStr="Driver={MySql ODBC 5.1 Driver};server=127.0.0.1;database=dnt25;uid=root;pwd=root"
sqlStr="select directory,name,author,createdate from dnt_templates"
Set conn=Server.CreateObject("ADODB.Connection")
conn.open connStr
Set rs=conn.Execute(sqlStr) '注意这里不能通过re.open sql,conn,1,1打开,因为mysql不支持游标,只能通过conn.Ececute()返回Rescord对象
If rs.EOF and rs.BOF Then
Response.Write("没有任何信息")
End If
Do while not rs.Eof
Response.Write(rs("directory")&"
")
Response.Write(rs("name")&"
")
Response.Write(rs("author")&"
")
Response.Write(rs("createdate")&"
")
rs.moveNext
Loop
rs.close()
Set rs=Nothing
conn.close()
Set conn=Nothing
%>
首先安装mysql ODBC Driver 可以到mysql官方网站下载
<%
Dim conn,rs,connStr,sqlStr
connStr="Driver={MySql ODBC 5.1 Driver};server=127.0.0.1;database=dnt25;uid=root;pwd=root"
sqlStr="select directory,name,author,createdate from dnt_templates"
Set conn=Server.CreateObject("ADODB.Connection")
conn.open connStr
Set rs=conn.Execute(sqlStr) '注意这里不能通过re.open sql,conn,1,1打开,因为mysql不支持游标,只能通过conn.Ececute()返回Rescord对象
If rs.EOF and rs.BOF Then
Response.Write("没有任何信息")
End If
Do while not rs.Eof
Response.Write(rs("directory")&"
")
Response.Write(rs("name")&"
")
Response.Write(rs("author")&"
")
Response.Write(rs("createdate")&"
")
rs.moveNext
Loop
rs.close()
Set rs=Nothing
conn.close()
Set conn=Nothing
%>
相关文章推荐
- asp 连接 mysql 代码
- ASP连接MYSQL代码
- Asp.net 连接MySQL的实现代码[]
- Asp.net 连接MySQL的实现代码[]
- asp.net连接SQL Server数据库的代码
- ASP与数据库-连接、写入、修改、删除、显示代码
- JAVA JDBC 连接Mysql 代码。
- Zend_Db连接MySQL(附完整代码)
- php与mysql建立连接并执行SQL语句的代码
- 测试php连接mysql是否成功的代码分享
- asp中各种数据库连接代码
- Asp.Net Core 连接Mysql
- asp和mysql分页代码
- 代码干货 | PHP数据库长连接mysql_pconnect的细节
- Zend_Db连接MySQL(附完整代码)
- Zend_Db连接MySQL(附完整代码)
- asp.net 结合mysql存储过程进行分页代码
- MySQL连接数据库:C API代码, Linux,Windows
- php与mysql建立连接并执行SQL语句的代码