<% Set connection = Server.CreateObject("ADODB.Connection") FilePath = Server.MapPath("methdesi_MRP.mdb") connection.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & FilePath & ";" query = "select email from Users" Set records = connection.Execute(query) %>

<%=records("first_name")%>