<% ' Skapa och öppna databasobjekt
set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(" --- egen db, ex Access ---") & ";"

' SQL-fråga

SQL = "INSERT INTO tblTabell (falt1, falt2, falt3) VALUES (varde1, varde2, varde3)"

' Kör SQL-frågan på servern

Server.Execute (SQL)

' stäng och förstör objekten

Connect.Close
set Connect = nothing %>