Some ASP I wrote

set objComm = server.createobject("adodb.command")

objComm.activeconnection = "Provider=sqloledb;Database=MrDB;Server=MrServer;UID=User;PWD=Pass;"

strSQL = "insert into Robs_mother (Vagina) values ('Penis')"

objComm.commandtext = strSQL

objComm.execute