Add a record in a database with classic ASP

A simple example showing how to connect to a database and add a record from VBScript/classic ASP.

Dim strDbConnection
Dim objConn
Dim strSQL
strDbConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\test.mdb;"
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open(strDbConnection)
strSQL = "INSERT INTO persons (fullname, birthDate) VALUES ('John Doe', '1970-06-19')"
objConn.Execute(strSQL)
objConn.Close()
Set objConn = Nothing