asp连接mysql程序代码如下：

<%
mysql_db_name = "mysql"
mysql_db_user = "root"
mysql_db_password = ""
mysql_db_host = "localhost"
mysql_dsn="tideinfo"

strconnection="dsn="&mysql_dsn&";driver={mysql odbc 3.51 driver};server="&mysql_db_host&";uid=root;pwd=;database=mysql"
set conn = server.createobject("adodb.connection")
conn.open strconnection

'sql="create database "&mysql_db_name
'rs =conn.execute(sql)

'sql="grant select,update,insert,delete on "&mysql_db_name&".* to "&mysql_db_user&"@"&mysql_db_host&" identified by '"&mysql_db_password&"'"
sql="select * from user"
set rs = conn.execute(sql)
do while not rs.eof
response.write "mysql user"+rs("user")
rs.movenext
loop
'conn.execute(sql)
conn.close
set conn = nothing
set rs = nothing
%>