Conexion e insercion en Access

[Gennys]

Hola Carlunchos. Este es el codigo ASP, lo hago atraves de ODBC y directo, pero no puedo insertar, me dice que el objeto no esta abierto. revisa a ver que ves de malo:

<%
on error resume next

Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("./BDGennys.mdb")

'Aqui lo hago con DSN e igual, o inserta.
' Set conexion = Server.CreateObject("ADODB.Connection")
' conexion.ConnectionString = "DSN=Gennys1"
' conexion.Open

textoSql = "insert into Clntes(nombre, edad,direccion,telefono) values('" & Request.Form("t1") & "','" & Request.Form("t2") & "','" & Request.Form("text1") & "','" & Request.Form("text2") & "')"

conexion.Execute(textoSql)

response.write err.number
if err.number<>0 then
response.Write "Error en la Base de Datos, tipo de Eror: "& err.description & " "
else
response.write "Todo Ok"
end if

' MiConexion.Close
Conexion.Close
set conexion = nothing

Response.write("GrbarBDATOS")
%>