connessione a my sql

[Stanislao]

come posso cambiara la connessione di questa pagina da access a my sql?

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("database.mdb")
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from Iscritti where sesso='maschio'"
rs.Open sql,Conn,3,3
	Do While Not rs.EOF
    Response.write("

<font color='#FF99FF' face='Verdana' size='2'>"& rs("User"))&"</div>"
%>


</a>

<title>Le donne di Bbart</title>

<%
rs.MoveNext
Loop
rs.close
Set rs=Nothing
Conn.close
Set Conn=Nothing
%>

grazie