asp操作mysql数据库

Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DRIVER={MySQL ODBC 5.3 Driver};SERVER=your_server;DATABASE=your_database;UID=your_username;PWD=your_password;"

Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=MySQLProv;Data Source=your_server;Database=your_database;User Id=your_username;Password=your_password;"

Dim sql
sql = "INSERT INTO table_name (column1, column2) VALUES ('value1', 'value2')"
conn.Execute sql

Dim sql
sql = "INSERT INTO table_name (column1, column2) VALUES ('value1', 'value2')"
conn.Execute sql

Dim rs
Dim sql
sql = "SELECT * FROM table_name"
Set rs = conn.Execute(sql)
While Not rs.EOF
    Response.Write rs("column1") & " " & rs("column2") & "<br>"
    rs.MoveNext
Wend
rs.Close
Set rs = Nothing

Dim reader
Dim sql
sql = "SELECT * FROM table_name"
Set reader = conn.ExecuteReader(sql)
While reader.Read
    Response.Write reader("column1") & " " & reader("column2") & "<br>"
End While
reader.Close
Set reader = Nothing