Hvordan får man forbindelse?

Hej,

jeg bruger en access-database men skal gå over til MySQL.

Når jeg skriver flg. med access, hvad skal jeg så skrive istedet for når det er MySQL??:

Dim Con
Set Con=Server.CreateObject("ADODB.Connection")
Con.Open "Driver={Microsoft Access Driver (*.MDB)}; DBQ=" & Server.MapPath("db/dbase.mdb")

Dim RS
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open "SELECT " & strVarehuse & " FROM pristjek WHERE varenavn = " & namearr & " ORDER BY varenavn ASC",Con

Mvh.,
Bat.