quello asp è:

<%@language = "VBScript" %>
<%

strFirst = Request.Form("fname")
strLast = Request.Form("lname")
strEmail = Request.Form("email")
strAddress = Request.Form("address")
strZip = Request.Form("zip")
strCountry = Request.Form("country")
strPhone = Request.Form("phone")

MyPath=Server.MapPath("mdb-database/example.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & MyPath

SQL = "INSERT INTO contacts (FirstName, LastName, Email, Address, Zip, Country, Phone) VALUES ('"&strFirst&"','"&strLast&"','"&strEmail&"','"&st rAddress&"','"&strZip&"','"&strCountry&"','"&strPh one&"')"
conn.Execute(SQL)
%>