¿Y cuál es la línea 100? Y pk en vez de usar insert into no utilizas esto?:
Código:
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("base.mdb"))
sqltext = "SELECT * FROM tabla"
rst.Open sqltext,cnn,3,3
rst.AddNew
rst("campo")=variable
rst.update
rst.Close
cnn.close