要在ASP中读取MySQL数据库，你可以使用ADO连接来实现。以下是一个简单的示例代码：
<%
Dim conn
Dim rs
Dim sql
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={MySQL ODBC 5.1 Driver};SERVER=your_server;DATABASE=your_database;USER=your_username;PASSWORD=your_password;OPTION=3;"
sql = "SELECT * FROM your_table"
Set rs = conn.Execute(sql)
Do While Not rs.EOF
Response.Write(rs("column_name") & "<br>")
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
%>在上面的示例中，你需要根据你自己的MySQL数据库信息填写连接字符串中的服务器地址、数据库名称、用户名和密码。然后在sql变量中编写你要执行的查询语句，可以根据需要自定义查询条件和返回字段。最后在循环中输出查询结果中的每一行数据。
请注意，这只是一个简单的示例代码，实际上，你可能会遇到更复杂的查询和数据操作。你可以根据实际需求对代码进行扩展和优化。
在ASP中读取MySQL数据库，首先需要使用MySQL提供的连接库和驱动程序。常用的MySQL连接库有ADODB和MySQL Connector，并且需要在服务器上安装MySQL ODBC驱动程序。
以下是一个示例代码，演示在ASP中如何连接MySQL数据库，读取数据并输出到页面上：
<%
' 定义数据库连接信息
Dim connStr
Dim conn
Dim rs
connStr = "DRIVER={MySQL ODBC Driver};SERVER=127.0.0.1;DATABASE=test;UID=username;PWD=password;OPTION=3;"
' 连接MySQL数据库
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connStr
' 查询数据
Set rs = conn.Execute("SELECT * FROM users")
' 输出数据到页面
Response.Write "<table><tr><th>ID</th><th>Name</th></tr>"
Do While Not rs.EOF
Response.Write "<tr><td>" & rs("id") & "</td><td>" & rs("name") & "</td></tr>"
rs.MoveNext
Loop
Response.Write "</table>"
' 关闭连接
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
%>在上面的示例中，需要将数据库连接信息中的地址、数据库名、用户名和密码替换为实际的连接信息。然后使用ADODB连接MySQL数据库，并查询名为”users”的表的数据，最后将数据输出到页面上。
请注意，使用ASP连接数据库存在一定的安全风险，建议在真实项目中使用更加安全的方式，如参数化查询等。
发布者：luotuoemo，转转请注明出处：https://www.jintuiyun.com/149685.html
