Esto no quiere grabas la BD

oonai
12 de Agosto del 2005
Espero que alguien me ayude, he probato todos los cambios en la seguridad de mi BD y no quiere grabar, pero tampoco da errores..... el codigo es

Set conectar = Server.CreateObject("ADODB.Connection")
conectar.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("soldatos.mdb"))
Set registrars=Server.createobject("ADODB.Recordset")
registrars.ActiveConnection = conectar
registrars.Source = "solicitud"
registrars.LockType = adLockoptimictic
registrars.CursorType = AdOpenKeySet
registrars.open
registrars.AddNew
registrars("tiposol")=Request.form("tipos")
registrars("fecha")=Request.form("fecha")
registrars("tipodoc")=Request.form("tipo")
registrars("solicitante")=Request.form("nombre")
registrars("area")=Request.form("areas")
registrars("responsable")=Request.form("rarea")
registrars("estatus")=Request.form("status")
registrars("documento")=Request.form("ndocumento")
registrars("comenta")=Request.form("comenta")
registrars.update
registrars.close
conectar.close
%>, aub asi esta cosa no quiere grabar en mi maquina bajo XP, IIS, Gracias por la ayuda
registrars=nothing
conectar=nothing%>

Humberto
12 de Agosto del 2005
Mapeo=\"C:\\Inetpub\\wwwroot\\ProyectoWeb\\Data\\registro.mdb\" (Esta Es La Ruta De la Base De DAtos)
Set Con = Server.CreateObject(\"ADOdb.Connection\")
Con.Open \"Provider=Microsoft.Jet.OLEDB.4.0;Data source=\"& mapeo &\";\"
Set Rs =server.createobject(\"adodb.recordset\")
set rs =server.createobject(\"adodb.recordset\")
rssql=\"select * from (Aqui El nombre De La Tabla) \"
rs.cursortype=1
rs.locktype=2
rs.open rssql,con

rs.addnew
rs.fields(\"Nombre Del Campo\")=request.form(\"Nombre\")
Y Asi Susesivamete
rs.update
rs.close
...................
Enviame un Correo Sy te Funciono