connection script

Hvordan skriver jeg denne her rigtigt?

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(".\db\data.mdb")


dette virker:
    <%
    Set MM_vd_STRING = Server.CreateObject("ADODB.connection")
    MM_vd_STRING.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};" & _
    "DBQ=D:\HOSTROOT\ven\db\data.mdb"
    MM_vd_STRING.Open
    %>