Como Conecto Mi Obdc Para Ke Me Reciba Los Datos

[mrjhon]

BUENO AMIGOS LES COMENTO KE YA ME PASAN LOS DATOS A LA TABLA PERO ME SALE ERROR EN ESTA LINEA


conexion.Close()

Y DISE LO SIGUIETE

Error de Microsoft VBScript en tiempo de ejecución error '800a01a8'

Se requiere un objeto: ''



___________________________________________

<%
set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("librovisitas.mdb")&"")

set RS = Server.CreateObject("ADODB.RecordSet")
RS.Open "formulario", Conn, 2, 3

RS.AddNew
rs("nombre")=request.form("nombres")
rs("apellidos")=request.form("apellidos")
rs("empresa")=request.form("empresa")
rs("telefono")=request.form("telefono")
rs("mail")=request.form("mail")
comentario=replace(request.form("comentario"),chr( 10),"<br>")
rs("comentario")=comentario

RS.Update()
RS.Close()
conexion.Close()
set RS = nothing
set conexion = nothing
%>